<slider-box> ( range orientation dim -- gadget )

Vocabulary

ui-demo

Inputs

range	an object
orientation	an object
dim	an object

Outputs

gadget

an object

Definition

USING: accessors ui.gadgets.borders ui.gadgets.sliders
ui.pens.solid ui.theme ;

IN: ui-demo

:: <slider-box> ( range orientation dim -- gadget )
    range orientation <slider> { 0 0 } <filled-border>
    dim >>min-dim field-border-color <solid> >>boundary
    <pref-width> ;