blob: 4487297e3486575bd212361f6a731b799f4a17ed (
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
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
|
{ Parsed from Appkit.framework NSDockTile.h }
{$ifdef TYPES}
{$ifndef NSDOCKTILE_PAS_T}
{$define NSDOCKTILE_PAS_T}
{ Defines }
const
NSAppKitVersionNumberWithDockTilePlugInSupport = 1001.0;
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef NSDOCKTILE_PAS_R}
{$define NSDOCKTILE_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef NSDOCKTILE_PAS_F}
{$define NSDOCKTILE_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSDOCKTILE_PAS_S}
{$define NSDOCKTILE_PAS_S}
{$endif}
{$endif}
{$ifdef FORWARD}
NSDockTilePlugInProtocol = objcprotocol;
NSDockTile = objcclass;
NSDockTilePointer = ^NSDockTile;
NSDockTilePtr = NSDockTilePointer;
{$endif}
{$ifdef CLASSES}
{$ifndef NSDOCKTILE_PAS_C}
{$define NSDOCKTILE_PAS_C}
{ NSDockTile }
NSDockTile = objcclass external (NSObject)
private
_owner: id;
_dockContextRef: Pointer;
_contentView: NSView;
_frameView: NSView;
_backstopView: NSView;
_badgeLabel: NSString;
__dFlags: record
case byte of
0: (_anonbitfield_NSDockTile0: cuint);
1: (data: bitpacked record
showsAppBadge: 0..1;
reserved: 0..((1 shl 31)-1);
end;
);
end;
_dockTileSize: NSSize;
reserved: array[0..(5)-1] of id;
public
function size: NSSize; message 'size';
procedure setContentView(view: NSView); message 'setContentView:';
function contentView: NSView; message 'contentView';
procedure display; message 'display';
procedure setShowsApplicationBadge(flag: Boolean); message 'setShowsApplicationBadge:';
function showsApplicationBadge: Boolean; message 'showsApplicationBadge';
procedure setBadgeLabel(string_: NSString); message 'setBadgeLabel:';
function badgeLabel: NSString; message 'badgeLabel';
function owner: id; message 'owner';
end;
{$endif}
{$endif}
{$ifdef PROTOCOLS}
{$ifndef NSDOCKTILE_PAS_P}
{$define NSDOCKTILE_PAS_P}
{ NSDockTilePlugIn Protocol }
NSDockTilePlugInProtocol = objcprotocol external name 'NSDockTilePlugIn'
required
procedure setDockTile(dockTile: NSDockTile); message 'setDockTile:';
optional
function dockMenu: NSMenu; message 'dockMenu';
end;
{$endif}
{$endif}
|
