GuidoScript scripts/dtmutilities.tcl
global dtmloc
global object_id
global trisolation_id
global obj_name
global tri_name
global dtmfld
GuidoForm frm00091 {
-default_buttons
-label "Extract centroid data from a DTM"
-layout BoxLayout Y_AXIS
-action initial {[fill_triobject_trisolation_details $dtmloc $object_id $obj_name $trisolation_id $tri_name]}
-tip 00091_TIP_0
-action final {[destroyTemporaryProcessedDTMSwa]}
GuidoPanel frm00091_1 {
-layout BoxLayout Y_AXIS
-label "Define the DTM"
-border etched true
GuidoPanel frm00091_2 {
-layout CentreLineLayout VERTICAL LEFT
GuidoFileBrowserField dtmloc {
-action valueChanged {[fill_triobject_trisolation_details $dtmloc $object_id $obj_name $trisolation_id $tri_name]}
-label Location
-display_length 22
-file_mask *.dtm
-format none
-extension false
-max_length 252
-tip 00091_TIP_1
-translate none
-null false
-action valueChanged {[getDFieldNames $dtmloc $dtmfld]}
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoPanel frm00091_3 {
-layout BoxLayout X_AXIS
GuidoPanel frm00091_4 {
-layout CentreLineLayout VERTICAL LEFT
GuidoCheckBox swadesc {
-default false
-selected_value Y
-tip 00091_TIP_2
-unselected_value N
}
GuidoLabel swadesc_label {
-label "Use descriptions"
}
}
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel obj_num_label {
-label "Object ID"
}
GuidoPanel frm00091_5 {
-layout CentreLineLayout VERTICAL LEFT
GuidoPanel frm00091_6 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox object_id {
-action valueChanged {[fill_triobject_details $dtmloc $object_id $obj_name $trisolation_id $tri_name "false" "false"]}
-display_length 5
-format integer
-max_length 32
-translate none
-tip 04949_TIP_1
-null false
-exclusive false
}
GuidoFiller filler {
-width 0.5
}
}
GuidoPanel frm00091_7 {
-layout CentreLineLayout VERTICAL LEFT
GuidoLabel obj_name {
-display_length 11.5
-font_style bold
-input false
}
}
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel trisol_num_label {
-label "Trisolation ID"
}
GuidoPanel frm00091_8 {
-layout CentreLineLayout VERTICAL LEFT
GuidoPanel frm00091_9 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox trisolation_id {
-display_length 5
-format integer
-max_length 32
-translate none
-tip 04949_TIP_2
-exclusive false
-next_focus conmin
-action valueChanged {[fill_trisolation_details $dtmloc $object_id $trisolation_id $tri_name "true" "false"]}
}
GuidoFiller filler {
-width 0.5
}
}
GuidoPanel frm00091_10 {
-layout CentreLineLayout VERTICAL LEFT
GuidoLabel tri_name {
-display_length 11.5
-input false
-font_style bold
}
}
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoComboBox dtmfld {
-default Z
-display_length 5
-format string_field
-label "Field required"
-max_length 4
-no_mlt
-exclusive false
-tip 00091_TIP_4
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel dtmfunc_label {
-label "Calculation required"
}
GuidoButtonGroupPanel dtmfunc {
-layout BoxLayout Y_AXIS
GuidoRadioButton frm00091_13 {
-caption Mean
-default true
-selected_value @MEAN
}
GuidoRadioButton frm00091_14 {
-caption Logmean
-selected_value @LOGMEAN
}
GuidoRadioButton frm00091_15 {
-caption Slope
-selected_value @SLOPE
}
}
}
}
GuidoPanel frm00091_12 {
-border etched true
-label "Define file to create"
-layout BoxLayout Y_AXIS
GuidoPanel frm00091_13 {
-layout CentreLineLayout VERTICAL LEFT
GuidoFileBrowserField strloc {
-label Location
-display_length 26
-file_access write
-file_mask *.str
-format none
-link strid
-max_length 252
-tip 00091_TIP_5
-translate none
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoField strid {
-display_length 8
-format double
-label "Id number"
-max_length 16
-null false
-tip "00091_TIP_5"
-translate upper
}
}
}
}
