blob: c43d1b8e1b6e37f955aa52a3b9e02d5f24671763 (
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
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
|
{ Parsed from Appkit.framework NSColorPanel.h }
{$ifdef TYPES}
{$ifndef NSCOLORPANEL_PAS_T}
{$define NSCOLORPANEL_PAS_T}
{ Types }
type
NSColorPanelMode = NSInteger;
NSColorPanelModePtr = ^NSColorPanelMode;
{ Constants }
const
NSNoModeColorPanel = -1;
NSGrayModeColorPanel = 0;
NSRGBModeColorPanel = 1;
NSCMYKModeColorPanel = 2;
NSHSBModeColorPanel = 3;
NSCustomPaletteModeColorPanel = 4;
NSColorListModeColorPanel = 5;
NSWheelModeColorPanel = 6;
NSCrayonModeColorPanel = 7;
const
NSColorPanelGrayModeMask = $00000001;
NSColorPanelRGBModeMask = $00000002;
NSColorPanelCMYKModeMask = $00000004;
NSColorPanelHSBModeMask = $00000008;
NSColorPanelCustomPaletteModeMask = $00000010;
NSColorPanelColorListModeMask = $00000020;
NSColorPanelWheelModeMask = $00000040;
NSColorPanelCrayonModeMask = $00000080;
NSColorPanelAllModesMask = $0000ffff;
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef NSCOLORPANEL_PAS_R}
{$define NSCOLORPANEL_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef NSCOLORPANEL_PAS_F}
{$define NSCOLORPANEL_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSCOLORPANEL_PAS_S}
{$define NSCOLORPANEL_PAS_S}
{ External string constants }
var
NSColorPanelColorDidChangeNotification: NSString; cvar; external;
{$endif}
{$endif}
{$ifdef FORWARD}
NSColorPanel = objcclass;
NSColorPanelPointer = ^NSColorPanel;
NSColorPanelPtr = NSColorPanelPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef NSCOLORPANEL_PAS_C}
{$define NSCOLORPANEL_PAS_C}
{ NSColorPanel }
NSColorPanel = objcclass external (NSPanel)
private
_colorSwatch: id;
_reserved1: id;
_colorWell: id;
_pickersWithLoadedViews: NSMutableArray;
_magnifyButton: id;
_middleView: id;
_opacitySlider: id;
_opacityText: id;
_opacityView: id;
_modalButtons: id;
_pickerView: id;
_customViewsList: id;
_customPickerList: id;
_currViewObject: id;
_boxAboveSwatch: id;
_target: id;
_accessoryView: id;
_action: SEL;
_minColorPanelSize: NSSize;
_maxColorPanelSize: NSSize;
_reserved2: NSSize;
_reserved3: NSSize;
_resizeDimple: id;
_reserved5: Boolean;
_reserved6: Boolean;
_handlingOpacityMoveAction: Boolean;
_ignoreConstraints: Boolean;
_continuous: Boolean;
_allowColorSetting: Boolean;
_stillInitializing: Boolean;
_opacityTextController: id;
public
class function sharedColorPanel: NSColorPanel; message 'sharedColorPanel';
class function sharedColorPanelExists: Boolean; message 'sharedColorPanelExists';
class function dragColor_withEvent_fromView(color_: NSColor; theEvent: NSEvent; sourceView: NSView): Boolean; message 'dragColor:withEvent:fromView:';
class procedure setPickerMask(mask: NSUInteger); message 'setPickerMask:';
class procedure setPickerMode(mode_: NSColorPanelMode); message 'setPickerMode:';
procedure setAccessoryView(aView: NSView); message 'setAccessoryView:';
function accessoryView: NSView; message 'accessoryView';
procedure setContinuous(flag: Boolean); message 'setContinuous:';
function isContinuous: Boolean; message 'isContinuous';
procedure setShowsAlpha(flag: Boolean); message 'setShowsAlpha:';
function showsAlpha: Boolean; message 'showsAlpha';
procedure setMode(mode_: NSColorPanelMode); message 'setMode:';
function mode: NSColorPanelMode; message 'mode';
procedure setColor(color_: NSColor); message 'setColor:';
function color: NSColor; message 'color';
function alpha: CGFloat; message 'alpha';
procedure setAction(aSelector: SEL); message 'setAction:';
procedure setTarget(anObject: id); message 'setTarget:';
procedure attachColorList(colorList: NSColorList); message 'attachColorList:';
procedure detachColorList(colorList: NSColorList); message 'detachColorList:';
end;
{ NSColorPanel_NSApplicationCategory }
NSColorPanel_NSApplicationCategory = objccategory external name 'NSColorPanel' (NSApplication)
procedure orderFrontColorPanel(sender: id); message 'orderFrontColorPanel:';
end;
{ NSColorPanelResponderMethodCategory }
NSColorPanelResponderMethodCategory = objccategory external (NSObject)
procedure changeColor(sender: id); message 'changeColor:';
end;
{$endif}
{$endif}
|
