GuidoApp app "SAVE VG MODEL"
$app invoke
GuidoForm save_vg_model_form {
-default_buttons
-help_id 1119
-label "Save the Variogram Model to a File"
-layout BoxLayout Y_AXIS
-tip GST_SAVE_VG_MODEL_FORM_TIP
GuidoPanel save_vg_model_panel {
-border etched true
-label "Enter the Name of the Variogram Model File to Save"
-layout CentreLineLayout
GuidoFileBrowserField vg_model_file_name {
-display_length 32
-file_access write
-file_mask "*.vgm"
-format none
-label "File name"
-max_length 256
-null false
-translate none
}
}
}
set returnCode [$save_vg_model_form interact]
if {$returnCode == "apply"} {
$app setParam vg_model_name [$vg_model_file_name getCurrentValue]
set returnCode [$app invoke]
}
$save_vg_model_form destroy
$app destroy
