# $XConsortium: Menu4.scr /main/5 1995/07/17 20:26:04 drk $
# 
# @OPENGROUP_COPYRIGHT@
# COPYRIGHT NOTICE
# Copyright (c) 1990, 1991, 1992, 1993 Open Software Foundation, Inc.
# Copyright (c) 1996, 1997, 1998, 1999, 2000 The Open Group
# ALL RIGHTS RESERVED (MOTIF). See the file named COPYRIGHT.MOTIF for
# the full copyright text.
# 
# This software is subject to an open license. It may only be
# used on, with or for operating systems which are themselves open
# source systems. You must contact The Open Group for a license
# allowing distribution and sublicensing of this software on, with,
# or for operating systems which are not Open Source programs.
# 
# See http://www.opengroup.org/openmotif/license for full
# details of the license agreement. Any use, reproduction, or
# distribution of the program constitutes recipient's acceptance of
# this agreement.
# 
# EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, THE PROGRAM IS
# PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
# KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT LIMITATION, ANY
# WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT, MERCHANTABILITY
# OR FITNESS FOR A PARTICULAR PURPOSE
# 
# EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, NEITHER RECIPIENT
# NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY DIRECT,
# INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
# DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED
# AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
# ANY WAY OUT OF THE USE OR DISTRIBUTION OF THE PROGRAM OR THE
# EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGES.
# 
# 
# HISTORY
# 


# A client window will appear with two row column widgets.  The
#  top row column widget will contain six pushbutton widgets, and
#  the bottom one will contain two option menu widgets. 

# The xterm window will contain four X Toolkit Warning messages.
#  The messages will provide the following information:

#     - Unknown value of XmNorientation: using default instead
#     - Unknown value of XmNpacking: using default instead
#     - Unknown value of XmNrowColumnType: defaulting to WorkArea
#     - Unknown value of XmNentryAlignment: using default instead 

CompareVisual rc0

# Give focus to the client window. 

LocatePointer button1

# Select "button1" with MB1.  "button1" will be set insensitive. 
#  Two X Toolkit Warning messages will be printed in the xterm window.  
#  They will provide the following information:

#    - Attempt to set XmNorientation to unknown value ignored
#    - Attempt to change XmNrowColumnType after initialization: ignored

ClickMB Btn1
CompareVisual button1
Continue

# Give focus to the client window. 

LocatePointer button2

# Select "button2" with MB1.  The pushbuttons in the top row
#  column widget will now be aligned in two columns of three
#  widgets each.  "button2"  will be set insensitive. 

ClickMB Btn1
CompareVisual rc1

# Select "button3" with MB1.  The six pushbutton widgets will
#  move down from the top of the top row column widget.  "button3
#  will be set insensitive. 

LocatePointer button3
ClickMB Btn1
CompareVisual rc1

# Select "button4" with MB1.  The six pushbutton widgets will
#  move further to the right of the top row column widget.
#  "button4" will be set insensitive. 

LocatePointer button4
ClickMB Btn1
CompareVisual rc1

# Select "button5" with MB1.  The six pushbutton widgets will
#  move apart from each other.  "button5" will be set insensitive. 

LocatePointer button5
ClickMB Btn1
CompareVisual rc1

# Select "button6" with MB1.  The six pushbutton widgets will
#  move further apart from eachother.  "button6" will be set
#  insensitive. 

LocatePointer button6
ClickMB Btn1
CompareVisual rc1

# Make sure the focus moves to the option1a button. 

CompareVisual Shell1
Continue

# Give focus to the client window. 

# Click and hold down MB1 on the pushbutton opposite the label
#  "OptionMenu1".  A pulldown menu will appear.  Slide the pointer
#  down to any of the options in the menu and release MB1.  A
#  message indicating the option chosen will be printed to the
#  xterm window, and the option chosen will be printed on the
#  face of the pushbutton. 

LocatePointer option_menu1 ROptionButton
PressMB Btn1
LocatePointer option3a
ReleaseMB Btn1

# Performing the previous step with "OptionMenu2" will have the
#  same results. 

LocatePointer option_menu2 ROptionButton
PressMB Btn1
LocatePointer option4b
ReleaseMB Btn1
CompareVisual Shell1

Continue
Exit