summaryrefslogtreecommitdiff
path: root/packages/cocoaint/src/appkit/NSCursor.inc
blob: 7ccf35c8d3a6c8a5f2479db32167809c58a66e85 (plain)
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
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
{ Parsed from AppKit.framework NSCursor.h }


{$ifdef TYPES}
type
  NSCursorPtr = ^NSCursor;
{$endif}

{$ifdef TYPES}
const
  NSAppKitVersionNumberWithCursorSizeSupport = 682.0;
{$endif}

{$ifdef CLASSES}

type
  NSCursor = objcclass external (NSObject, NSCodingProtocol)
  private
    _hotSpot: NSPoint;
    _flags: bitpacked record
      case byte of
        0: (_anonBitField__flags0: cuint);
        1: (
          onMouseExited: 0..1;
          onMouseEntered: 0..1;
          cursorType: 0..((1 shl 8)-1);
          int: 0..((1 shl 22)-1);
        );
      end;
    _image: id;
  public
    class function currentCursor: NSCursor; message 'currentCursor';
    class function currentSystemCursor: NSCursor; message 'currentSystemCursor'; { available in 10_6 }
    class function arrowCursor: NSCursor; message 'arrowCursor';
    class function IBeamCursor: NSCursor; message 'IBeamCursor';
    class function pointingHandCursor: NSCursor; message 'pointingHandCursor';
    class function closedHandCursor: NSCursor; message 'closedHandCursor';
    class function openHandCursor: NSCursor; message 'openHandCursor';
    class function resizeLeftCursor: NSCursor; message 'resizeLeftCursor';
    class function resizeRightCursor: NSCursor; message 'resizeRightCursor';
    class function resizeLeftRightCursor: NSCursor; message 'resizeLeftRightCursor';
    class function resizeUpCursor: NSCursor; message 'resizeUpCursor';
    class function resizeDownCursor: NSCursor; message 'resizeDownCursor';
    class function resizeUpDownCursor: NSCursor; message 'resizeUpDownCursor';
    class function crosshairCursor: NSCursor; message 'crosshairCursor';
    class function disappearingItemCursor: NSCursor; message 'disappearingItemCursor';
    class function operationNotAllowedCursor: NSCursor; message 'operationNotAllowedCursor'; { available in 10_5 }
    class function dragLinkCursor: NSCursor; message 'dragLinkCursor'; { available in 10_6 }
    class function dragCopyCursor: NSCursor; message 'dragCopyCursor'; { available in 10_6 }
    class function contextualMenuCursor: NSCursor; message 'contextualMenuCursor'; { available in 10_6 }
    class function IBeamCursorForVerticalLayout: NSCursor; message 'IBeamCursorForVerticalLayout'; { available in 10_7 }
    function initWithImage_hotSpot (newImage: NSImage; aPoint: NSPoint): instancetype; message 'initWithImage:hotSpot:';
    function initWithImage_foregroundColorHint_backgroundColorHint_hotSpot (newImage: NSImage; fg: NSColor; bg: NSColor; hotSpot: NSPoint): instancetype; message 'initWithImage:foregroundColorHint:backgroundColorHint:hotSpot:';
    class procedure hide; message 'hide';
    class procedure unhide; message 'unhide';
    class procedure setHiddenUntilMouseMoves (flag: ObjCBOOL); message 'setHiddenUntilMouseMoves:';
    class procedure classPop; message 'pop';
    function image: NSImage; message 'image';
    function hotSpot: NSPoint; message 'hotSpot';
    procedure push; message 'push';
    procedure pop; message 'pop';
    procedure set_; message 'set';
    procedure setOnMouseExited (flag: ObjCBOOL); message 'setOnMouseExited:';
    procedure setOnMouseEntered (flag: ObjCBOOL); message 'setOnMouseEntered:';
    function isSetOnMouseExited: ObjCBOOL; message 'isSetOnMouseExited';
    function isSetOnMouseEntered: ObjCBOOL; message 'isSetOnMouseEntered';
    procedure mouseEntered (theEvent: NSEvent); message 'mouseEntered:';
    procedure mouseExited (theEvent: NSEvent); message 'mouseExited:';

    { Adopted protocols }
    procedure encodeWithCoder (aCoder: NSCoder); message 'encodeWithCoder:';
    function initWithCoder (aDecoder: NSCoder): id; message 'initWithCoder:';
  end;
{$endif}