finde ord ved blinking cursor

Ok - Du kalder bare dit alm. field "text" & dropper denne her på den sprite der indeholder den tekst der skal vises i Text.

property spriteNum, myMember, myKeys,

on mouseUp me
  me.showWord()
end mouseDown

on keyUp me
  if myKeys contains the keypressed then me.showWord()
  pass
end keyUp

on showWord me
  s=myMember.text
  -- find where the cursor has clicked/swiped
  wordStart=myMember.selection[1]
  wordEnd=myMember.selection[2]
 
  -- find the first non-alpha char towards beginning of text
  repeat with i=wordStart down to 1
    c=charToNum(char i of s)
    -- convert a-z -> A-Z
    if c>=97 then c=c-32
    -- are we at the start of the text anyway?
    if i=1 then
      wordStart=1
      exit repeat
    end if
    -- if not in range A-Z then we have hit a word boundary
    if c<65 or c>90 then
      wordStart=i+1
      exit repeat
    end if
  end repeat
 
  -- find the last non-alpha char towards end of text
  repeat with i=wordEnd to length(s)
    c=charToNum(char i of s)
    if c>=97 then c=c-32
    if c<65 or c>90 then
      wordEnd=i-1
      exit repeat
    end if
  end repeat
 
  member("TEXT").text=s.char[wordStart..wordEnd]
 
end showWord

on beginSprite
  myMember=sprite(spriteNum).member
  myKeys=""
  repeat with i=123 to 126
    put numToChar(i) after myKeys
  end repeat
end beginSprite


Enjoy:)

Det skulle selvfølgelig være et svar...

hvis du får problemer kan jeg sende dig min .dir

vil gerne se din .dir :)

sirvival@ofir.dk