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!]

Reply via email to