Rebol Programming/scroll-drag
USAGE: edit
SCROLL-DRAG face /back /page
DESCRIPTION: edit
Move the scroller drag bar
SCROLL-DRAG is a function value.
ARGUMENTS edit
- face -- the scroller to modify (Type: any)
REFINEMENTS edit
- /back -- move backward
- /page -- move each time by one page
SOURCE CODE edit
scroll-drag: func [ "Move the scroller drag bar" face "the scroller to modify" /back "move backward" /page "move each time by one page" ][ any [ all [back page move-drag face/pane/2 face/page] all [back move-drag face/pane/2 face/step] all [page move-drag face/pane/3 face/page] move-drag face/pane/3 face/step ] ]