blob: b84c36a5f8351ab60e617978a58d30a0df9473e1 (
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
|
{ Parsed from Appkit.framework NSAlert.h }
{$ifdef TYPES}
{$ifndef NSALERT_PAS_T}
{$define NSALERT_PAS_T}
{ Constants }
const
NSWarningAlertStyle = 0;
NSInformationalAlertStyle = 1;
NSCriticalAlertStyle = 2;
const
NSAlertFirstButtonReturn = 1000;
NSAlertSecondButtonReturn = 1001;
NSAlertThirdButtonReturn = 1002;
{ Types }
type
NSAlertStyle = NSUInteger;
NSAlertStylePtr = ^NSAlertStyle;
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef NSALERT_PAS_R}
{$define NSALERT_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef NSALERT_PAS_F}
{$define NSALERT_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSALERT_PAS_S}
{$define NSALERT_PAS_S}
{$endif}
{$endif}
{$ifdef FORWARD}
NSAlertDelegateProtocol = objcprotocol;
NSAlert = objcclass;
NSAlertPointer = ^NSAlert;
NSAlertPtr = NSAlertPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef NSALERT_PAS_C}
{$define NSALERT_PAS_C}
{ NSAlert }
NSAlert = objcclass external (NSObject)
private
_informationField: NSTextField;
_first: id;
_second: id;
_third: id;
_buttons: NSArray;
_panel: NSPanel;
_messageField: id;
_imageView: id;
_minButtonSize: NSSize;
_buttonSpacing: CGFloat;
_buttonPadding: CGFloat;
_messagePadding: CGFloat;
_buttonSpacingMaxX: CGFloat;
_buttonSpacingY: CGFloat;
_modalDelegate: id;
_docWindow: NSWindow;
_didEndSelector: SEL;
_didDismissSelector: SEL;
_unbadgedImage: NSImage;
_defaultPanelSize: NSSize;
_helpButton: id;
_delegate: id;
_alertStyle: NSAlertStyle;
_helpAnchor: id;
_layoutDone: Boolean;
_showsHelp: Boolean;
_showsSuppressionButton: Boolean;
reserved: Boolean;
_suppressionButton: id;
_accessoryView: id;
public
class function alertWithError(error: NSError): NSAlert; message 'alertWithError:';
class function alertWithMessageText_defaultButton_alternateButton_otherButton_informativeTextWithFormat(message: NSString; defaultButton: NSString; alternateButton: NSString; otherButton: NSString; firstKey: id): NSAlert; varargs; message 'alertWithMessageText:defaultButton:alternateButton:otherButton:informativeTextWithFormat:';
procedure setMessageText(messageText_: NSString); message 'setMessageText:';
procedure setInformativeText(informativeText_: NSString); message 'setInformativeText:';
function messageText: NSString; message 'messageText';
function informativeText: NSString; message 'informativeText';
procedure setIcon(icon_: NSImage); message 'setIcon:';
function icon: NSImage; message 'icon';
function addButtonWithTitle(title: NSString): NSButton; message 'addButtonWithTitle:';
function buttons: NSArray; message 'buttons';
procedure setShowsHelp(showsHelp_: Boolean); message 'setShowsHelp:';
function showsHelp: Boolean; message 'showsHelp';
procedure setHelpAnchor(anchor: NSString); message 'setHelpAnchor:';
function helpAnchor: NSString; message 'helpAnchor';
procedure setAlertStyle(style: NSAlertStyle); message 'setAlertStyle:';
function alertStyle: NSAlertStyle; message 'alertStyle';
procedure setDelegate(delegate_: NSAlertDelegateProtocol); message 'setDelegate:';
function delegate: NSAlertDelegateProtocol; message 'delegate';
procedure setShowsSuppressionButton(flag: Boolean); message 'setShowsSuppressionButton:';
function showsSuppressionButton: Boolean; message 'showsSuppressionButton';
function suppressionButton: NSButton; message 'suppressionButton';
procedure setAccessoryView(view: NSView); message 'setAccessoryView:';
function accessoryView: NSView; message 'accessoryView';
procedure layout; message 'layout';
function runModal: NSInteger; message 'runModal';
procedure alertDidEnd_returnCode_contextInfo(alert: NSAlert; returnCode: NSInteger; contextInfo: Pointer); message 'alertDidEnd:returnCode:contextInfo:';
procedure beginSheetModalForWindow_modalDelegate_didEndSelector_contextInfo(window_: NSWindow; delegate_: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheetModalForWindow:modalDelegate:didEndSelector:contextInfo:';
function window: id; message 'window';
end;
{$endif}
{$endif}
{$ifdef PROTOCOLS}
{$ifndef NSALERT_PAS_P}
{$define NSALERT_PAS_P}
{ NSAlertDelegate Protocol }
NSAlertDelegateProtocol = objcprotocol external name 'NSAlertDelegate'
optional
function alertShowHelp(alert: NSAlert): Boolean; message 'alertShowHelp:';
end;
{$endif}
{$endif}
|
