# $XConsortium: Navigation1.scr /main/5 1995/07/17 20:43:33 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
# 

# Case 1
#) A 1.1 Paned Window with buttons. Depress each button
#   using the space key. Focus should go to   sash after each button.
#) Move any sash with the up or down
#   arrow keys. If you hold down the key, the sash will cause
#   other sashes to move with it as it reaches them.

WindowFocus Shell1
CompareVisual button1
ClickKey KSpace
CompareVisual manager1
ClickKey KTab
ClickKey KSpace
CompareVisual manager1
ClickKey KTab
ClickKey KSpace
ClickKey KTab
ClickKey KSpace
ClickKey KTab
ClickKey KSpace
ClickKey KTab
ClickKey KSpace
CompareVisual manager1
Continue

# Case 2
#) A 1.0 Paned Window with buttons. Focus should go to
#   next button in the paned window. 
#) Make every button insensitive,
#   then resize slightly to see everything. Note carefully
#   where the focus goes after each button is un-sensitized.

WindowFocus Shell1
CompareVisual mainWindow
ClickKey KSpace
CompareVisual manager1
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
CompareVisual manager1
ClickKey KSpace
CompareVisual manager1
CompareVisual rc2
Continue

# CASE 2a 
# A 1.1 Paned Window with EXCLUSIVE_TAB_GROUP manager children.
# Use the Tab key to move the focus from one tab group to another,
# and the arrow keys to move between the children in the row columns.
# You should not tab to the sash.

WindowFocus Shell1
CompareVisual manager1
ClickKey KTab
ClickKey KTab
ClickKey KTab
CompareVisual manager1
ClickKey KDown
ClickKey KDown
CompareVisual manager1
Continue

# Case 3
#) Execute this test just like the previous one. The only difference is 
#   that this Paned Window
#   is a 1.1-style widget. Make each button insensitive and check
#   where the focus goes.

WindowFocus Shell1
CompareVisual mainWindow
LocatePointer button1
ClickMB Btn1
CompareVisual manager1
ClickKey KTab
ClickKey KSpace
CompareVisual manager1
ClickKey KTab
ClickKey KSpace
ClickKey KTab
ClickKey KSpace
ClickKey KTab
ClickKey KSpace
ClickKey KTab
ClickKey KSpace
CompareVisual manager1
Continue

# Case 4
#) A 1.0 Paned Window in a Form parent. Make sure space
#   activates the buttons.

WindowFocus Shell1
CompareVisual mainWindow
ClickKey KSpace
CompareVisual manager1
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
CompareVisual manager1
ClickKey KSpace
CompareVisual manager1
Continue

# Case 5
#) A RowColumn. Focus should start on button1, and move to the next button
#   as each becomes insensitive. Use the space key to make buttons insensitive.

WindowFocus Shell1
CompareVisual manager1
ClickKey KSpace
ClickKey KSpace
CompareVisual manager1
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
CompareVisual manager1
Continue

# Case 6
#) The RowColumn's children were destroyed and recreated. Focus should appear
#on a button as soon as you give the window focus. Move among the buttons and
#make them insensitive.

WindowFocus Shell1
CompareVisual manager1
ClickKey KSpace
ClickKey KSpace
CompareVisual manager1
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
ClickKey KSpace
CompareVisual manager1
Continue

# Case 7
#) The RowColumn's children were destroyed and recreated. Focus should appear
#on a button as soon as you give the window focus. Now, pressing a button will
#change its label but not make it insensitive. Traverse around using arrow
#keys and make sure highlight moves properly.

WindowFocus Shell1
CompareVisual manager1
ClickKey KDown
ClickKey KDown
ClickKey KDown
CompareVisual manager1
ClickKey KDown
ClickKey KDown
ClickKey KDown
CompareVisual manager1
ClickKey KDown
ClickKey KSpace
CompareVisual manager1
Continue

Exit