To enable variables in my script, I resorted to something like this:
set r 1 set g 2 set b 3
array set labl_color [list $r 254 $g 204 $b 92]
labl_set_color $labelN $labl_color($r) $labl_color($g) $labl_color($b)
Thanks, Darren
Kevin Teich wrote:
Just do:
labl_set_color 0 255 255 255
Tcl is very specific about what it considers lists. When you do:
set color "255 255 255"
You're actually setting 'color' to a list containing three elements. When you pass that list to 'labl_set_color' it only counts as one argument.
On Wed, Apr 05, 2006 at 05:31:46PM -0700, Darren Weber wrote:
I'm a novice with tcl, so I'm having trouble with using a variable to
labl_set_color index r g b
eg,
set color "255 255 255" labl_set_color 0 $color
gives error:
Wrong # args: labl_set_color index r g b
How is this done?