Description
Occurs when the user clicks in the open space above the scroll box (also called the thumb).
Event ID
Arguments
None
Return Values
Long.
Return code choices (specify in a RETURN statement):
0 -- Continue processing
Usage
When the user clicks in a vertical scroll bar, nothing happens unless you have scripts that change the scroll bar's Position property:
-
For the scroll bar arrows, use the LineUp and LineDown events.
-
For clicks in the scroll bar background above and below the thumb, use the PageUp and PageDown events.
-
For dragging the thumb itself, use the Moved event.
Examples
Example 1
This code in the PageUp event causes the thumb to move up when the user clicks on the up arrow of the vertical scroll bar (the page size is stored in the instance variable ii_pagesize):
IF This.Position < & This.MinPosition + ii_pagesize THEN This.Position = MinPosition ELSE This.Position = This.Position - ii_pagesize END IF
Example 2
This example changes the position of the scroll box by a predetermined page size stored in the instance variable ii_pagesize and scrolls backwards through a DataWindow control 10 rows for each page:
long ll_currow, ll_prevrow This.Position = This.Position - ii_pagesize ll_currow = dw_1.GetRow( ) ll_prevrow = ll_currow - 10 dw_1.ScrollToRow(ll_prevrow) dw_1.SetRow(ll_prevrow)
See also
