# $XConsortium: OptionMenu2.scr /main/5 1995/07/17 20:26:57 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
# 


# A client window will appear with an Option Menu.  The Option Menu
#  will have a label named Option with the 'o' in Option underlined,
#  and a CascadeButton labeled Experience Hackerungnen.  The Shell
#  will be located 50 pixels from the top left corner of the display. 

CompareVisual optionMenu

# Press and hold MB3 on the Selection Area (Experience Hackerungnen).
#  A Pulldown Menu labeled Menu1 will appear. Release MB3. 

LocatePointer optionMenu ROptionButton
PressMB Btn3
CompareVisual PullDown1
ReleaseMB Btn3
Continue

# Press and hold MB3 on the Selection Area (Experience Hackerungnen).
#  The label for ShortBtn1 (the topmost button in Menu1) will be the
#  circles pixmap.  The label for MediumLength (the second button in Menu1)
#  will be the gnu pixmap. 

LocatePointer optionMenu ROptionButton
PressMB Btn3
CompareVisual PullDown1

# Drag the pointer up to the top selection and release MB3.  Menu1 will
#  disappear and the circles pixmap will appear in the Selection Area. 

LocatePointer Short
ReleaseMB Btn3

# Again, press and hold MB3 on the Selection Area (circles pixmap).
#  Verify that each entry in Menu1, when selected, becomes the entry which
#  appears in the Selection Area.  

LocatePointer optionMenu ROptionButton
PressMB Btn3
LocatePointer MediumLength
ReleaseMB Btn3
CompareVisual optionMenu

LocatePointer optionMenu ROptionButton
PressMB Btn3
LocatePointer TennesseeJed
ReleaseMB Btn3
CompareVisual optionMenu


# Select the gnu pixmap so that it is displayed in the Selection Area.
# In the next panel, XmNsensitive for the Option Menu will be set to False.

LocatePointer optionMenu ROptionButton
PressMB Btn3
LocatePointer MediumLength
ReleaseMB Btn3
Continue


# XmNsensitive has been set to False for the Option Menu. The gnu pixmap
#   should still be displayed in the Selection Area. If the Selection Area
#   is blank, CR 5475 hasn't been fixed.


CompareVisual optionMenu
Continue

# The shadow thickness of the Selection Area will now be set to 4. 

CompareVisual optionMenu
Continue


# The OptionMenu will now contain many many entries.   
# Select pushbutton15.  Then select pushbutton16.  The menu should not move
#  position. 

LocatePointer optionMenu ROptionButton
PressMB Btn3
LocatePointer PushButton15
ReleaseMB Btn3
LocatePointer optionMenu ROptionButton
PressMB Btn3
LocatePointer PushButton16
CompareVisual PullDown1
ReleaseMB Btn3


Exit