[REBOL] rgb color selector error (/data = none)

From: rchristiansen:pop:isdfa:sei-it at: 1-Aug-2000 15:14

The following creates an RGB color selector. Slide the red, green, and blue
sliders to increase the intensity of the color. Click on the frame below the
sliders to return the new color value.

One problem: If you do not move all three sliders initially before clicking on
the frame, the script deals with a /data value of "none" and returns an error.
Can someone help me on this one? How can I preset the /data value for a
slider to zero so that it doesn't return "none" ?

Thanks.

-Ryan

REBOL []

rgb-color-selector: layout [
	backdrop 255.255.255
	across
	red: slider 10x259 [red/color: 255.0.0 + (255 - red/data) show red print
red/data]
	green: slider 10x259 [green/color: 0.255.0 + (255 - green/data) show
green print green/data]
	blue: slider 10x259 [blue/color: 0.0.255 + (255 - blue/data) show blue
print blue/data]
	return
	rgb: frame 50x50 [rgb/color: make tuple! rejoin [red/data {.} green/data {.}
blue/data] show rgb]
]

view rgb-color-selector

[1] · 2 · 3 · 4 · 5 · See whole thread