Blame tests/Toolkit/Buttons/ToggleBtn7b.scr

Packit b099d7
Packit b099d7
Packit b099d7
# @)  For this testcase, three ToggleButtons and three ToggleButtonGadgets
Packit b099d7
# are created, with default resources, as children of a Form
Packit b099d7
# widget. All six toggle buttons should be displayed with the three
Packit b099d7
# ToggleButton widgets displayed in a vertical column on the left
Packit b099d7
# and the three ToggleButtonGadgets are displayed in a vertical
Packit b099d7
# column on the right.  A second window should be displayed
Packit b099d7
# containing menus for setting certain toggle button resources.
Packit b099d7
# The XmDisplay resource, XmNenableToggleVisual, has been set to
Packit b099d7
# True.
Packit b099d7
Packit b099d7
# #)  Verify that the indicators for all the ToggleButtons and the
Packit b099d7
# ToggleButtonGadgets are displayed as unfilled rectangles. 
Packit b099d7
# The default values of the XmNindicatorOn and XmNindicatorType
Packit b099d7
# resources will be printed to stdout for both the ToggleButtons and
Packit b099d7
# the ToggleButtonGadgets.  Verify that the default values printed
Packit b099d7
# in both cases are as follows: 
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# @)  XmNindicatorType = XmN_OF_MANY
Packit b099d7
# @)  XmNindicatorOn = XmINDICATOR_FILL
Packit b099d7
Packit b099d7
# #)  Click MB1 on each of the ToggleButton indicators in the
Packit b099d7
# left column.  Verify that each indicator is redisplayed as a
Packit b099d7
# checkmark within a box after it is selected.  In addition,
Packit b099d7
# verify that all the indicators display a checkmark within
Packit b099d7
# a box after all of the indicators have been clicked on.
Packit b099d7
# Perform the same test on the ToggleButtonGadget indicators
Packit b099d7
# in the right column. 
Packit b099d7
Packit b099d7
LocatePointer ToggleButton0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorOn resource to XmINDICATOR_CHECK_BOX.
Packit b099d7
# This will set the XmNindicatorOn resource to XmINDICATOR_CHECK_BOX
Packit b099d7
# for all the ToggleButtons and ToggleButtonGadgets.
Packit b099d7
# Verify that all of the toggle buttons indicators continue to display 
Packit b099d7
# a checkmark within a box.
Packit b099d7
Packit b099d7
LocatePointer IndicatorOnOptions ROptionButton
Packit b099d7
PressMB Btn1
Packit b099d7
LocatePointer IndicatorOnPB4
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorOn resource to XmINDICATOR_BOX.
Packit b099d7
# Verify that all of the toggle buttons indicators display 
Packit b099d7
# as filled rectangles.
Packit b099d7
Packit b099d7
LocatePointer IndicatorOnOptions ROptionButton
Packit b099d7
PressMB Btn1
Packit b099d7
LocatePointer IndicatorOnPB2
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
#C)
Packit b099d7
Continue
Packit b099d7
Packit b099d7
# #)  Click MB1 on each of the ToggleButton and ToggleButtonGadget
Packit b099d7
# indicators.  Verify that the indicators for each of the toggle
Packit b099d7
# buttons display as an unfilled rectangular box. 
Packit b099d7
Packit b099d7
LocatePointer ToggleButton0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorType resource to XmONE_OF_MANY. 
Packit b099d7
# Verify that all of the toggle buttons indicators display 
Packit b099d7
# as an unfilled circle.
Packit b099d7
Packit b099d7
LocatePointer IndicatorTypeOptions ROptionButton
Packit b099d7
PressMB Btn1
Packit b099d7
LocatePointer IndicatorTypePB1
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# #)  Click MB1 on each of the ToggleButton and ToggleButtonGadget
Packit b099d7
# indicators.  Verify that only the most recently selected toggle
Packit b099d7
# button indicator displays as a filled circle while all other
Packit b099d7
# toggle button indicators, whether they were previously selected or not,
Packit b099d7
# display as unfilled circles.  
Packit b099d7
Packit b099d7
LocatePointer ToggleButton0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorType resource to XmONE_OF_MANY_ROUND. 
Packit b099d7
# Verify that all of the toggle buttons indicators continue to display 
Packit b099d7
# as circles.  In addition, only the last selected indicator should
Packit b099d7
# be displayed as a filled circle, while all of the other indicators
Packit b099d7
# should be displayed as an unfilled circle.
Packit b099d7
Packit b099d7
LocatePointer IndicatorTypeOptions ROptionButton 
Packit b099d7
PressMB Btn1 
Packit b099d7
LocatePointer IndicatorTypePB2
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
#C)
Packit b099d7
Continue
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorType resource to XmONE_OF_MANY_DIAMOND. 
Packit b099d7
# Verify that all of the toggle buttons indicators display 
Packit b099d7
# as diamonds.  In addition, only the last selected indicator should
Packit b099d7
# be displayed as a filled diamonds, while all of the other indicators
Packit b099d7
# should be displayed as an unfilled diamonds.
Packit b099d7
Packit b099d7
LocatePointer IndicatorTypeOptions ROptionButton 
Packit b099d7
PressMB Btn1 
Packit b099d7
LocatePointer IndicatorTypePB2
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# @)  Three ToggleButtons and three ToggleButtonGadget are created,
Packit b099d7
# with default resources, as children of a RadioBox.  The ToggleButtons
Packit b099d7
# are displayed vertically on the left and the ToggleButtonGadgets
Packit b099d7
# are displayed vertically on the right.
Packit b099d7
Packit b099d7
# #)  Verify that all indicators for both the ToggleButtons and the
Packit b099d7
# ToggleButtonGadgets are displayed as unfilled, shadowed circles. 
Packit b099d7
# The default values of the XmNindicatorOn and XmNindicatorType
Packit b099d7
# resources will be printed to stdout for both the ToggleButtons and
Packit b099d7
# the ToggleButtonGadgets.  Verify that the default values printed
Packit b099d7
# in both cases are as follows: 
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# @)  XmNindicatorOn = XmONE_OF_MANY
Packit b099d7
# @)  XmNindicatorType = XmINDICATOR_FILL
Packit b099d7
Packit b099d7
# #)  Click MB1 on each of toggle button indicators.  Verify that
Packit b099d7
# the most recently selected indicator is displayed as a circle
Packit b099d7
# containing a checkmark within a box and that all other indicators
Packit b099d7
# are displayed as unfilled circles.
Packit b099d7
Packit b099d7
LocatePointer ToggleButton0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorType resource to XmONE_OF_MANY_ROUND. 
Packit b099d7
# Verify that all of the toggle button indicators continue to display 
Packit b099d7
# as circles.  In addition, only the last selected indicator should
Packit b099d7
# be displayed as a circle containing a checkmark within a box. All
Packit b099d7
# the remaining toggle button indicators should display as an 
Packit b099d7
# unfilled circle.
Packit b099d7
Packit b099d7
LocatePointer IndicatorTypeOptions ROptionButton 
Packit b099d7
PressMB Btn1 
Packit b099d7
LocatePointer IndicatorTypePB2
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
#C)
Packit b099d7
Continue
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorType resource to XmONE_OF_MANY_DIAMOND. 
Packit b099d7
# Verify that all of the toggle button indicators display 
Packit b099d7
# as diamonds.  In addition, only the last selected indicator should
Packit b099d7
# be displayed as a diamond containing a checkmark within a box. All
Packit b099d7
# the remaining toggle button indicators should display as an 
Packit b099d7
# unfilled diamond.
Packit b099d7
Packit b099d7
LocatePointer IndicatorTypeOptions ROptionButton 
Packit b099d7
PressMB Btn1 
Packit b099d7
LocatePointer IndicatorTypePB3
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# #)  In the window titled \"Resource Control Panel\", set the
Packit b099d7
# value of the XmNindicatorType resource to XmN_OF_MANY. 
Packit b099d7
# Verify that all of the toggle button indicators display 
Packit b099d7
# as rectangles.  In addition, only the last selected indicator should
Packit b099d7
# be displayed as a filled rectangle containing a checkmark within a box.
Packit b099d7
# All the remaining toggle button indicators should display as 
Packit b099d7
# unfilled rectangles.
Packit b099d7
Packit b099d7
LocatePointer IndicatorTypeOptions ROptionButton 
Packit b099d7
PressMB Btn1 
Packit b099d7
LocatePointer IndicatorTypePB0
Packit b099d7
ReleaseMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# #)  Click MB1 on each of the indicators that are currently
Packit b099d7
# displayed as unfilled rectangles. Verify that each indicator
Packit b099d7
# is redisplayed as a rectangle containing a checkmark within
Packit b099d7
# a box upon being selected. In addition, verify that after all 
Packit b099d7
# of the unfilled toggle buttons have been selected, that all
Packit b099d7
# of the toggle buttons display a checkmark within a box. 
Packit b099d7
Packit b099d7
LocatePointer ToggleButton0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButton2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget0
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget1
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
LocatePointer ToggleButtonGadget2
Packit b099d7
ClickMB Btn1
Packit b099d7
Packit b099d7
CompareVisual Manager1
Packit b099d7
Packit b099d7
# C)
Packit b099d7
Continue
Packit b099d7
Packit b099d7
# E)
Packit b099d7
Exit
Packit b099d7