# $XConsortium: ToggleBGad4.scr /main/6 1995/07/17 20:07:23 drk $

# 

# Motif

#

# Copyright (c) 1987-2012, The Open Group. All rights reserved.

#

# These libraries and programs are free software; you can

# redistribute them and/or modify them under the terms of the GNU

# Lesser General Public License as published by the Free Software

# Foundation; either version 2 of the License, or (at your option)

# any later version.

#

# These libraries and programs are distributed in the hope that

# they will be useful, but WITHOUT ANY WARRANTY; without even the

# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR

# PURPOSE. See the GNU Lesser General Public License for more

# details.

#

# You should have received a copy of the GNU Lesser General Public

# License along with these librararies and programs; if not, write

# to the Free Software Foundation, Inc., 51 Franklin Street, Fifth

# Floor, Boston, MA 02110-1301 USA

# 

# 

# HISTORY

# 

# The toggle buttons in this test are part of the same tab group.  Put 

# the pointer over the top toggle button. Press the space bar to activate it.

# The pixmap changes and the indicator fills. 

LocatePointer TButton1

ClickKey KSpace

CompareVisual TButton1

# C)

Continue

# Press the down arrow key twice so Toggle 3 is highlighted. 

LocatePointer TButton1

ClickKey KDown

ClickKey KDown

# Hit the spacebar key (in Toggle 3). A new button will appear. 

# Its highlightThickness will be 4. 

ClickKey KSpace

CompareVisual PanedWindow1

# Resize the window larger so you can see the entire button label. 

WindowResize Shell1 SouthEast 300 200

CompareVisual PanedWindow1

# C)

Continue

# Hit the tab key to move to the More Widgets... button. 

LocatePointer TButton3

ClickKey KTab

# Hit the spacebar key, and two things should happen:  The button's label

# changes to Toggle Gadget States and Toggle Widgets 1 and 2 appear in 

# a new pane. Toggle Widget 2 will have a highlightThickness of 4. 

ClickKey KSpace

CompareVisual StateButton1

# The push button will now reset the state of the toggle buttons in 

# the top pane. Use the spacebar key to activate the button.

# Each time you press the Toggle States button, the toggle buttons which

# were ON will switch OFF and vice-versa. 

CompareVisual WidgetRC

ClickKey KSpace

CompareVisual TButton3

ClickKey KSpace

CompareVisual TButton2

# C)

Continue

# Hit the tab key twice to get to the bottom pane. Press the down arrow

# key and use the spacebar key to depress the Toggle Widget 2 button. 

LocatePointer TButton3

ClickKey KTab

ClickKey KTab

ClickKey KDown

ClickKey KSpace

CompareVisual ToggleW2

# Use the up arrow key to return to Toggle Widget 1. Hit the spacebar key. 

ClickKey KUp

ClickKey KSpace

CompareVisual StateButton2

# A new button called Toggle Widget States... has appeared. 

CompareVisual StateButton2

# Hit the Shift-tab key to reach the bottom pane. You can

# use this button to toggle the states of the widgets in the 

# pane just above it, as you did earlier. 

ClickKey <Shift> KTab

ClickKey KSpace

CompareVisual ToggleW1

# C)

Continue

# E)

Exit