|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
# Motif
|
|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
# Copyright (c) 1987-2012, The Open Group. All rights reserved.
|
|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
# These libraries and programs are free software; you can
|
|
Packit |
b099d7 |
# redistribute them and/or modify them under the terms of the GNU
|
|
Packit |
b099d7 |
# Lesser General Public License as published by the Free Software
|
|
Packit |
b099d7 |
# Foundation; either version 2 of the License, or (at your option)
|
|
Packit |
b099d7 |
# any later version.
|
|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
# These libraries and programs are distributed in the hope that
|
|
Packit |
b099d7 |
# they will be useful, but WITHOUT ANY WARRANTY; without even the
|
|
Packit |
b099d7 |
# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
|
Packit |
b099d7 |
# PURPOSE. See the GNU Lesser General Public License for more
|
|
Packit |
b099d7 |
# details.
|
|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
# You should have received a copy of the GNU Lesser General Public
|
|
Packit |
b099d7 |
# License along with these librararies and programs; if not, write
|
|
Packit |
b099d7 |
# to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
|
|
Packit |
b099d7 |
# Floor, Boston, MA 02110-1301 USA
|
|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
# HISTORY
|
|
Packit |
b099d7 |
#
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# $XConsortium: ToggleBtn5.scr /main/4 1995/07/13 17:33:25 drk $
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# Begin CR 5303
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# A bulletin board containing 4 toggle buttons is created. The initial
|
|
Packit |
b099d7 |
# spacing (XmNspacing) is set to 4. The purpose of the test is to make
|
|
Packit |
b099d7 |
# sure that reducing and increasing the spacing works. This tests CR5303.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# First click MB1 on ToggleButton1. The spacing should increase to 50.
|
|
Packit |
b099d7 |
# The spacing value for each button is printed on the calling xterm.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# Next click MB1 on ToggleButton2. The spacing should DECREASE to 5.
|
|
Packit |
b099d7 |
# The spacing value for each button is printed on the calling xterm.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# Next click MB1 on ToggleButton3. The spacing should increase to 100.
|
|
Packit |
b099d7 |
# The spacing value for each button is printed on the calling xterm.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# Finally, click MB1 on ToggleButton4. The spacing should DECREASE to 75.
|
|
Packit |
b099d7 |
# The spacing value for each button is printed on the calling xterm.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
LocatePointer ToggleButton1
|
|
Packit |
b099d7 |
ClickMB Btn1
|
|
Packit |
b099d7 |
CompareVisual ToggleButton1
|
|
Packit |
b099d7 |
LocatePointer ToggleButton2
|
|
Packit |
b099d7 |
ClickMB Btn1
|
|
Packit |
b099d7 |
CompareVisual ToggleButton2
|
|
Packit |
b099d7 |
LocatePointer ToggleButton3
|
|
Packit |
b099d7 |
ClickMB Btn1
|
|
Packit |
b099d7 |
CompareVisual ToggleButton3
|
|
Packit |
b099d7 |
LocatePointer ToggleButton4
|
|
Packit |
b099d7 |
ClickMB Btn1
|
|
Packit |
b099d7 |
CompareVisual ToggleButton4
|
|
Packit |
b099d7 |
Continue
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# End CR 5303
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# A bulletin board containg 6 children is created, 1 ToggleButton, one
|
|
Packit |
b099d7 |
# Lable, and 4 PushButtons. They are arranged in two rows of three.
|
|
Packit |
b099d7 |
# The top row contains the Toggle, Lable and one Pushbutton. Clicking
|
|
Packit |
b099d7 |
# MB1 on the corresponding PushButton below will change the XmNy resource
|
|
Packit |
b099d7 |
# and move the children below the 'Move' PushButtons. The children
|
|
Packit |
b099d7 |
# should NOT change size. This test corresponds to CR 5163 (ToggleButton
|
|
Packit |
b099d7 |
# resizes to minimum when changing any resource).
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# First click MB1 on "Move TglBtn1". The "ToggleButton1" child should
|
|
Packit |
b099d7 |
# move below the "Move TglBtn1" PushButton but should NOT change size.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# Next, click MB1 on "Move PushBtn1". The "PushButton1" child should
|
|
Packit |
b099d7 |
# move below the "Move PushBtn" PushButton but should NOT change size.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# Finally, click MB1 on "Move Lbl1". The "Lable1" child should
|
|
Packit |
b099d7 |
# move below the "Move Lbl1" PushButton but should NOT change size.
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
LocatePointer PushButtonMove1
|
|
Packit |
b099d7 |
ClickMB Btn1
|
|
Packit |
b099d7 |
CompareVisual ToggleButton1
|
|
Packit |
b099d7 |
LocatePointer PushButtonMove2
|
|
Packit |
b099d7 |
ClickMB Btn1
|
|
Packit |
b099d7 |
CompareVisual PushButton1
|
|
Packit |
b099d7 |
LocatePointer PushButtonMove3
|
|
Packit |
b099d7 |
ClickMB Btn1
|
|
Packit |
b099d7 |
CompareVisual Label1
|
|
Packit |
b099d7 |
Continue
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
# End CR 5163
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Exit
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|