1// 2// dfcursr.pkg 3// 4// create a desktop object named Cursor_control that understands 5// Send Cursor_Wait to (cursor_Control(self)) 6// creates hourclass cursor 7// Send Cursor_ready to (cursor_Control(self)) 8// restores regular cursor 9// 10Use Cursor.pkg 11 12Object Cursor_Control is a CursorShape 13End_Object 14 15