# $XConsortium: DiaShell1.scr /main/5 1995/07/17 20:38:29 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
# 

# Test PIR4340

LocatePointer SystemDia1
CompareVisual SystemDia1
LocatePointer  SystemDia1  ROkButton
ClickMB  Btn1
# This is just to check if SystemDia1 has been unmanaged
LocatePointer SystemDia1
# End test PIR4340

Continue

Continue

WindowMove  MessageBox1  300 300
WindowMove  MessageBox2  10 350
WindowMove  MessageBox3  10 200
CompareVisual  MessageBox1
CompareVisual  MessageBox2
CompareVisual  MessageBox3

WindowIconify  Shell1
WindowDeiconify  Shell1

Continue

LocatePointer  MessageBox1  ROkButton
ClickMB  Btn1
LocatePointer  MessageBox2  ROkButton
ClickMB  Btn1
LocatePointer  MessageBox3  ROkButton
ClickMB  Btn1

#
# The following three locates are to test that the MessageBoxes have
# really disappeared from the display. If they have disappeared, each
# of the three locates below should generate a warning in the output
# file.
#
LocatePointer  MessageBox1  ROkButton
LocatePointer  MessageBox2  ROkButton
LocatePointer  MessageBox3  ROkButton

Continue

CompareVisual  Dialog1
CompareVisual  BulletinBoard
CompareVisual  fontLabel1
CompareVisual  fontLabel2
CompareVisual  fontLabel3

Continue

#
# There should be a control panel with pushbuttons "Create FormDialog1",
# "Manage FormDialog1", "Unmanage FormDialog1".
#

CompareVisual  Shell1
CompareVisual  BB1

Continue

LocatePointer  CreateForm
ClickMB	 Btn1
LocatePointer  ManageForm
ClickMB	 Btn1

CompareVisual  FormDialog1
WindowMove  FormDialog1  200 200
LocatePointer  Post_FormDialog2
ClickMB  Btn1
CompareVisual  FormDialog2

Continue

LocatePointer  UnmanageForm
ClickMB  Btn1

#
# The following two locates are just to test that both the formdialogs
# have disappeared from the display. Each of these ahould produce a
# warning in the output file.
#

LocatePointer  FormDialog1
LocatePointer  FormDialog2

LocatePointer  ManageForm
ClickMB	 Btn1

#
# The following two locates are just to test that both the formdialogs
# have reappeared from the display. If either of them has not reappeared,
# there should be a corresponding warning in the output file.
#

LocatePointer  FormDialog1
CompareVisual  FormDialog1
LocatePointer  FormDialog2

#
# The following two commands should generate a warning in the output file
# saying "FormDialog2 already managed".
#
LocatePointer  Post_FormDialog2
ClickMB  Btn1

Continue

Exit