<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Windows Interface Reference: Cursor structure</title>
</head>
<body>
<h1>Cursor </h1>
<p>The Cursor structure contains functions and structures to create and operate on
cursors.</p>
<pre>structure Cursor:
sig
type HCURSOR and HINSTANCE
type POINT = { x : int, y: int }
type RECT = { left: int, top: int, right: int, bottom: int }
val hcursorNull : HCURSOR
val isHcursorNull : HCURSOR -> bool
datatype
CursorId =
OCR_APPSTARTING
| OCR_CROSS
| OCR_IBEAM
| OCR_NO
| OCR_NORMAL
| OCR_SIZEALL
| OCR_SIZENESW
| OCR_SIZENS
| OCR_SIZENWSE
| OCR_SIZEWE
| OCR_UP
| OCR_WAIT
val ClipCursor : RECT -> unit
val CopyCursor : HCURSOR -> HCURSOR
val DestroyCursor : HCURSOR -> unit
val GetClipCursor : unit -> RECT
val GetCursor : unit -> HCURSOR
val GetCursorPos : unit -> POINT
val LoadCursor : HINSTANCE * Resource.RESID -> HCURSOR
val LoadCursorFromFile : string -> HCURSOR
val LoadSystemCursor : CursorId -> HCURSOR
val LoadSystemCursorFromFile : CursorId -> HCURSOR
val SetCursor : HCURSOR -> HCURSOR
val SetCursorPos : int * int -> unit
val SetSytemCursor : HCURSOR * CursorId -> unit
val ShowCursor : bool -> int
end</pre>
</body>
</html>
