find-scroller ( gadget -- scroller/f )
Factor handbook » UI framework » Building user interfaces » Pre-made UI gadgets » Scroller gadgets
Prev:scroll>rect ( rect gadget -- )


Vocabulary
ui.gadgets.scrollers

Inputs
gadgeta gadget


Outputs
scroller/fa scroller or f


Word description
Finds the first parent of gadget which is a scroller. Outputs f if the gadget is not contained in a scroller.

Definition
USING: ui.gadgets ;

IN: ui.gadgets.scrollers

: find-scroller ( gadget -- scroller/f )
[ scroller? ] find-parent ;