<<<<<<<<<<<<<<<<<

motif_scrolled_window(motif)Motif Toolkitmotif_scrolled_window(motif)

NAME

motif_scrolled_window - scroll bars and a viewing area

DESCRIPTION

A ScrolledWindow combines one or more ScrollBars and a viewing area to implement a visible window onto some other (usually larger) data display.

For a more complete description of this Motif widget, consult "OSF/Motif Programmer's Reference."

SUPERCLASS

motif_manager

INSTANCE VARIABLES

MESSAGES

scroll_visible: takes a widget id and a left/right margin and a top/bottom margin and scrolls the scrolled window so that the widget is visible.

@ resource selects resource for a subsequent set or query.

: value sets the current resource to value. Since most resources have mixed case, you should enclose any resource name in quotes. Resource names are the Motif names with the XmN prefix removed. Some resources can only be set before the widget is created. For efficiency, set as many resources as you can before creation.

scalar_value? returns the value of the current resource whose type is integer.

string_value? returns the value of the current resource whose type is string.

pointer_value? returns the value of the current resource whose type is a pointer of any kind.

create! creates an instance of the widget. Any resources that have been specified prior to the create! will be set. An id? message also sends a create!.

on! realizes the widget. Realizing a widget creates its windows and displays it when it is managed.

EXAMPLE

/* Create a scrolled window and draw into it */

<motifinit <colors

motif application="Scrolled Window Example" create! ; motif_scrolled_window new: aScrollingWindow parent=motif @ "scrollingPolicy" : XmAUTOMATIC @ width : 256 @ height : 256 create! ; motif_drawing_area new: aDrawingArea parent=aScrollingWindow @ "scrollingPolicy" : XmAUTOMATIC @ width : 512 @ height : 512 enter_action=aDrawingArea_entered expose_action=aDrawingArea_exposed create! ; motif on!;

xwindow new: aWindow id=[aDrawingArea window_id?] print: id ;

actions new: aDrawingArea_entered tick_actions="! aDrawingArea entered" ;

actions new: aDrawingArea_exposed tick_actions+ "aWindow draw_line:(10,10,200,200); xdisplay flush!;" ;

motif on!; motif start!;