GuidoScript scripts/dtmutilities.tcl
global dtm_layer1
global object1_id
global trisolation1_id
global dtm_layer2
global object2_id
global trisolation2_id
global obj1_name
global obj2_name
global tri1_name
global tri2_name
GuidoForm frm01317 {
-action initial {[fill_triobject_trisolation_details_for_layers $dtm_layer1 $object1_id $obj1_name $trisolation1_id $tri1_name]}
-action initial {[fill_triobject_trisolation_details_for_layers $dtm_layer2 $object2_id $obj2_name $trisolation2_id $tri2_name]}
-default_buttons
-label "Intersect DTMs for Line of Contact"
-layout BoxLayout Y_AXIS
-legacy_validation
-tip 01317_TIP_0
GuidoPanel frm01317_5 {
-layout BoxLayout Y_AXIS
-tip 01317_TIP_1
-border etched true
GuidoPanel frm01320_5 {
-layout CentreLineLayout Vertical Left
GuidoComboBox dtm_layer1 {
-action valueChanged {[fill_triobject_trisolation_details_for_layers $dtm_layer1 $object1_id $obj1_name $trisolation1_id $tri1_name]}
-display_length 18.8
-format none
-label "First DTM layer"
-max_length 32
-null false
-tip "01320_TIP_002"
-translate none
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel triobject1 {
-label "Object ID"
}
GuidoPanel frm01320_6 {
-layout BoxLayout X_AXIS
GuidoComboBox object1_id {
-display_length 5
-max_length 32
-translate none
-exclusive false
-tip "04949_TIP_1"
-action valueChanged {[fill_triobject_details $dtm_layer1 $object1_id $obj1_name $trisolation1_id $tri1_name "false" "true"]}
}
GuidoFiller filler {
-width 0.2
}
GuidoLabel obj1_name {
}
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel trisol_panel {
-label "Trisolation ID"
}
GuidoPanel frm01320_7 {
-layout BoxLayout X_AXIS
GuidoComboBox trisolation1_id {
-display_length 5
-max_length 32
-translate none
-exclusive false
-tip "04949_TIP_2"
-action valueChanged {[fill_trisolation_details $dtm_layer1 $object1_id $trisolation1_id $tri1_name "true" "true"]}
}
GuidoFiller filler {
-width 0.2
}
GuidoLabel tri1_name {
}
}
}
}
GuidoPanel frm01317_9 {
-layout BoxLayout Y_AXIS
-tip 01317_TIP_1
-border etched true
GuidoPanel frm01320_9 {
-layout CentreLineLayout Vertical Left
GuidoComboBox dtm_layer2 {
-action valueChanged {[fill_triobject_trisolation_details_for_layers $dtm_layer2 $object2_id $obj2_name $trisolation2_id $tri2_name]}
-display_length 17.5
-format none
-label "Second DTM layer"
-max_length 32
-null false
-tip "01320_TIP_002"
-translate none
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel triobject1 {
-label "Object ID"
}
GuidoPanel frm01320_10 {
-layout BoxLayout X_AXIS
GuidoComboBox object2_id {
-display_length 5
-max_length 32
-translate none
-exclusive false
-tip "04949_TIP_1"
-action valueChanged {[fill_triobject_details $dtm_layer2 $object2_id $obj2_name $trisolation2_id $tri2_name "false" "true"]}
}
GuidoFiller filler {
-width 0.2
}
GuidoLabel obj2_name {
}
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel trisol_panel {
-label "Trisolation ID"
}
GuidoPanel frm01320_11 {
-layout BoxLayout X_AXIS
GuidoComboBox trisolation2_id {
-display_length 5
-max_length 32
-translate none
-exclusive false
-tip "04949_TIP_2"
-action valueChanged {[fill_trisolation_details $dtm_layer2 $object2_id $trisolation2_id $tri2_name "true" "true"]}
}
GuidoFiller filler {
-width 0.2
}
GuidoLabel tri2_name {
}
}
}
}
GuidoPanel frm01317_17 {
-border etched true
-label "Define result file"
-layout CentreLineLayout Vertical left
GuidoField out_layer {
-default intersection
-display_length 21.8
-format none
-label "Output layer"
-legacy_validation
-max_length 32
-null false
-tip 00092_TIP_2
-translate none
}
GuidoFiller filler {
-width 0.05
}
GuidoFiller filler {
-width 0.05
}
GuidoField intersection_str {
-display_length 5
-format integer
-high_bound 32000
-label "String Number"
-low_bound 1
-max_length 5
-null false
-tip 00092_TIP_2
-translate none
}
}
}
