on mouseEnter me

cursor 4

end


on mouseLeave me

cursor -1

end

----- Original Message -----
From: "seb" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, February 25, 2002 3:16 PM
Subject: RE: <lingo-l> sandglass cursor?


> Hi Tom
>
>
> > What's the code to change the cursor into a sandglass? It's not in the
> > lingodictionary so...
>
>  cursor 4
>
> visual cursor lists there:
>  <http://www.director-online.com/zac/cursors.gif>
>  <http://www.multi-active.com/dircursors/>
> but no sandglass found... so you'll be able get to it from the utility
> handler below: (sandGlass or watch or whatever the user as set as the busy
> cursor in his system settings)
> hth,
> .seb
>
> on miGetCursorList (me) ----------------------------------------------
>   -- Returns a property list with the format:
>   --
>   --   ["cursorName": <cursor number>, ...]
>   --
>   -- The following list is in the same order as the built-in cursor
>   -- list used in Behavior Parameters dialogs.
>   --------
>
>   cursorList = [:]
>   cursorList["Arrow"]            =  -1
>   cursorList["I-beam"]           =   1
>   cursorList["Crosshair"]        =   2
>   cursorList["Crossbar"]         =   3
>   cursorList["Watch"]            =   4
>   cursorList["Blank"]            = 200
>   cursorList["Help"]             = 254
>   cursorList["Finger"]           = 280
>   cursorList["Hand"]             = 260
>   cursorList["Closed Hand"]      = 290
>   cursorList["No Drop Hand"]     = 291
>   cursorList["Copy Closed Hand"] = 292
>   cursorList["Pencil"]           = 256
>   cursorList["Eraser"]           = 257
>   cursorList["Select"]           = 258
>   cursorList["Bucket"]           = 259
>   cursorList["Lasso"]            = 272
>   cursorList["Dropper"]          = 281
>   cursorList["Air Brush"]        = 301
>   cursorList["Zoom in"]          = 302
>   cursorList["Zoom out"]         = 303
>   cursorList["Vertical size"]    = 284
>   cursorList["Horizontal size"]  = 285
>   cursorList["Diagonal size"]    = 286
>
>   return cursorList
> end -- miGetCursorList
>
> [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!]
>


[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