Blob Blame History Raw
# $XConsortium: Baseline1a.scr /main/4 1995/07/17 20:24:20 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 Shell widget for this test has been created with layout
# direction set as Right-to-Left.
# #) A client which contains a Frame with a label as the title child
#    should appear. The full labelString \"Alignment String\" should
#    be visible.
CompareVisual Frame1
Continue

# #) A new label with the labelString \"Another Label\" should
#    appear. This is an now the title_child be use as the
#    Frame's title. This label should be layered on top
#    on the original title child which is now set as
#    generic child (done by toolkit).
CompareVisual Frame1
Continue

# #) The first label should again be use as the title child.
# #) A ScrolledText widget with text should appear. The shadowThickness
#    on the Frame should be 10, and the title labelString should be
#    \"Alignment String\". It should centered both within the window
#    and within the Frame.
CompareVisual ScrolledText1
Continue

# #) The marginWidth and marginHeight of the Frame should now change to
#    be 20.
CompareVisual Frame1
Continue

# #) A BulletinBoard dialog with three RadioBoxs and a Scale for
#    shadowThickness should appear.
# #) The toggle graphics should appear to the right of the toggle labels.
# #) The string alignment should be set to the right for the scale and the
# lowest scale value should be on the right.
# #) Type a multiple line string into the Text widget in the control panel, and cl
# ick the \"Apply String\" button.
# #) Use the first RadioBox to change the Label's childVerticalAlignment.
LocatePointer Text
ClickMB Btn1
InputString "Here today\nGone tomorrow"
LocatePointer ApplyBtn
ClickMB Btn1
LocatePointer Toggle3
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1
ClickMB Btn1
LocatePointer Toggle5
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle4
ClickMB Btn1
ClickMB Btn1
CompareVisual Frame1

# #) Use the second RadioBox to change the Frames's shadowType.
LocatePointer Toggle4a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle3a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1a
ClickMB Btn1
CompareVisual Frame1

# #) Use the the third RadioBox to change the Label's
#    childHorizontalAlignment.  Since the layout direction is Right-to-Left,
#    the label should align to the right when childHorizontalAlignment is set to
#    the XmALIGNMENT_BEGINNING and the label should align to the left when
#    childHorizontalAlignment is set to XmALIGNMENT_END.

LocatePointer Toggle3b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1b
ClickMB Btn1
CompareVisual Frame1

# #) Use the Scale to change the Frame's shadowThickness.
LocatePointer   Scale1  RScaleSlider
DragSliderValue Right   Max
WindowRaise Shell1
CompareVisual Frame1
DragSliderValue Left 10
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Left    Min
DragSliderValue Right 6
CompareVisual Frame1

Continue

# #) The Font of the Label should change to be 9x15bold.
# #) Use the control panel to change all of the resources.
LocatePointer Toggle3
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1
ClickMB Btn1
LocatePointer Toggle5
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle4
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle4a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle3a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle3b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1b
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Right   Max
WindowRaise Shell1
CompareVisual Frame1
DragSliderValue Left 11
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Left    Min
DragSliderValue Right 12
CompareVisual Frame1
Continue

# #) The labelString of the Frame title should change to
#    \"Motif\\n Scrolled Text Widget\" it should appear on two lines.
#    It should be centered within the Frame.
# #) Use the control panel to change all of the resources.
LocatePointer Toggle3
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1
ClickMB Btn1
LocatePointer Toggle5
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle4
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle4a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle3a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle3b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1b
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Right   Max
WindowRaise Shell1
CompareVisual Frame1
DragSliderValue Left 9
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Left    Min
DragSliderValue Right 9
CompareVisual Frame1

Continue

# #) The Label's childType resources should change to FRAME_GENERIC_CHILD.
#    This will make the cause the Label not to be a title for the Frame.
# #) Use the control panel to change all of the resources. This should
#    have no effect (except shadowThickness and shadowType).
LocatePointer Toggle3
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1
ClickMB Btn1
LocatePointer Toggle5
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle4
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle4a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle3a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1a
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle3b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle2b
ClickMB Btn1
CompareVisual Frame1
LocatePointer Toggle1b
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Right   Max
WindowRaise Shell1
CompareVisual Frame1
DragSliderValue Left 13
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Frame1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Left    Min
DragSliderValue Right   21
CompareVisual Frame1

Continue

# #) The Label will be destroyed, and a text widget with the string
#    \"You can even use a Text Widget\" will now be created with its
#    childType being FRAME_TITLE_CHILD. The Text widget is aligned
#    at the end of the Frame, which should display to the left of the Frame.
# #) Use the control panel to change all of the resources, which are now
#    applicable to the Text widget and the Frame.
LocatePointer Toggle3
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle2
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle1
ClickMB Btn1
LocatePointer Toggle5
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle4
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle4a
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle3a
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle2a
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle1a
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle3b
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle2b
ClickMB Btn1
CompareVisual Text1
LocatePointer Toggle1b
ClickMB Btn1
CompareVisual Text1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Right   Max
WindowRaise Shell1
CompareVisual Text1
DragSliderValue Left 11
CompareVisual Text1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Text1
LocatePointer   Scale1  RScaleDownOrRightSliderArea
ClickMB Btn1
CompareVisual Text1
LocatePointer   Scale1  RScaleSlider
DragSliderValue Left    Min
DragSliderValue Right   2
CompareVisual Text1

Exit