blob: b53968faf0c5d294107f6235e6ef0ace13be5788 (
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
95
96
97
98
99
100
101
102
103
104
105
106
107
|
{ Parsed from Appkit.framework NSTabViewItem.h }
{$ifdef TYPES}
{$ifndef NSTABVIEWITEM_PAS_T}
{$define NSTABVIEWITEM_PAS_T}
{ Constants }
const
NSSelectedTab = 0;
NSBackgroundTab = 1;
NSPressedTab = 2;
{ Types }
type
NSTabState = NSUInteger;
NSTabStatePtr = ^NSTabState;
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef NSTABVIEWITEM_PAS_R}
{$define NSTABVIEWITEM_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef NSTABVIEWITEM_PAS_F}
{$define NSTABVIEWITEM_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSTABVIEWITEM_PAS_S}
{$define NSTABVIEWITEM_PAS_S}
{$endif}
{$endif}
{$ifdef FORWARD}
NSTabViewItem = objcclass;
NSTabViewItemPointer = ^NSTabViewItem;
NSTabViewItemPtr = NSTabViewItemPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef NSTABVIEWITEM_PAS_C}
{$define NSTABVIEWITEM_PAS_C}
{ NSTabViewItem }
NSTabViewItem = objcclass external (NSObject, NSCodingProtocol)
private
_identifier: id;
_label: NSString;
_view: NSView;
_initialFirstResponder: NSView;
_color: NSColor;
_tabView: NSTabView;
_tabState: NSTabState;
_lastKeyView: NSView;
__tviFlags: record
case byte of
0: (_anonbitfield_NSTabViewItem0: cuint);
1: (data: bitpacked record
hasCustomColor: 0..1;
labelSizeIsValid: 0..1;
autoGeneratedIFR: 0..1;
isTabDisabled: 0..1;
RESERVED: 0..((1 shl 28)-1);
end;
);
end;
_labelSize: NSSize;
_tabRect: NSRect;
_tabToolTipTag: NSToolTipTag;
_auxiliaryStorage: id;
public
function initWithIdentifier(identifier_: id): id; message 'initWithIdentifier:';
function identifier: id; message 'identifier';
function view: id; message 'view';
function initialFirstResponder: id; message 'initialFirstResponder';
function label_: NSString; message 'label';
function color: NSColor; message 'color';
function tabState: NSTabState; message 'tabState';
function tabView: NSTabView; message 'tabView';
procedure setIdentifier(identifier_: id); message 'setIdentifier:';
procedure setLabel(label__: NSString); message 'setLabel:';
procedure setColor(color_: NSColor); message 'setColor:';
procedure setView(view_: NSView); message 'setView:';
procedure setInitialFirstResponder(view_: NSView); message 'setInitialFirstResponder:';
function toolTip: NSString; message 'toolTip';
procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
procedure drawLabel_inRect(shouldTruncateLabel: Boolean; labelRect: NSRect); message 'drawLabel:inRect:';
function sizeOfLabel(computeMin: Boolean): NSSize; message 'sizeOfLabel:';
{ Adopted Protocols }
procedure encodeWithCoder(aCoder: NSCoder);
function initWithCoder(aDecoder: NSCoder): id;
end;
{$endif}
{$endif}
|