Perl-Sensitive Sunglasses | |
PerlMonks |
Re: What's up with the RGB method?by baku (Scribe) |
on Mar 28, 2001 at 00:44 UTC ( [id://67635]=note: print w/replies, xml ) | Need Help?? |
Taking a stab in the dark... It may be that the colours are on a 48-bit scale in stead of 24-bit; that is, 16 bits are available for each channel (red, green, and blue). This is becoming increasingly common in anticipation of 48-bit consumer-level hardware, ie: pretty soon you'll actually need the extra bits, and be glad that they're there. If this is the case here (but I don't know Tk, so YMMV), the range would be 0..65535; everything else should remain unchanged. Try grabbing $widget->rgb('white') and $widget->rgb('black'), and using their triplets as the limits of your sliders: something like...
That's probably overkill, though, since you can generally assume that black will be (0,0,0), which reduces the final block to
There's also probably a right way to do this that I don't know about... :-)
In Section
Seekers of Perl Wisdom
|
|