File: Cursor.html

package info (click to toggle)
polyml 5.6-8
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 31,892 kB
  • ctags: 34,453
  • sloc: cpp: 44,983; ansic: 24,520; asm: 14,850; sh: 11,730; makefile: 551; exp: 484; python: 253; awk: 91; sed: 9
file content (54 lines) | stat: -rw-r--r-- 1,457 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
<!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 -&gt; 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 -&gt; unit
    val CopyCursor : HCURSOR -&gt; HCURSOR
    val DestroyCursor : HCURSOR -&gt; unit
    val GetClipCursor : unit -&gt; RECT
    val GetCursor : unit -&gt; HCURSOR
    val GetCursorPos : unit -&gt; POINT
    val LoadCursor : HINSTANCE * Resource.RESID -&gt; HCURSOR
    val LoadCursorFromFile : string -&gt; HCURSOR
    val LoadSystemCursor : CursorId -&gt; HCURSOR
    val LoadSystemCursorFromFile : CursorId -&gt; HCURSOR
    val SetCursor : HCURSOR -&gt; HCURSOR
    val SetCursorPos : int * int -&gt; unit
    val SetSytemCursor : HCURSOR * CursorId -&gt; unit
    val ShowCursor : bool -&gt; int
  end</pre>
</body>
</html>