Skip to content

Instantly share code, notes, and snippets.

@AlexanderBaggett

AlexanderBaggett/ScrollerTest.red

Created January 19, 2019 16:28
Show Gist options
  • Save AlexanderBaggett/350ffc10bdf9e6b5751cb83e6529d324 to your computer and use it in GitHub Desktop.
Save AlexanderBaggett/350ffc10bdf9e6b5751cb83e6529d324 to your computer and use it in GitHub Desktop.
Download ZIP
Toomasv's Scroller Test
Raw
ScrollerTest.red
view [panel [origin 0x0 text 40 "Data:" t0: text 40 "" return
sc: scroller 200x300 on-change [t0/text: to-string face/data]]
below text "Selected:" t1: text ""
slider 25x260 [t1/text: to-string round/to sc/selected: face/data .01]
return text "Steps:" t2: text ""
slider 25x260 [t2/text: to-string round/to sc/steps: to-float face/data .01]
]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment