blob: 9695a559f59b503d1860af1ead3dab81b4615d10 (
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
|
{ Parsed from Foundation.framework NSAppleScript.h }
{$ifdef TYPES}
{$ifndef NSAPPLESCRIPT_PAS_T}
{$define NSAPPLESCRIPT_PAS_T}
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef NSAPPLESCRIPT_PAS_R}
{$define NSAPPLESCRIPT_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef NSAPPLESCRIPT_PAS_F}
{$define NSAPPLESCRIPT_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSAPPLESCRIPT_PAS_S}
{$define NSAPPLESCRIPT_PAS_S}
{ External string constants }
var
NSAppleScriptErrorMessage: NSString; cvar; external;
NSAppleScriptErrorNumber: NSString; cvar; external;
NSAppleScriptErrorAppName: NSString; cvar; external;
NSAppleScriptErrorBriefMessage: NSString; cvar; external;
NSAppleScriptErrorRange: NSString; cvar; external;
{$endif}
{$endif}
{$ifdef FORWARD}
NSAppleScript = objcclass;
NSAppleScriptPointer = ^NSAppleScript;
NSAppleScriptPtr = NSAppleScriptPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef NSAPPLESCRIPT_PAS_C}
{$define NSAPPLESCRIPT_PAS_C}
{ NSAppleScript }
NSAppleScript = objcclass external (NSObject, NSCopyingProtocol)
private
_source: NSString;
_compiledScriptID: cuint;
_reserved1: Pointer;
_reserved2: Pointer;
public
function initWithContentsOfURL_error(url: NSURL; errorInfo: NSDictionaryPointer): id; message 'initWithContentsOfURL:error:';
function initWithSource(source_: NSString): id; message 'initWithSource:';
function source: NSString; message 'source';
function isCompiled: Boolean; message 'isCompiled';
function compileAndReturnError(errorInfo: NSDictionaryPointer): Boolean; message 'compileAndReturnError:';
function executeAndReturnError(errorInfo: NSDictionaryPointer): NSAppleEventDescriptor; message 'executeAndReturnError:';
function executeAppleEvent_error(event: NSAppleEventDescriptor; errorInfo: NSDictionaryPointer): NSAppleEventDescriptor; message 'executeAppleEvent:error:';
{ Adopted Protocols }
function copyWithZone(zone_: NSZonePtr): id;
end;
{$endif}
{$endif}
|
