GuidoConfig exchange_config {
-use_report_dialog false
GuidoFrame basic_frame {
-label "Exchange 3D"
-status_item "cwd"
-location 0 0
-size 1024 760 startup
-shutdown_callback "KILL GRAPHICS"
GuidoControlPanel control_panel {
GuidoMenuBar MenuBar {
-label "Main Menu"
-mode system
-hidden false
GuidoScript scripts/menus/exchange.tcl
}
GuidoScript scripts/toolbars/exchange.tcl
}
GuidoSplitPane hpane {
-orientation HORIZONTAL_SPLIT
-expandable true
-divider_location 20%
-continuous_layout false
}
GuidoScript scripts/toolbars/statusregion.tcl
}
GuidoNavigator nav {}
$hpane add [ $nav getObject ]
GuidoSplitPane vpane2 {
-orientation VERTICAL_SPLIT
-expandable true
-divider_location 80%
-continuous_layout true
-resize_weight 1.0
GuidoGraphics graphics {
-application graphics
}
GuidoMessager messager {}
}
$hpane add [ $vpane2 getObject ]
}
