Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: Please urgently need help rebol/view simple gui

From: antonr::lexicon::net at: 22-Dec-2005 4:00

Hi Akram, try this: pan-offset: 0.0 tilt-offset: 0.0 refresh: does [ print ["pan:" pan-offset "tilt:" tilt-offset] ] control-window: center-face layout [ style hscroller scroller 200x20 across label "pan" hscroller [pan-offset: face/data refresh] with [data: pan-offset] return label "tilt" hscroller [tilt-offset: face/data refresh] with [data: tilt-offset] ] view/new control-window do-events The scroller/data is from 0.0 to 1.0 only, so if your pan and tilt values range outside these bounds, you will need to do map those values, eg: pan-offset: face/data * 2 etc. Anton.