blob: 5a08e09ad34dd9cd51644a965a202757076e7d59 (
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
|
{ Parsed from Foundation.framework NSRunLoop.h }
{$ifdef TYPES}
{$ifndef NSRUNLOOP_PAS_T}
{$define NSRUNLOOP_PAS_T}
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef NSRUNLOOP_PAS_R}
{$define NSRUNLOOP_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef NSRUNLOOP_PAS_F}
{$define NSRUNLOOP_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSRUNLOOP_PAS_S}
{$define NSRUNLOOP_PAS_S}
{ External string constants }
var
NSDefaultRunLoopMode: NSString; cvar; external;
NSRunLoopCommonModes: NSString; cvar; external;
{$endif}
{$endif}
{$ifdef FORWARD}
NSRunLoop = objcclass;
NSRunLoopPointer = ^NSRunLoop;
NSRunLoopPtr = NSRunLoopPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef NSRUNLOOP_PAS_C}
{$define NSRUNLOOP_PAS_C}
{ NSRunLoop }
NSRunLoop = objcclass external (NSObject)
private
_rl: id;
_dperf: id;
_perft: id;
_info: id;
_ports: id;
_reserved: array[0..(6)-1] of Pointer;
public
class function currentRunLoop: NSRunLoop; message 'currentRunLoop';
class function mainRunLoop: NSRunLoop; message 'mainRunLoop';
function currentMode: NSString; message 'currentMode';
function getCFRunLoop: CFRunLoopRef; message 'getCFRunLoop';
procedure addTimer_forMode(timer: NSTimer; mode: NSString); message 'addTimer:forMode:';
procedure addPort_forMode(aPort: NSPort; mode: NSString); message 'addPort:forMode:';
procedure removePort_forMode(aPort: NSPort; mode: NSString); message 'removePort:forMode:';
function limitDateForMode(mode: NSString): NSDate; message 'limitDateForMode:';
procedure acceptInputForMode_beforeDate(mode: NSString; limitDate: NSDate); message 'acceptInputForMode:beforeDate:';
end;
{ NSRunLoopConveniencesCategory }
NSRunLoopConveniencesCategory = objccategory external (NSRunLoop)
procedure run; message 'run';
procedure runUntilDate(limitDate: NSDate); message 'runUntilDate:';
function runMode_beforeDate(mode: NSString; limitDate: NSDate): Boolean; message 'runMode:beforeDate:';
procedure configureAsServer; message 'configureAsServer'; deprecated 'in Mac OS X 10.5 and later';
end;
{ NSDelayedPerformingCategory }
NSDelayedPerformingCategory = objccategory external (NSObject)
procedure performSelector_withObject_afterDelay_inModes(aSelector: SEL; anArgument: id; delay: NSTimeInterval; modes: NSArray); message 'performSelector:withObject:afterDelay:inModes:';
procedure performSelector_withObject_afterDelay(aSelector: SEL; anArgument: id; delay: NSTimeInterval); message 'performSelector:withObject:afterDelay:';
class procedure cancelPreviousPerformRequestsWithTarget_selector_object(aTarget: id; aSelector: SEL; anArgument: id); message 'cancelPreviousPerformRequestsWithTarget:selector:object:';
class procedure cancelPreviousPerformRequestsWithTarget(aTarget: id); message 'cancelPreviousPerformRequestsWithTarget:';
end;
{ NSOrderedPerformCategory }
NSOrderedPerformCategory = objccategory external (NSRunLoop)
procedure performSelector_target_argument_order_modes(aSelector: SEL; target: id; arg: id; order: NSUInteger; modes: NSArray); message 'performSelector:target:argument:order:modes:';
procedure cancelPerformSelector_target_argument(aSelector: SEL; target: id; arg: id); message 'cancelPerformSelector:target:argument:';
procedure cancelPerformSelectorsWithTarget(target: id); message 'cancelPerformSelectorsWithTarget:';
end;
{$endif}
{$endif}
|
