set fileopenmenu_items {
GuidoMenuItem recall_file {
-label "String/DTM file"
-icon "icons/16/open_file.png"
-command script scripts/openFile.tcl
}
GuidoMenuItem open_ws {
-label "Graphics workspace"
-icon "icons/16/workspace_recall.png"
-command server "WORKSPACE RECALL"
}
GuidoMenuItem open_bm {
-label "Block model"
-icon "icons/16/block_model_open.png"
-command server "BM SELECT MODEL"
}
GuidoMenuItem open_gdb {
-label "Geological database"
-icon "icons/16/dhl_database_definition.png"
-command server "DHL DATABASE DEFINITION"
}
GuidoSeparator sep1 {
}
GuidoMenuItem basicstats {
-label "Basic statistics window"
-icon "icons/16/basic_statistics.png"
-command server "BASIC STATISTICS"
}
GuidoMenuItem plot_window {
-label "Plotting window"
-icon "icons/16/plot_preview.png"
-command server "PLOT PREVIEW"
}
GuidoMenuItem sheet_window {
-label "Plotting sheet setup window"
-icon "icons/16/sheet_entities.png"
-command server "SHEET ENTITIES"
}
}
GuidoMenu fileopenmenu {
-label "Open"
-delayed_script $fileopenmenu_items
}
