GuidoForm usageSettings {
-default_buttons
-label "GEOVIA Product Improvement Program"
-layout BoxLayout Y_AXIS
-tip "FRM_USAGESETTINGS_1"
GuidoPanel join_panel {
-layout BoxLayout Y_AXIS
-border etched true
-width 50
-height 8
GuidoHTMLPane joinText {
-default USAGE_SETTINGS_JOIN_PROGRAM_TEXT
}
}
GuidoFiller space {
-height 0.5
}
GuidoPanel panel1 {
-layout CentrelineLayout
GuidoCheckBox joinBox {
-label "I would like to participate"
-selected_value Y
-tip "FRM_USAGESETTINGS_2"
-unselected_value N
}
}
GuidoFiller space {
-height 0.5
}
GuidoPanel contact_panel {
-layout BoxLayout Y_AXIS
-border etched true
-width 50
-height 6
GuidoHTMLPane contactText {
-default USAGE_SETTINGS_PRIVATE_TEXT
}
}
GuidoFiller space {
-height 0.5
}
GuidoPanel panel2 {
-layout CentrelineLayout
GuidoCheckBox contactBox {
-label "Provide contact information"
-selected_value Y
-tip "FRM_USAGESETTINGS_3"
-unselected_value N
}
GuidoComboBox jobFunction {
-label "Job function"
-max_length 40
-width 15
-value_in "Survey" "Geology" "Engineering" "Other"
-tip "FRM_USAGESETTINGS_4"
}
}
GuidoFiller space {
-height 0.5
}
$joinText setCurrentValue [GuidoMessage translate USAGE_SETTINGS_JOIN_PROGRAM_TEXT]
$contactText setCurrentValue [GuidoMessage translate USAGE_SETTINGS_PRIVATE_TEXT]
}
