Cursors.mesa
Copyright Ó 1985, 1986, 1987, 1991, 1992 by Xerox Corporation. All rights reserved.
Last Edited by McGregor, June 9, 1982 3:01 pm
Last Edited by: Maxwell, January 3, 1983 12:11 pm
Bier, December 1, 1988 4:45:08 pm PST
Doug Wyatt, January 19, 1987 10:25:42 pm PST
Michael Plass, February 25, 1992 1:35 pm PST
This interface is present for compatibility purposes; use MultiCursors instead.
DIRECTORY MultiCursors, CursorTypes, ViewerClasses;
Cursors: CEDAR DEFINITIONS
~ BEGIN
CursorArray: TYPE ~ CursorTypes.CursorArray;
CursorInfo: TYPE ~ MultiCursors.CursorInfo;
CursorType: TYPE ~ ViewerClasses.CursorType;
PredefinedCursor: TYPE ~ MultiCursors.PredefinedCursor;
ClientCursor: TYPE ~ MultiCursors.ClientCursor;
SetCursor: PROC [CursorType]; -- force bits into cursor bitmap (WMgr use only)
InvertCursor: PROC;
GetCursor: PROC RETURNS [CursorType];
GetCursorInfo: PROC RETURNS [CursorInfo];
For info on the currently displayed cursor
CornerSide: TYPE ~ MultiCursors.CornerSide;
AddCursorCorner: PUBLIC PROC [cornerSide: CornerSide];
Adds lines on top, sides, or both to currently displayed cursor
END.
Lower-Level Routines - use MultiCursors
SetCursorOffset: ...
GetCursorOffset: ...
SetCursorPosition: ...
GetCursorPosition: ...
SetMousePosition: ...
GetMousePosition: ...
SetMouseGrain: ...
SetCursorPattern: ...
GetCursorPattern: ...
SetCursorPatternOnly: ...
GetCursorPatternOnly: ...