# $XConsortium: HorPanedWin1.scr /main/4 1995/07/17 20:32:22 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 with a Paned Window with three pushbuttons labeled
#  PushButton1, PushButton2, and PushButton3 will appear. 
#  The Paned Window should be horizontal.
#  The space on all 4 sides between the PanedWindow and its children should
#  be 20 pixels.
#  The sash width and height should be 10.
#  The sashes should be offset 15 pixels from the top of the PanedWindow.
#  The shadow thickenss of the sashes should be 5 pixels.
#  The panes should have separators between them.
#  The distance between each child pane should be 25 pixels.

CompareVisual PanedWindow1
Continue

#  Press and hold MB1 on the leftmost sash. Drag the pointer to the
#  right extreme of the client window.  Release MB1.
#  - the leftmost pane should expand.
#  - the middle pane should contract.
#  - the rightmost pane should contract.
#  - Pushbutton1 should be visible. 


LocatePointer PanedWindow1 RSash 0
DragXYRelative Right 100
CompareVisual PanedWindow1
 
#  Press and hold MB1 on the leftmost sash.  Drag the pointer to the
#  left extreme of the client window.  Release MB1.
#    - the leftmost pane should contract
#    - the middle pane should expand
#    - the rightmost pane should be unchanged
#    - Pushbutton2 should be visible. 



LocatePointer PanedWindow1 RSash 0
DragXYRelative Left 100
CompareVisual PanedWindow1

#  Press and hold MB1 on the rightmost sash.  Drag the pointer to the
#  left extreme of the client window.  Release MB1.
#    - the leftmost pane should be unchanged.
#    - the middle pane should contract.
#    - the rightmost pane should expand.
#    - Pushbutton3 should be visible. 

LocatePointer PanedWindow1 RSash 1
DragXYRelative Right 100
CompareVisual PanedWindow1
Continue

#  Try to resize PushButton2. It should enforce a minumum and a maximum size
#  of 100 and 150 pixels respectively.
#  Resize the client window several times. PushButton3 should not change
#  in width.

LocatePointer PanedWindow1 RSash 1
DragXYRelative Right 100
DragXYRelative Left 100
CompareVisual PanedWindow1

WindowMove Shell1 100 100

WindowResize Shell1 NorthEast 500 500
WindowRaise Shell1
CompareVisual PanedWindow1
WindowRaise Shell1
WindowResize Shell1 SouthWest 200 200
WindowRaise Shell1
CompareVisual PanedWindow1
WindowResize Shell1 SouthEast 100 100
WindowRaise Shell1
CompareVisual PanedWindow1
Continue




# PushButton1 should've grown to 500x500 pixels.

WindowRaise Shell1
CompareVisual PanedWindow1
Exit