/* 
 * 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
*/ 
/*
static char rcsid[] = "$XConsortium: ScrollWin4.dat /main/6 1995/07/13 19:50:05 drk $"
*/
@) A Scrolled Window with horizontal and vertical scrollbars should
   appear. The scrollbars should be on top and on the left. The background
   of the ScrolledWindow should be white. The work area of the ScrolledWindow
   should contain a DrawingArea with two ArrowButtons. The ArrowButtons
   should have coral and violet backgrounds respectively. XmNspacing should
   be set at 20 for the ScrolledWindow. 
#) Move the slider on the vertical scrollbar until the second violet colored
   ArrowButton appears. 
#) Press Shift <Tab> until the highlight is in the work area with the 
   ArrowButtons. 
/* test case for PIR 4276 */
Traversal highlight should step through the scrollbars before or
after stepping into the DrawingArea.
/* end of test case for PIR 4276 */
#) Press the KSelect key (Space Bar). An Activate Callback message should be
   printed in the term window. 
#) Press the Down Arrow Key. Then press KSelect again. Another message should
   be printed in the term window. 
#) Move the horizontal scrollbars slider all the way to the right. The
DrawingArea and it's contents should scroll to the right. 
C)
@) The size of the ArrowButtons should have been increased to 500x500 for
   each. 
#) Move the slider on the vertical scrollbar until the second ArrowButton
   is visible. 
#) Press MB1 in the ArrowButton (Coral colored). An activate Callback message
   should be printed in the term window. 
#) Press Shift <Tab> until the highlight is in the work area with the
ArrowButtons. 
#) Press <KBeginData>. The ScrolledWindow should scroll all the way to the top. 
#) Press <KEndData>. The ScrolledWindow should scroll to the end of the window. 
C)
@) ArrowButton1 (Coral) should now be Unmanaged and should not be visible. 
#) Use the vertical scrollbars to scroll to the Violet ArrowButton. 
C)
#) ArrowButton2 (Violet) and the DrawingArea should now be Unmanaged and
   nothing should be visible. 
C)
@) All widgets should be managed again, and everything should be visible. 
#) Use the scrollbars to \"Look At\" all of the widgets. 
#) Press Shift <Tab> until the highlight is in the work area with the
ArrowButtons. 
#) Press KPageUp. The ScrolledWindow should scroll upwards one page. 
#) Press KPageDown. The ScrolledWindow should scroll downwards one page. 
C)
@) The width and the height of the ArrowButtons should now change to 175.
   This should cause the horizontal scrollbar to disappear. 
#) Use the vertical scrollbar to  \"Look At\" all of the widgets. 
C)
#) The width and height of the ScrolledWindow should now be 125. This
   should cause the window to shrink and the horizontal scrollbar to reappear. 
#) Use the horizontal and vertical scrollbars to \"Look At\" all of 
   the widgets. 
C)
@) The width and height of the ScrolledWindow should now be 250. This
   should cause the window to expand to the point that no scrollbars should
   be present. 
#) Press KSelect. An Activate Callback message will be printed in the term
   window. 
#) Press the Down Arrow Key. Then press KSelect. Another Activate Callback
   message will be printed in the term window. 
C)
@) The DrawingArea should have been UnMapped. No widgets
   should be visible. 
C)
@) The DrawingArea should have been Mapped again. All widgets
   should be visible. 
/* test case for PIR 3580 */
C)
@) The ArrowButtons are larger now and the horizontal and vertical
scrollbars should have reappeared.  The scrollbars are not traversable.
#) Drag both scrollbar sliders using MB1 to scroll through the
Scrolled Window area.  The highlight should remain on one of the
two ArrowButtons and never on either scrollbar.
#) Drag the sliders until at least part of both ArrowButtons is
visible.
#) Press KTab.  Nothing should happen. 
#) Press KUp and KDown a few times.  The traversal highlight should
go back and forth between the ArrowButtons, but never leave the
DrawingArea.
/* end of test case for PIR 3580 */
E)