In a message dated 2/12/02 1:41:01 PM, [EMAIL PROTECTED] writes:

<< on mouseup
  put the colornames into me
  repeat with i = 1 to number of lines of me
    put line i of me into tColor
    set the textcolor of line i of me to tColor
  end repeat
end mouseup >>

Thanks ...this is quite usefull for a project I am currently working on.  I 
did make a change to make it more usefull.   I made a field named "What 
Color",  then.....

on mouseup
  put the name of me into foo
  if foo is empty
  then
    put the colornames into me
    repeat with i = 1 to number of lines of me
      put line i of me into tColor
      set the textcolor of line i of me to tColor
    end repeat
  else
    put the value of the clickline into field "What Color"
    set the textcolor of field "What Color" to the value of the clickline
  end if    
end mouseup

Randy Kent
_______________________________________________
improve-revolution mailing list
[EMAIL PROTECTED]
http://lists.runrev.com/mailman/listinfo/improve-revolution

Reply via email to