GuidoForm recall_vg_model_form {
-default_buttons
-help_id 923
-label "Recall a Variogram Model"
-layout BoxLayout Y_AXIS
-tip GST_RECALL_VG_MODEL_FORM_TIP
GuidoPanel recall_vg_model_panel {
-border etched true
-label "Enter the Name of the Variogram Model File to Open"
-layout CentreLineLayout
GuidoFileBrowserField vg_model_file_name {
-display_length 32
-file_access read
-file_mask "*.vgm *.not"
-format none
-label "File name"
-max_length 256
-null false
-translate none
}
}
}
GuidoApp app "RECALL VG MODEL"
set returnCode [$recall_vg_model_form interact]
if {"$returnCode" == "apply"} {
$app setParam vg_model_name [$vg_model_file_name getCurrentValue]
set returnCode [$app invoke]
}
$recall_vg_model_form destroy
$app destroy
