Hi list...

What would cause a cursor command not to work in a mouseWithin handler?
Below, it gets to the cursor line, but doesn't do anything.  

Thanks,
Michael M.

on mouseWithin(me)
  if pContentType = "text" then
    if pSp.member.type = #text then
      theChar = pSp.pointToChar(the mouseLoc)
      if not voidP(pLinksAndData) then
        repeat with i = 1 to pLinksAndData.count
          --theBeginRange = pLinksAndData[i][1][1]
          --theEndRange = pLinksAndData[i][1][2]
          if (theChar >= pLinksAndData[i][1][1]) and (theChar <=
pLinksAndData[i][1][2]) then
            cursor [member("linkCursor",
"sharedAssets"),member("linkCursorMask", "sharedAssets")]
            if the mouseDown then
 
pSp.member.char[(pLinksAndData[i][1][1])..(pLinksAndData[i][1][2])].colo
r = rgb(0,0,0) -- clicking on the link
            else
 
pSp.member.char[(pLinksAndData[i][1][1])..(pLinksAndData[i][1][2])].colo
r = rgb(0,147,234) -- hover over the link
            end if
            exit
          else
 
pSp.member.char[(pLinksAndData[i][1][1])..(pLinksAndData[i][1][2])].colo
r = rgb(0,112,178) -- not on the link
            cursor (-1)
            exit
          end if 
        end repeat
      end if
    end if
  end if
end


[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