hi Howdy-Tzi

currently i m using ur script with moveablesprite
true, but its not working, plz could u send me full
script. in this script even i can't chage background
color, for other chages i created other buttons by
which user can make chages in text fields but they
also not working on it. 

on mouseUp me
  
  nOpenSprite = me.TestForOpenChannel()
  
  if nOpenSprite = 0 then
    ALERT "You can't add any more text to this image."
    exit
  else
    me.CreateTextSprite( nOpenSprite )
  end if
  
END mouseUp


on TestForOpenChannel me
  
  nLast = the lastChannel
  repeat with nOpenSprite = 1 to the lastChannel
    if sprite(nOpenSprite).member = member(0,0) then 
      return nOpenSprite
    end if
  end repeat
  return 0
  
END TestForOpenChannel


on CreateTextSprite me, nOpenSprite
  
  mNewText = new ( #text )
  mNewText.editable = TRUE
  puppetSprite nOpenSprite, TRUE
  sprite(nOpenSprite).member = mNewText
  sprite(nOpensprite).moveablesprite=true
  sprite(nOpenSprite).ink = 36   
END CreateTextSprite


__________________________________________________
Do You Yahoo!?
Send FREE Valentine eCards with Yahoo! Greetings!
http://greetings.yahoo.com
[To remove yourself from this list, or to change to digest mode, go to 
http://www.penworks.com/lingo-l.cgi  To post messages to the list, email 
[EMAIL PROTECTED]  (Problems, email [EMAIL PROTECTED]). Lingo-L is for 
learning and helping with programming Lingo.  Thanks!]

Reply via email to