NSApplication.inc 49 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730
  1. { Parsed from AppKit.framework NSApplication.h }
  2. { Types from NSApplication }
  3. {$ifdef TYPES}
  4. type
  5. NSRequestUserAttentionType = NSUInteger;
  6. type
  7. NSRequestUserAttentionTypePtr = ^NSRequestUserAttentionType;
  8. const
  9. NSCriticalRequest = 0;
  10. NSInformationalRequest = 10;
  11. type
  12. NSApplicationDelegateReply = NSUInteger;
  13. type
  14. NSApplicationDelegateReplyPtr = ^NSApplicationDelegateReply;
  15. const
  16. NSApplicationDelegateReplySuccess = 0;
  17. NSApplicationDelegateReplyCancel = 1;
  18. NSApplicationDelegateReplyFailure = 2;
  19. {$endif}
  20. { Types from NSApplication_NSDeprecated }
  21. {$ifdef TYPES}
  22. const
  23. NSRunStoppedResponse = -1000 deprecated 'in 10_0, 10_10, "Use NSModalResponseStop instead"';
  24. NSRunAbortedResponse = -1001 deprecated 'in 10_0, 10_10, "Use NSModalResponseAbort instead"';
  25. NSRunContinuesResponse = -1002 deprecated 'in 10_0, 10_10, "Use NSModalResponseContinue instead"';
  26. {$endif}
  27. {$ifdef TYPES}
  28. type
  29. NSApplicationPtr = ^NSApplication;
  30. NSApplicationDelegateProtocolPtr = ^NSApplicationDelegateProtocol;
  31. NSServicesMenuRequestorProtocolPtr = ^NSServicesMenuRequestorProtocol;
  32. {$endif}
  33. {$ifdef EXTERNAL_SYMBOLS}
  34. var
  35. NSAppKitVersionNumber: double; cvar; external;
  36. {$endif}
  37. {$ifdef TYPES}
  38. const
  39. NSAppKitVersionNumber10_0 = 577;
  40. NSAppKitVersionNumber10_1 = 620;
  41. NSAppKitVersionNumber10_2 = 663;
  42. NSAppKitVersionNumber10_2_3 = 663.6;
  43. NSAppKitVersionNumber10_3 = 743;
  44. NSAppKitVersionNumber10_3_2 = 743.14;
  45. NSAppKitVersionNumber10_3_3 = 743.2;
  46. NSAppKitVersionNumber10_3_5 = 743.24;
  47. NSAppKitVersionNumber10_3_7 = 743.33;
  48. NSAppKitVersionNumber10_3_9 = 743.36;
  49. NSAppKitVersionNumber10_4 = 824;
  50. NSAppKitVersionNumber10_4_1 = 824.1;
  51. NSAppKitVersionNumber10_4_3 = 824.23;
  52. NSAppKitVersionNumber10_4_4 = 824.33;
  53. NSAppKitVersionNumber10_4_7 = 824.41;
  54. NSAppKitVersionNumber10_5 = 949;
  55. NSAppKitVersionNumber10_5_2 = 949.27;
  56. NSAppKitVersionNumber10_5_3 = 949.33;
  57. NSAppKitVersionNumber10_6 = 1038;
  58. NSAppKitVersionNumber10_7 = 1138;
  59. NSAppKitVersionNumber10_7_2 = 1138.23;
  60. NSAppKitVersionNumber10_7_3 = 1138.32;
  61. NSAppKitVersionNumber10_7_4 = 1138.47;
  62. NSAppKitVersionNumber10_8 = 1187;
  63. NSAppKitVersionNumber10_9 = 1265;
  64. {$endif}
  65. {$ifdef EXTERNAL_SYMBOLS}
  66. var
  67. NSModalPanelRunLoopMode: NSString; cvar; external;
  68. NSEventTrackingRunLoopMode: NSString; cvar; external;
  69. {$endif}
  70. {$ifdef TYPES}
  71. const
  72. NSModalResponseStop = -1000;
  73. NSModalResponseAbort = -1001;
  74. NSModalResponseContinue = -1002;
  75. type
  76. NSModalResponse = NSInteger { available in 10_9 };
  77. NSModalResponsePtr = ^NSModalResponse { available in 10_9 };
  78. const
  79. NSUpdateWindowsRunLoopOrdering = 500000;
  80. type
  81. NSApplicationPresentationOptions = NSUInteger;
  82. NSApplicationPresentationOptionsPtr = ^NSApplicationPresentationOptions;
  83. const
  84. NSApplicationPresentationDefault = 0;
  85. NSApplicationPresentationAutoHideDock = 1 shl 0;
  86. NSApplicationPresentationHideDock = 1 shl 1;
  87. NSApplicationPresentationAutoHideMenuBar = 1 shl 2;
  88. NSApplicationPresentationHideMenuBar = 1 shl 3;
  89. NSApplicationPresentationDisableAppleMenu = 1 shl 4;
  90. NSApplicationPresentationDisableProcessSwitching = 1 shl 5;
  91. NSApplicationPresentationDisableForceQuit = 1 shl 6;
  92. NSApplicationPresentationDisableSessionTermination = 1 shl 7;
  93. NSApplicationPresentationDisableHideApplication = 1 shl 8;
  94. NSApplicationPresentationDisableMenuBarTransparency = 1 shl 9;
  95. NSApplicationPresentationFullScreen = 1 shl 10 { available in 10_7 };
  96. NSApplicationPresentationAutoHideToolbar = 1 shl 11 { available in 10_7 };
  97. type
  98. NSApplicationOcclusionState = NSUInteger;
  99. NSApplicationOcclusionStatePtr = ^NSApplicationOcclusionState;
  100. const
  101. NSApplicationOcclusionStateVisible = 1 shl 1;
  102. {$endif}
  103. {$ifdef EXTERNAL_SYMBOLS}
  104. var
  105. NSApp: id; cvar; external;
  106. {$endif}
  107. {$ifdef TYPES}
  108. type
  109. NSModalSession = OpaqueType;
  110. _NSThreadPrivate = OpaqueType;
  111. _NSThreadPrivatePtr = ^_NSThreadPrivate;
  112. {$endif}
  113. {$ifdef CLASSES}
  114. type
  115. NSApplication = objcclass external (NSResponder, NSUserInterfaceValidationsProtocol, NSAccessibilityElementProtocol, NSAccessibilityProtocol)
  116. private
  117. _currentEvent: NSEvent;
  118. _windowList: id;
  119. _keyWindow: id;
  120. _mainWindow: id;
  121. _delegate: id;
  122. _hiddenList: idPtr;
  123. _hiddenCount: cint;
  124. _context: NSInteger;
  125. _appleEventSuspensionID: pointer;
  126. _previousKeyWindow: id;
  127. _unusedApp: cshort;
  128. _running: cshort;
  129. _appFlags: bitpacked record
  130. case byte of
  131. 0: (_anonBitField__appFlags0: cuint);
  132. 1: (
  133. _hidden: 0..1;
  134. _appleEventActivationInProgress: 0..1;
  135. _active: 0..1;
  136. _hasBeenRun: 0..1;
  137. _doingUnhide: 0..1;
  138. _delegateReturnsValidRequestor: 0..1;
  139. _deactPending: 0..1;
  140. _invalidState: 0..1;
  141. _invalidEvent: 0..1;
  142. _postedWindowsNeedUpdateNote: 0..1;
  143. _wantsToActivate: 0..1;
  144. _doingHide: 0..1;
  145. _dontSendShouldTerminate: 0..1;
  146. _ignoresFullScreen: 0..1;
  147. _finishedLaunching: 0..1;
  148. _hasEventDelegate: 0..1;
  149. _appDying: 0..1;
  150. _didNSOpenOrPrint: 0..1;
  151. _inDealloc: 0..1;
  152. _pendingDidFinish: 0..1;
  153. _hasKeyFocus: 0..1;
  154. _panelsNonactivating: 0..1;
  155. _hiddenOnLaunch: 0..1;
  156. _openStatus: 0..((1 shl 2)-1);
  157. _batchOrdering: 0..1;
  158. _waitingForTerminationReply: 0..1;
  159. _windowMoveDisabled: 0..1;
  160. _enumeratingMemoryPressureHandlers: 0..1;
  161. _didTryRestoringPersistentState: 0..1;
  162. _reservedN: 0..1;
  163. _mightBeSwitching: 0..1;
  164. );
  165. end;
  166. _mainMenu: id;
  167. _appIcon: id;
  168. _unused: pointer;
  169. _eventDelegate: id;
  170. _threadingSupport: _NSThreadPrivatePtr;
  171. public
  172. class function sharedApplication: NSApplication; message 'sharedApplication';
  173. procedure setDelegate(newValue: NSApplicationDelegateProtocol); message 'setDelegate:';
  174. function delegate: NSApplicationDelegateProtocol; message 'delegate';
  175. function context: NSGraphicsContext; message 'context';
  176. procedure hide (sender: id); message 'hide:';
  177. procedure unhide (sender: id); message 'unhide:';
  178. procedure unhideWithoutActivation; message 'unhideWithoutActivation';
  179. function windowWithWindowNumber (windowNum: NSInteger): NSWindow; message 'windowWithWindowNumber:';
  180. function mainWindow: NSWindow; message 'mainWindow';
  181. function keyWindow: NSWindow; message 'keyWindow';
  182. function isActive: ObjCBOOL; message 'isActive';
  183. function isHidden: ObjCBOOL; message 'isHidden';
  184. function isRunning: ObjCBOOL; message 'isRunning';
  185. procedure deactivate; message 'deactivate';
  186. procedure activateIgnoringOtherApps (flag: ObjCBOOL); message 'activateIgnoringOtherApps:';
  187. procedure hideOtherApplications (sender: id); message 'hideOtherApplications:';
  188. procedure unhideAllApplications (sender: id); message 'unhideAllApplications:';
  189. procedure finishLaunching; message 'finishLaunching';
  190. procedure run; message 'run';
  191. function runModalForWindow (theWindow: NSWindow): NSInteger; message 'runModalForWindow:';
  192. procedure stop (sender: id); message 'stop:';
  193. procedure stopModal; message 'stopModal';
  194. procedure stopModalWithCode (returnCode: NSInteger); message 'stopModalWithCode:';
  195. procedure abortModal; message 'abortModal';
  196. function modalWindow: NSWindow; message 'modalWindow';
  197. function beginModalSessionForWindow (theWindow: NSWindow): NSModalSession; message 'beginModalSessionForWindow:';
  198. function runModalSession (session: NSModalSession): NSInteger; message 'runModalSession:';
  199. procedure endModalSession (session: NSModalSession); message 'endModalSession:';
  200. procedure terminate (sender: id); message 'terminate:';
  201. function requestUserAttention (requestType: NSRequestUserAttentionType): NSInteger; message 'requestUserAttention:';
  202. procedure cancelUserAttentionRequest (request: NSInteger); message 'cancelUserAttentionRequest:';
  203. function nextEventMatchingMask_untilDate_inMode_dequeue (mask: NSUInteger; expiration: NSDate; mode: NSString; deqFlag: ObjCBOOL): NSEvent; message 'nextEventMatchingMask:untilDate:inMode:dequeue:';
  204. procedure discardEventsMatchingMask_beforeEvent (mask: NSUInteger; lastEvent: NSEvent); message 'discardEventsMatchingMask:beforeEvent:';
  205. procedure postEvent_atStart (event: NSEvent; flag: ObjCBOOL); message 'postEvent:atStart:';
  206. function currentEvent: NSEvent; message 'currentEvent';
  207. procedure sendEvent (theEvent: NSEvent); message 'sendEvent:';
  208. procedure preventWindowOrdering; message 'preventWindowOrdering';
  209. function makeWindowsPerform_inOrder (aSelector: SEL; flag: ObjCBOOL): NSWindow; message 'makeWindowsPerform:inOrder:';
  210. function windows: NSArray; message 'windows';
  211. procedure setWindowsNeedUpdate (needUpdate: ObjCBOOL); message 'setWindowsNeedUpdate:';
  212. procedure updateWindows; message 'updateWindows';
  213. procedure setMainMenu(newValue: NSMenu); message 'setMainMenu:';
  214. function mainMenu: NSMenu; message 'mainMenu';
  215. procedure setHelpMenu(newValue: NSMenu); message 'setHelpMenu:';
  216. function helpMenu: NSMenu; message 'helpMenu';
  217. procedure setApplicationIconImage(newValue: NSImage); message 'setApplicationIconImage:';
  218. function applicationIconImage: NSImage; message 'applicationIconImage';
  219. function activationPolicy: NSApplicationActivationPolicy; message 'activationPolicy'; { available in 10_6 }
  220. function setActivationPolicy (activationPolicy_: NSApplicationActivationPolicy): ObjCBOOL; message 'setActivationPolicy:'; { available in 10_6 }
  221. function dockTile: NSDockTile; message 'dockTile';
  222. function sendAction_to_from (theAction: SEL; theTarget: id; sender: id): ObjCBOOL; message 'sendAction:to:from:';
  223. function targetForAction (theAction: SEL): id; message 'targetForAction:';
  224. function targetForAction_to_from (theAction: SEL; theTarget: id; sender: id): id; message 'targetForAction:to:from:';
  225. function tryToPerform_with (anAction: SEL; anObject: id): ObjCBOOL; message 'tryToPerform:with:';
  226. function validRequestorForSendType_returnType (sendType: NSString; returnType: NSString): id; message 'validRequestorForSendType:returnType:';
  227. procedure reportException (theException: NSException); message 'reportException:';
  228. class procedure detachDrawingThread_toTarget_withObject (selector: SEL; target: id; argument: id); message 'detachDrawingThread:toTarget:withObject:';
  229. procedure replyToApplicationShouldTerminate (shouldTerminate: ObjCBOOL); message 'replyToApplicationShouldTerminate:';
  230. procedure replyToOpenOrPrint (reply: NSApplicationDelegateReply); message 'replyToOpenOrPrint:';
  231. procedure orderFrontCharacterPalette (sender: id); message 'orderFrontCharacterPalette:';
  232. procedure setPresentationOptions(newValue: NSApplicationPresentationOptions); message 'setPresentationOptions:';
  233. function presentationOptions: NSApplicationPresentationOptions; message 'presentationOptions';
  234. function currentSystemPresentationOptions: NSApplicationPresentationOptions; message 'currentSystemPresentationOptions';
  235. function occlusionState: NSApplicationOcclusionState; message 'occlusionState';
  236. { Adopted protocols }
  237. procedure setAccessibilityFrame(newValue: NSRect); message 'setAccessibilityFrame:';
  238. procedure setAccessibilityParent(newValue: id); message 'setAccessibilityParent:';
  239. procedure setAccessibilityIdentifier(newValue: NSString); message 'setAccessibilityIdentifier:';
  240. procedure setAccessibilityActivationPoint(newValue: NSPoint); message 'setAccessibilityActivationPoint:';
  241. function accessibilityActivationPoint: NSPoint; message 'accessibilityActivationPoint';
  242. procedure setAccessibilityAllowedValues(newValue: NSArray); message 'setAccessibilityAllowedValues:';
  243. function accessibilityAllowedValues: NSArray; message 'accessibilityAllowedValues';
  244. procedure setAccessibilityAlternateUIVisible(newValue: ObjCBOOL); message 'setAccessibilityAlternateUIVisible:';
  245. function isAccessibilityAlternateUIVisible: ObjCBOOL; message 'isAccessibilityAlternateUIVisible';
  246. procedure setAccessibilityApplicationFocusedUIElement(newValue: id); message 'setAccessibilityApplicationFocusedUIElement:';
  247. function accessibilityApplicationFocusedUIElement: id; message 'accessibilityApplicationFocusedUIElement';
  248. function accessibilityAttributedStringForRange (range: NSRange): NSAttributedString; message 'accessibilityAttributedStringForRange:'; { available in 10_10 }
  249. procedure setAccessibilityCancelButton(newValue: id); message 'setAccessibilityCancelButton:';
  250. function accessibilityCancelButton: id; message 'accessibilityCancelButton';
  251. function accessibilityCellForColumn_row (column: NSInteger; row: NSInteger): id; message 'accessibilityCellForColumn:row:'; { available in 10_10 }
  252. procedure setAccessibilityChildren(newValue: NSArray); message 'setAccessibilityChildren:';
  253. function accessibilityChildren: NSArray; message 'accessibilityChildren';
  254. procedure setAccessibilityClearButton(newValue: id); message 'setAccessibilityClearButton:';
  255. function accessibilityClearButton: id; message 'accessibilityClearButton';
  256. procedure setAccessibilityCloseButton(newValue: id); message 'setAccessibilityCloseButton:';
  257. function accessibilityCloseButton: id; message 'accessibilityCloseButton';
  258. procedure setAccessibilityColumnCount(newValue: NSInteger); message 'setAccessibilityColumnCount:';
  259. function accessibilityColumnCount: NSInteger; message 'accessibilityColumnCount';
  260. procedure setAccessibilityColumnHeaderUIElements(newValue: NSArray); message 'setAccessibilityColumnHeaderUIElements:';
  261. function accessibilityColumnHeaderUIElements: NSArray; message 'accessibilityColumnHeaderUIElements';
  262. procedure setAccessibilityColumnIndexRange(newValue: NSRange); message 'setAccessibilityColumnIndexRange:';
  263. function accessibilityColumnIndexRange: NSRange; message 'accessibilityColumnIndexRange';
  264. procedure setAccessibilityColumns(newValue: NSArray); message 'setAccessibilityColumns:';
  265. function accessibilityColumns: NSArray; message 'accessibilityColumns';
  266. procedure setAccessibilityColumnTitles(newValue: NSArray); message 'setAccessibilityColumnTitles:';
  267. function accessibilityColumnTitles: NSArray; message 'accessibilityColumnTitles';
  268. procedure setAccessibilityContents(newValue: NSArray); message 'setAccessibilityContents:';
  269. function accessibilityContents: NSArray; message 'accessibilityContents';
  270. procedure setAccessibilityCriticalValue(newValue: id); message 'setAccessibilityCriticalValue:';
  271. function accessibilityCriticalValue: id; message 'accessibilityCriticalValue';
  272. procedure setAccessibilityDecrementButton(newValue: id); message 'setAccessibilityDecrementButton:';
  273. function accessibilityDecrementButton: id; message 'accessibilityDecrementButton';
  274. procedure setAccessibilityDefaultButton(newValue: id); message 'setAccessibilityDefaultButton:';
  275. function accessibilityDefaultButton: id; message 'accessibilityDefaultButton';
  276. procedure setAccessibilityDisclosed(newValue: ObjCBOOL); message 'setAccessibilityDisclosed:';
  277. function isAccessibilityDisclosed: ObjCBOOL; message 'isAccessibilityDisclosed';
  278. procedure setAccessibilityDisclosedByRow(newValue: id); message 'setAccessibilityDisclosedByRow:';
  279. function accessibilityDisclosedByRow: id; message 'accessibilityDisclosedByRow';
  280. procedure setAccessibilityDisclosedRows(newValue: id); message 'setAccessibilityDisclosedRows:';
  281. function accessibilityDisclosedRows: id; message 'accessibilityDisclosedRows';
  282. procedure setAccessibilityDisclosureLevel(newValue: NSInteger); message 'setAccessibilityDisclosureLevel:';
  283. function accessibilityDisclosureLevel: NSInteger; message 'accessibilityDisclosureLevel';
  284. procedure setAccessibilityDocument(newValue: NSString); message 'setAccessibilityDocument:';
  285. function accessibilityDocument: NSString; message 'accessibilityDocument';
  286. procedure setAccessibilityEdited(newValue: ObjCBOOL); message 'setAccessibilityEdited:';
  287. function isAccessibilityEdited: ObjCBOOL; message 'isAccessibilityEdited';
  288. procedure setAccessibilityElement(newValue: ObjCBOOL); message 'setAccessibilityElement:';
  289. function isAccessibilityElement: ObjCBOOL; message 'isAccessibilityElement';
  290. procedure setAccessibilityEnabled(newValue: ObjCBOOL); message 'setAccessibilityEnabled:';
  291. function isAccessibilityEnabled: ObjCBOOL; message 'isAccessibilityEnabled';
  292. procedure setAccessibilityExpanded(newValue: ObjCBOOL); message 'setAccessibilityExpanded:';
  293. function isAccessibilityExpanded: ObjCBOOL; message 'isAccessibilityExpanded';
  294. procedure setAccessibilityExtrasMenuBar(newValue: id); message 'setAccessibilityExtrasMenuBar:';
  295. function accessibilityExtrasMenuBar: id; message 'accessibilityExtrasMenuBar';
  296. procedure setAccessibilityFilename(newValue: NSString); message 'setAccessibilityFilename:';
  297. function accessibilityFilename: NSString; message 'accessibilityFilename';
  298. procedure setAccessibilityFocused(newValue: ObjCBOOL); message 'setAccessibilityFocused:';
  299. procedure setAccessibilityFocusedWindow(newValue: id); message 'setAccessibilityFocusedWindow:';
  300. function accessibilityFocusedWindow: id; message 'accessibilityFocusedWindow';
  301. function accessibilityFrame: NSRect; message 'accessibilityFrame';
  302. function accessibilityFrameForRange (range: NSRange): NSRect; message 'accessibilityFrameForRange:'; { available in 10_10 }
  303. procedure setAccessibilityFrontmost(newValue: ObjCBOOL); message 'setAccessibilityFrontmost:';
  304. function isAccessibilityFrontmost: ObjCBOOL; message 'isAccessibilityFrontmost';
  305. procedure setAccessibilityFullScreenButton(newValue: id); message 'setAccessibilityFullScreenButton:';
  306. function accessibilityFullScreenButton: id; message 'accessibilityFullScreenButton';
  307. procedure setAccessibilityGrowArea(newValue: id); message 'setAccessibilityGrowArea:';
  308. function accessibilityGrowArea: id; message 'accessibilityGrowArea';
  309. procedure setAccessibilityHandles(newValue: NSArray); message 'setAccessibilityHandles:';
  310. function accessibilityHandles: NSArray; message 'accessibilityHandles';
  311. procedure setAccessibilityHeader(newValue: id); message 'setAccessibilityHeader:';
  312. function accessibilityHeader: id; message 'accessibilityHeader';
  313. procedure setAccessibilityHelp(newValue: NSString); message 'setAccessibilityHelp:';
  314. function accessibilityHelp: NSString; message 'accessibilityHelp';
  315. procedure setAccessibilityHidden(newValue: ObjCBOOL); message 'setAccessibilityHidden:';
  316. function isAccessibilityHidden: ObjCBOOL; message 'isAccessibilityHidden';
  317. procedure setAccessibilityHorizontalScrollBar(newValue: id); message 'setAccessibilityHorizontalScrollBar:';
  318. function accessibilityHorizontalScrollBar: id; message 'accessibilityHorizontalScrollBar';
  319. procedure setAccessibilityHorizontalUnitDescription(newValue: NSString); message 'setAccessibilityHorizontalUnitDescription:';
  320. function accessibilityHorizontalUnitDescription: NSString; message 'accessibilityHorizontalUnitDescription';
  321. procedure setAccessibilityHorizontalUnits(newValue: NSAccessibilityUnits); message 'setAccessibilityHorizontalUnits:';
  322. function accessibilityHorizontalUnits: NSAccessibilityUnits; message 'accessibilityHorizontalUnits';
  323. function accessibilityIdentifier: NSString; message 'accessibilityIdentifier';
  324. procedure setAccessibilityIncrementButton(newValue: id); message 'setAccessibilityIncrementButton:';
  325. function accessibilityIncrementButton: id; message 'accessibilityIncrementButton';
  326. procedure setAccessibilityIndex(newValue: NSInteger); message 'setAccessibilityIndex:';
  327. function accessibilityIndex: NSInteger; message 'accessibilityIndex';
  328. procedure setAccessibilityInsertionPointLineNumber(newValue: NSInteger); message 'setAccessibilityInsertionPointLineNumber:';
  329. function accessibilityInsertionPointLineNumber: NSInteger; message 'accessibilityInsertionPointLineNumber';
  330. procedure setAccessibilityLabel(newValue: NSString); message 'setAccessibilityLabel:';
  331. function accessibilityLabel: NSString; message 'accessibilityLabel';
  332. procedure setAccessibilityLabelUIElements(newValue: NSArray); message 'setAccessibilityLabelUIElements:';
  333. function accessibilityLabelUIElements: NSArray; message 'accessibilityLabelUIElements';
  334. procedure setAccessibilityLabelValue(newValue: single); message 'setAccessibilityLabelValue:';
  335. function accessibilityLabelValue: single; message 'accessibilityLabelValue';
  336. function accessibilityLayoutPointForScreenPoint (point: NSPoint): NSPoint; message 'accessibilityLayoutPointForScreenPoint:'; { available in 10_10 }
  337. function accessibilityLayoutSizeForScreenSize (size: NSSize): NSSize; message 'accessibilityLayoutSizeForScreenSize:'; { available in 10_10 }
  338. function accessibilityLineForIndex (index: NSInteger): NSInteger; message 'accessibilityLineForIndex:'; { available in 10_10 }
  339. procedure setAccessibilityLinkedUIElements(newValue: NSArray); message 'setAccessibilityLinkedUIElements:';
  340. function accessibilityLinkedUIElements: NSArray; message 'accessibilityLinkedUIElements';
  341. procedure setAccessibilityMain(newValue: ObjCBOOL); message 'setAccessibilityMain:';
  342. function isAccessibilityMain: ObjCBOOL; message 'isAccessibilityMain';
  343. procedure setAccessibilityMainWindow(newValue: id); message 'setAccessibilityMainWindow:';
  344. function accessibilityMainWindow: id; message 'accessibilityMainWindow';
  345. procedure setAccessibilityMarkerGroupUIElement(newValue: id); message 'setAccessibilityMarkerGroupUIElement:';
  346. function accessibilityMarkerGroupUIElement: id; message 'accessibilityMarkerGroupUIElement';
  347. procedure setAccessibilityMarkerTypeDescription(newValue: NSString); message 'setAccessibilityMarkerTypeDescription:';
  348. function accessibilityMarkerTypeDescription: NSString; message 'accessibilityMarkerTypeDescription';
  349. procedure setAccessibilityMarkerUIElements(newValue: NSArray); message 'setAccessibilityMarkerUIElements:';
  350. function accessibilityMarkerUIElements: NSArray; message 'accessibilityMarkerUIElements';
  351. procedure setAccessibilityMarkerValues(newValue: id); message 'setAccessibilityMarkerValues:';
  352. function accessibilityMarkerValues: id; message 'accessibilityMarkerValues';
  353. procedure setAccessibilityMaxValue(newValue: id); message 'setAccessibilityMaxValue:';
  354. function accessibilityMaxValue: id; message 'accessibilityMaxValue';
  355. procedure setAccessibilityMenuBar(newValue: id); message 'setAccessibilityMenuBar:';
  356. function accessibilityMenuBar: id; message 'accessibilityMenuBar';
  357. procedure setAccessibilityMinimizeButton(newValue: id); message 'setAccessibilityMinimizeButton:';
  358. function accessibilityMinimizeButton: id; message 'accessibilityMinimizeButton';
  359. procedure setAccessibilityMinimized(newValue: ObjCBOOL); message 'setAccessibilityMinimized:';
  360. function isAccessibilityMinimized: ObjCBOOL; message 'isAccessibilityMinimized';
  361. procedure setAccessibilityMinValue(newValue: id); message 'setAccessibilityMinValue:';
  362. function accessibilityMinValue: id; message 'accessibilityMinValue';
  363. procedure setAccessibilityModal(newValue: ObjCBOOL); message 'setAccessibilityModal:';
  364. function isAccessibilityModal: ObjCBOOL; message 'isAccessibilityModal';
  365. procedure setAccessibilityNextContents(newValue: NSArray); message 'setAccessibilityNextContents:';
  366. function accessibilityNextContents: NSArray; message 'accessibilityNextContents';
  367. procedure setAccessibilityNumberOfCharacters(newValue: NSInteger); message 'setAccessibilityNumberOfCharacters:';
  368. function accessibilityNumberOfCharacters: NSInteger; message 'accessibilityNumberOfCharacters';
  369. procedure setAccessibilityOrderedByRow(newValue: ObjCBOOL); message 'setAccessibilityOrderedByRow:';
  370. function isAccessibilityOrderedByRow: ObjCBOOL; message 'isAccessibilityOrderedByRow';
  371. procedure setAccessibilityOrientation(newValue: NSAccessibilityOrientation); message 'setAccessibilityOrientation:';
  372. function accessibilityOrientation: NSAccessibilityOrientation; message 'accessibilityOrientation';
  373. procedure setAccessibilityOverflowButton(newValue: id); message 'setAccessibilityOverflowButton:';
  374. function accessibilityOverflowButton: id; message 'accessibilityOverflowButton';
  375. function accessibilityParent: id; message 'accessibilityParent';
  376. function accessibilityPerformCancel: ObjCBOOL; message 'accessibilityPerformCancel'; { available in 10_10 }
  377. function accessibilityPerformConfirm: ObjCBOOL; message 'accessibilityPerformConfirm'; { available in 10_10 }
  378. function accessibilityPerformDecrement: ObjCBOOL; message 'accessibilityPerformDecrement'; { available in 10_10 }
  379. function accessibilityPerformDelete: ObjCBOOL; message 'accessibilityPerformDelete'; { available in 10_10 }
  380. function accessibilityPerformIncrement: ObjCBOOL; message 'accessibilityPerformIncrement'; { available in 10_10 }
  381. function accessibilityPerformPick: ObjCBOOL; message 'accessibilityPerformPick'; { available in 10_10 }
  382. function accessibilityPerformPress: ObjCBOOL; message 'accessibilityPerformPress'; { available in 10_10 }
  383. function accessibilityPerformRaise: ObjCBOOL; message 'accessibilityPerformRaise'; { available in 10_10 }
  384. function accessibilityPerformShowAlternateUI: ObjCBOOL; message 'accessibilityPerformShowAlternateUI'; { available in 10_10 }
  385. function accessibilityPerformShowDefaultUI: ObjCBOOL; message 'accessibilityPerformShowDefaultUI'; { available in 10_10 }
  386. function accessibilityPerformShowMenu: ObjCBOOL; message 'accessibilityPerformShowMenu'; { available in 10_10 }
  387. procedure setAccessibilityPlaceholderValue(newValue: NSString); message 'setAccessibilityPlaceholderValue:';
  388. function accessibilityPlaceholderValue: NSString; message 'accessibilityPlaceholderValue';
  389. procedure setAccessibilityPreviousContents(newValue: NSArray); message 'setAccessibilityPreviousContents:';
  390. function accessibilityPreviousContents: NSArray; message 'accessibilityPreviousContents';
  391. procedure setAccessibilityProtectedContent(newValue: ObjCBOOL); message 'setAccessibilityProtectedContent:';
  392. function isAccessibilityProtectedContent: ObjCBOOL; message 'isAccessibilityProtectedContent';
  393. procedure setAccessibilityProxy(newValue: id); message 'setAccessibilityProxy:';
  394. function accessibilityProxy: id; message 'accessibilityProxy';
  395. function accessibilityRangeForIndex (index: NSInteger): NSRange; message 'accessibilityRangeForIndex:'; { available in 10_10 }
  396. function accessibilityRangeForLine (line: NSInteger): NSRange; message 'accessibilityRangeForLine:'; { available in 10_10 }
  397. function accessibilityRangeForPosition (point: NSPoint): NSRange; message 'accessibilityRangeForPosition:'; { available in 10_10 }
  398. procedure setAccessibilityRole(newValue: NSString); message 'setAccessibilityRole:';
  399. function accessibilityRole: NSString; message 'accessibilityRole';
  400. procedure setAccessibilityRoleDescription(newValue: NSString); message 'setAccessibilityRoleDescription:';
  401. function accessibilityRoleDescription: NSString; message 'accessibilityRoleDescription';
  402. procedure setAccessibilityRowCount(newValue: NSInteger); message 'setAccessibilityRowCount:';
  403. function accessibilityRowCount: NSInteger; message 'accessibilityRowCount';
  404. procedure setAccessibilityRowHeaderUIElements(newValue: NSArray); message 'setAccessibilityRowHeaderUIElements:';
  405. function accessibilityRowHeaderUIElements: NSArray; message 'accessibilityRowHeaderUIElements';
  406. procedure setAccessibilityRowIndexRange(newValue: NSRange); message 'setAccessibilityRowIndexRange:';
  407. function accessibilityRowIndexRange: NSRange; message 'accessibilityRowIndexRange';
  408. procedure setAccessibilityRows(newValue: NSArray); message 'setAccessibilityRows:';
  409. function accessibilityRows: NSArray; message 'accessibilityRows';
  410. function accessibilityRTFForRange (range: NSRange): NSData; message 'accessibilityRTFForRange:'; { available in 10_10 }
  411. procedure setAccessibilityRulerMarkerType(newValue: NSAccessibilityRulerMarkerType); message 'setAccessibilityRulerMarkerType:';
  412. function accessibilityRulerMarkerType: NSAccessibilityRulerMarkerType; message 'accessibilityRulerMarkerType';
  413. function accessibilityScreenPointForLayoutPoint (point: NSPoint): NSPoint; message 'accessibilityScreenPointForLayoutPoint:'; { available in 10_10 }
  414. function accessibilityScreenSizeForLayoutSize (size: NSSize): NSSize; message 'accessibilityScreenSizeForLayoutSize:'; { available in 10_10 }
  415. procedure setAccessibilitySearchButton(newValue: id); message 'setAccessibilitySearchButton:';
  416. function accessibilitySearchButton: id; message 'accessibilitySearchButton';
  417. procedure setAccessibilitySearchMenu(newValue: id); message 'setAccessibilitySearchMenu:';
  418. function accessibilitySearchMenu: id; message 'accessibilitySearchMenu';
  419. procedure setAccessibilitySelected(newValue: ObjCBOOL); message 'setAccessibilitySelected:';
  420. function isAccessibilitySelected: ObjCBOOL; message 'isAccessibilitySelected';
  421. procedure setAccessibilitySelectedCells(newValue: NSArray); message 'setAccessibilitySelectedCells:';
  422. function accessibilitySelectedCells: NSArray; message 'accessibilitySelectedCells';
  423. procedure setAccessibilitySelectedChildren(newValue: NSArray); message 'setAccessibilitySelectedChildren:';
  424. function accessibilitySelectedChildren: NSArray; message 'accessibilitySelectedChildren';
  425. procedure setAccessibilitySelectedColumns(newValue: NSArray); message 'setAccessibilitySelectedColumns:';
  426. function accessibilitySelectedColumns: NSArray; message 'accessibilitySelectedColumns';
  427. procedure setAccessibilitySelectedRows(newValue: NSArray); message 'setAccessibilitySelectedRows:';
  428. function accessibilitySelectedRows: NSArray; message 'accessibilitySelectedRows';
  429. procedure setAccessibilitySelectedText(newValue: NSString); message 'setAccessibilitySelectedText:';
  430. function accessibilitySelectedText: NSString; message 'accessibilitySelectedText';
  431. procedure setAccessibilitySelectedTextRange(newValue: NSRange); message 'setAccessibilitySelectedTextRange:';
  432. function accessibilitySelectedTextRange: NSRange; message 'accessibilitySelectedTextRange';
  433. procedure setAccessibilitySelectedTextRanges(newValue: NSArray); message 'setAccessibilitySelectedTextRanges:';
  434. function accessibilitySelectedTextRanges: NSArray; message 'accessibilitySelectedTextRanges';
  435. procedure setAccessibilityServesAsTitleForUIElements(newValue: NSArray); message 'setAccessibilityServesAsTitleForUIElements:';
  436. function accessibilityServesAsTitleForUIElements: NSArray; message 'accessibilityServesAsTitleForUIElements';
  437. procedure setAccessibilitySharedCharacterRange(newValue: NSRange); message 'setAccessibilitySharedCharacterRange:';
  438. function accessibilitySharedCharacterRange: NSRange; message 'accessibilitySharedCharacterRange';
  439. procedure setAccessibilitySharedFocusElements(newValue: NSArray); message 'setAccessibilitySharedFocusElements:';
  440. function accessibilitySharedFocusElements: NSArray; message 'accessibilitySharedFocusElements';
  441. procedure setAccessibilitySharedTextUIElements(newValue: NSArray); message 'setAccessibilitySharedTextUIElements:';
  442. function accessibilitySharedTextUIElements: NSArray; message 'accessibilitySharedTextUIElements';
  443. procedure setAccessibilityShownMenu(newValue: id); message 'setAccessibilityShownMenu:';
  444. function accessibilityShownMenu: id; message 'accessibilityShownMenu';
  445. procedure setAccessibilitySortDirection(newValue: NSAccessibilitySortDirection); message 'setAccessibilitySortDirection:';
  446. function accessibilitySortDirection: NSAccessibilitySortDirection; message 'accessibilitySortDirection';
  447. procedure setAccessibilitySplitters(newValue: NSArray); message 'setAccessibilitySplitters:';
  448. function accessibilitySplitters: NSArray; message 'accessibilitySplitters';
  449. function accessibilityStringForRange (range: NSRange): NSString; message 'accessibilityStringForRange:'; { available in 10_10 }
  450. function accessibilityStyleRangeForIndex (index: NSInteger): NSRange; message 'accessibilityStyleRangeForIndex:'; { available in 10_10 }
  451. procedure setAccessibilitySubrole(newValue: NSString); message 'setAccessibilitySubrole:';
  452. function accessibilitySubrole: NSString; message 'accessibilitySubrole';
  453. procedure setAccessibilityTabs(newValue: NSArray); message 'setAccessibilityTabs:';
  454. function accessibilityTabs: NSArray; message 'accessibilityTabs';
  455. procedure setAccessibilityTitle(newValue: NSString); message 'setAccessibilityTitle:';
  456. function accessibilityTitle: NSString; message 'accessibilityTitle';
  457. procedure setAccessibilityTitleUIElement(newValue: id); message 'setAccessibilityTitleUIElement:';
  458. function accessibilityTitleUIElement: id; message 'accessibilityTitleUIElement';
  459. procedure setAccessibilityToolbarButton(newValue: id); message 'setAccessibilityToolbarButton:';
  460. function accessibilityToolbarButton: id; message 'accessibilityToolbarButton';
  461. procedure setAccessibilityTopLevelUIElement(newValue: id); message 'setAccessibilityTopLevelUIElement:';
  462. function accessibilityTopLevelUIElement: id; message 'accessibilityTopLevelUIElement';
  463. procedure setAccessibilityUnitDescription(newValue: NSString); message 'setAccessibilityUnitDescription:';
  464. function accessibilityUnitDescription: NSString; message 'accessibilityUnitDescription';
  465. procedure setAccessibilityUnits(newValue: NSAccessibilityUnits); message 'setAccessibilityUnits:';
  466. function accessibilityUnits: NSAccessibilityUnits; message 'accessibilityUnits';
  467. procedure setAccessibilityURL(newValue: NSURL); message 'setAccessibilityURL:';
  468. function accessibilityURL: NSURL; message 'accessibilityURL';
  469. procedure setAccessibilityValue(newValue: id); message 'setAccessibilityValue:';
  470. function accessibilityValue: id; message 'accessibilityValue';
  471. procedure setAccessibilityValueDescription(newValue: NSString); message 'setAccessibilityValueDescription:';
  472. function accessibilityValueDescription: NSString; message 'accessibilityValueDescription';
  473. procedure setAccessibilityVerticalScrollBar(newValue: id); message 'setAccessibilityVerticalScrollBar:';
  474. function accessibilityVerticalScrollBar: id; message 'accessibilityVerticalScrollBar';
  475. procedure setAccessibilityVerticalUnitDescription(newValue: NSString); message 'setAccessibilityVerticalUnitDescription:';
  476. function accessibilityVerticalUnitDescription: NSString; message 'accessibilityVerticalUnitDescription';
  477. procedure setAccessibilityVerticalUnits(newValue: NSAccessibilityUnits); message 'setAccessibilityVerticalUnits:';
  478. function accessibilityVerticalUnits: NSAccessibilityUnits; message 'accessibilityVerticalUnits';
  479. procedure setAccessibilityVisibleCells(newValue: NSArray); message 'setAccessibilityVisibleCells:';
  480. function accessibilityVisibleCells: NSArray; message 'accessibilityVisibleCells';
  481. procedure setAccessibilityVisibleCharacterRange(newValue: NSRange); message 'setAccessibilityVisibleCharacterRange:';
  482. function accessibilityVisibleCharacterRange: NSRange; message 'accessibilityVisibleCharacterRange';
  483. procedure setAccessibilityVisibleChildren(newValue: NSArray); message 'setAccessibilityVisibleChildren:';
  484. function accessibilityVisibleChildren: NSArray; message 'accessibilityVisibleChildren';
  485. procedure setAccessibilityVisibleColumns(newValue: NSArray); message 'setAccessibilityVisibleColumns:';
  486. function accessibilityVisibleColumns: NSArray; message 'accessibilityVisibleColumns';
  487. procedure setAccessibilityVisibleRows(newValue: NSArray); message 'setAccessibilityVisibleRows:';
  488. function accessibilityVisibleRows: NSArray; message 'accessibilityVisibleRows';
  489. procedure setAccessibilityWarningValue(newValue: id); message 'setAccessibilityWarningValue:';
  490. function accessibilityWarningValue: id; message 'accessibilityWarningValue';
  491. procedure setAccessibilityWindow(newValue: id); message 'setAccessibilityWindow:';
  492. function accessibilityWindow: id; message 'accessibilityWindow';
  493. procedure setAccessibilityWindows(newValue: NSArray); message 'setAccessibilityWindows:';
  494. function accessibilityWindows: NSArray; message 'accessibilityWindows';
  495. procedure setAccessibilityZoomButton(newValue: id); message 'setAccessibilityZoomButton:';
  496. function accessibilityZoomButton: id; message 'accessibilityZoomButton';
  497. function isAccessibilityFocused: ObjCBOOL; message 'isAccessibilityFocused';
  498. function isAccessibilitySelectorAllowed (selector: SEL): ObjCBOOL; message 'isAccessibilitySelectorAllowed:'; { available in 10_10 }
  499. function validateUserInterfaceItem (anItem: NSValidatedUserInterfaceItemProtocol): ObjCBOOL; message 'validateUserInterfaceItem:';
  500. end;
  501. type
  502. NSWindowsMenu = objccategory external (NSApplication)
  503. procedure setWindowsMenu(newValue: NSMenu); message 'setWindowsMenu:';
  504. function windowsMenu: NSMenu; message 'windowsMenu';
  505. procedure arrangeInFront (sender: id); message 'arrangeInFront:';
  506. procedure removeWindowsItem (win: NSWindow); message 'removeWindowsItem:';
  507. procedure addWindowsItem_title_filename (win: NSWindow; aString: NSString; isFilename: ObjCBOOL); message 'addWindowsItem:title:filename:';
  508. procedure changeWindowsItem_title_filename (win: NSWindow; aString: NSString; isFilename: ObjCBOOL); message 'changeWindowsItem:title:filename:';
  509. procedure updateWindowsItem (win: NSWindow); message 'updateWindowsItem:';
  510. procedure miniaturizeAll (sender: id); message 'miniaturizeAll:';
  511. end;
  512. type
  513. NSFullKeyboardAccess = objccategory external (NSApplication)
  514. function isFullKeyboardAccessEnabled: ObjCBOOL; message 'isFullKeyboardAccessEnabled';
  515. end;
  516. {$endif}
  517. {$ifdef TYPES}
  518. const
  519. NSTerminateCancel = 0;
  520. NSTerminateNow = 1;
  521. NSTerminateLater = 2;
  522. type
  523. NSApplicationTerminateReply = NSUInteger;
  524. NSApplicationTerminateReplyPtr = ^NSApplicationTerminateReply;
  525. const
  526. NSPrintingCancelled = 0;
  527. NSPrintingSuccess = 1;
  528. NSPrintingFailure = 3;
  529. NSPrintingReplyLater = 2;
  530. type
  531. NSApplicationPrintReply = NSUInteger;
  532. NSApplicationPrintReplyPtr = ^NSApplicationPrintReply;
  533. {$endif}
  534. {$ifdef PROTOCOLS}
  535. type
  536. NSApplicationDelegateProtocol = objcprotocol external name 'NSApplicationDelegate' (NSObjectProtocol)
  537. optional
  538. function applicationShouldTerminate (sender: NSApplication): NSApplicationTerminateReply; message 'applicationShouldTerminate:';
  539. function application_openFile (sender: NSApplication; filename: NSString): ObjCBOOL; message 'application:openFile:';
  540. procedure application_openFiles (sender: NSApplication; filenames: NSArray); message 'application:openFiles:';
  541. function application_openTempFile (sender: NSApplication; filename: NSString): ObjCBOOL; message 'application:openTempFile:';
  542. function applicationShouldOpenUntitledFile (sender: NSApplication): ObjCBOOL; message 'applicationShouldOpenUntitledFile:';
  543. function applicationOpenUntitledFile (sender: NSApplication): ObjCBOOL; message 'applicationOpenUntitledFile:';
  544. function application_openFileWithoutUI (sender: id; filename: NSString): ObjCBOOL; message 'application:openFileWithoutUI:';
  545. function application_printFile (sender: NSApplication; filename: NSString): ObjCBOOL; message 'application:printFile:';
  546. function application_printFiles_withSettings_showPrintPanels (application: NSApplication; fileNames: NSArray; printSettings: NSDictionary; showPrintPanels: ObjCBOOL): NSApplicationPrintReply; message 'application:printFiles:withSettings:showPrintPanels:';
  547. function applicationShouldTerminateAfterLastWindowClosed (sender: NSApplication): ObjCBOOL; message 'applicationShouldTerminateAfterLastWindowClosed:';
  548. function applicationShouldHandleReopen_hasVisibleWindows (sender: NSApplication; flag: ObjCBOOL): ObjCBOOL; message 'applicationShouldHandleReopen:hasVisibleWindows:';
  549. function applicationDockMenu (sender: NSApplication): NSMenu; message 'applicationDockMenu:';
  550. function application_willPresentError (application: NSApplication; error: NSError): NSError; message 'application:willPresentError:';
  551. procedure application_didRegisterForRemoteNotificationsWithDeviceToken (application: NSApplication; deviceToken: NSData); message 'application:didRegisterForRemoteNotificationsWithDeviceToken:'; { available in 10_7 }
  552. procedure application_didFailToRegisterForRemoteNotificationsWithError (application: NSApplication; error: NSError); message 'application:didFailToRegisterForRemoteNotificationsWithError:'; { available in 10_7 }
  553. procedure application_didReceiveRemoteNotification (application: NSApplication; userInfo: NSDictionary); message 'application:didReceiveRemoteNotification:'; { available in 10_7 }
  554. procedure application_willEncodeRestorableState (app: NSApplication; coder: NSCoder); message 'application:willEncodeRestorableState:'; { available in 10_7 }
  555. procedure application_didDecodeRestorableState (app: NSApplication; coder: NSCoder); message 'application:didDecodeRestorableState:'; { available in 10_7 }
  556. function application_willContinueUserActivityWithType (application: NSApplication; userActivityType: NSString): ObjCBOOL; message 'application:willContinueUserActivityWithType:'; { available in 10_10 }
  557. function application_continueUserActivity_restorationHandler (application: NSApplication; userActivity: NSUserActivity; restorationHandler: OpaqueCBlock): ObjCBOOL; message 'application:continueUserActivity:restorationHandler:'; { available in 10_10 }
  558. procedure application_didFailToContinueUserActivityWithType_error (application: NSApplication; userActivityType: NSString; error: NSError); message 'application:didFailToContinueUserActivityWithType:error:'; { available in 10_10 }
  559. procedure application_didUpdateUserActivity (application: NSApplication; userActivity: NSUserActivity); message 'application:didUpdateUserActivity:'; { available in 10_10 }
  560. procedure applicationWillFinishLaunching (notification: NSNotification); message 'applicationWillFinishLaunching:';
  561. procedure applicationDidFinishLaunching (notification: NSNotification); message 'applicationDidFinishLaunching:';
  562. procedure applicationWillHide (notification: NSNotification); message 'applicationWillHide:';
  563. procedure applicationDidHide (notification: NSNotification); message 'applicationDidHide:';
  564. procedure applicationWillUnhide (notification: NSNotification); message 'applicationWillUnhide:';
  565. procedure applicationDidUnhide (notification: NSNotification); message 'applicationDidUnhide:';
  566. procedure applicationWillBecomeActive (notification: NSNotification); message 'applicationWillBecomeActive:';
  567. procedure applicationDidBecomeActive (notification: NSNotification); message 'applicationDidBecomeActive:';
  568. procedure applicationWillResignActive (notification: NSNotification); message 'applicationWillResignActive:';
  569. procedure applicationDidResignActive (notification: NSNotification); message 'applicationDidResignActive:';
  570. procedure applicationWillUpdate (notification: NSNotification); message 'applicationWillUpdate:';
  571. procedure applicationDidUpdate (notification: NSNotification); message 'applicationDidUpdate:';
  572. procedure applicationWillTerminate (notification: NSNotification); message 'applicationWillTerminate:';
  573. procedure applicationDidChangeScreenParameters (notification: NSNotification); message 'applicationDidChangeScreenParameters:';
  574. procedure applicationDidChangeOcclusionState (notification: NSNotification); message 'applicationDidChangeOcclusionState:'; { available in 10_9 }
  575. end;
  576. {$endif}
  577. {$ifdef CLASSES}
  578. type
  579. NSServicesMenu = objccategory external (NSApplication)
  580. procedure setServicesMenu(newValue: NSMenu); message 'setServicesMenu:';
  581. function servicesMenu: NSMenu; message 'servicesMenu';
  582. procedure registerServicesMenuSendTypes_returnTypes (sendTypes: NSArray; returnTypes: NSArray); message 'registerServicesMenuSendTypes:returnTypes:';
  583. end;
  584. {$endif}
  585. {$ifdef PROTOCOLS}
  586. type
  587. NSServicesMenuRequestorProtocol = objcprotocol external name 'NSServicesMenuRequestor' (NSObjectProtocol)
  588. optional
  589. function writeSelectionToPasteboard_types (pboard: NSPasteboard; types: NSArray): ObjCBOOL; message 'writeSelectionToPasteboard:types:';
  590. function readSelectionFromPasteboard (pboard: NSPasteboard): ObjCBOOL; message 'readSelectionFromPasteboard:';
  591. end;
  592. {$endif}
  593. {$ifdef CLASSES}
  594. type
  595. NSServicesHandling = objccategory external (NSApplication)
  596. procedure setServicesProvider(newValue: id); message 'setServicesProvider:';
  597. function servicesProvider: id; message 'servicesProvider';
  598. end;
  599. type
  600. NSStandardAboutPanel = objccategory external (NSApplication)
  601. procedure orderFrontStandardAboutPanel (sender: id); message 'orderFrontStandardAboutPanel:';
  602. procedure orderFrontStandardAboutPanelWithOptions (optionsDictionary: NSDictionary); message 'orderFrontStandardAboutPanelWithOptions:';
  603. end;
  604. {$endif}
  605. {$ifdef TYPES}
  606. type
  607. NSUserInterfaceLayoutDirection = NSInteger;
  608. NSUserInterfaceLayoutDirectionPtr = ^NSUserInterfaceLayoutDirection;
  609. {$endif}
  610. {$ifdef CLASSES}
  611. type
  612. NSApplicationLayoutDirection = objccategory external (NSApplication)
  613. function userInterfaceLayoutDirection: NSUserInterfaceLayoutDirection; message 'userInterfaceLayoutDirection';
  614. end;
  615. type
  616. NSRestorableUserInterface = objccategory external (NSApplication)
  617. procedure disableRelaunchOnLogin; message 'disableRelaunchOnLogin'; { available in 10_7 }
  618. procedure enableRelaunchOnLogin; message 'enableRelaunchOnLogin'; { available in 10_7 }
  619. end;
  620. {$endif}
  621. {$ifdef TYPES}
  622. type
  623. NSRemoteNotificationType = NSUInteger;
  624. NSRemoteNotificationTypePtr = ^NSRemoteNotificationType;
  625. {$endif}
  626. {$ifdef CLASSES}
  627. type
  628. NSRemoteNotifications = objccategory external (NSApplication)
  629. procedure registerForRemoteNotificationTypes (types: NSRemoteNotificationType); message 'registerForRemoteNotificationTypes:'; { available in 10_7 }
  630. procedure unregisterForRemoteNotifications; message 'unregisterForRemoteNotifications'; { available in 10_7 }
  631. function enabledRemoteNotificationTypes: NSRemoteNotificationType; message 'enabledRemoteNotificationTypes';
  632. end;
  633. {$endif}
  634. {$ifdef FUNCTIONS}
  635. function NSApplicationMain(argc: cint; argv: PPAnsiChar { variable size array of PAnsiChar }): cint; cdecl; external;
  636. function NSApplicationLoad: ObjCBOOL; cdecl; external;
  637. function NSShowsServicesMenuItem(itemName: NSString): ObjCBOOL; cdecl; external;
  638. function NSSetShowsServicesMenuItem(itemName: NSString; enabled: ObjCBOOL): NSInteger; cdecl; external;
  639. procedure NSUpdateDynamicServices; cdecl; external;
  640. function NSPerformService(itemName: NSString; pboard: NSPasteboard): ObjCBOOL; cdecl; external;
  641. procedure NSRegisterServicesProvider(provider: id; name: NSString); cdecl; external;
  642. procedure NSUnregisterServicesProvider(name: NSString); cdecl; external;
  643. {$endif}
  644. {$ifdef EXTERNAL_SYMBOLS}
  645. var
  646. NSApplicationDidBecomeActiveNotification: NSString; cvar; external;
  647. NSApplicationDidHideNotification: NSString; cvar; external;
  648. NSApplicationDidFinishLaunchingNotification: NSString; cvar; external;
  649. NSApplicationDidResignActiveNotification: NSString; cvar; external;
  650. NSApplicationDidUnhideNotification: NSString; cvar; external;
  651. NSApplicationDidUpdateNotification: NSString; cvar; external;
  652. NSApplicationWillBecomeActiveNotification: NSString; cvar; external;
  653. NSApplicationWillHideNotification: NSString; cvar; external;
  654. NSApplicationWillFinishLaunchingNotification: NSString; cvar; external;
  655. NSApplicationWillResignActiveNotification: NSString; cvar; external;
  656. NSApplicationWillUnhideNotification: NSString; cvar; external;
  657. NSApplicationWillUpdateNotification: NSString; cvar; external;
  658. NSApplicationWillTerminateNotification: NSString; cvar; external;
  659. NSApplicationDidChangeScreenParametersNotification: NSString; cvar; external;
  660. NSApplicationLaunchIsDefaultLaunchKey: NSString { available in 10_7 }; cvar; external;
  661. NSApplicationLaunchUserNotificationKey: NSString { available in 10_8 }; cvar; external;
  662. NSApplicationLaunchRemoteNotificationKey: NSString deprecated 'in 10_7, 10_8'; cvar; external;
  663. NSApplicationDidChangeOcclusionStateNotification: NSString { available in 10_9 }; cvar; external;
  664. {$endif}
  665. {$ifdef CLASSES}
  666. type
  667. NSApplication_NSDeprecated = objccategory external name 'NSDeprecated' (NSApplication)
  668. function runModalForWindow_relativeToWindow (theWindow: NSWindow; docWindow: NSWindow): NSInteger; message 'runModalForWindow:relativeToWindow:'; deprecated 'in 10_0, 10_0';
  669. function beginModalSessionForWindow_relativeToWindow (theWindow: NSWindow; docWindow: NSWindow): NSModalSession; message 'beginModalSessionForWindow:relativeToWindow:'; deprecated 'in 10_0, 10_0';
  670. procedure application_printFiles (sender: NSApplication; filenames: NSArray); message 'application:printFiles:'; deprecated 'in 10_3, 10_4';
  671. procedure beginSheet_modalForWindow_modalDelegate_didEndSelector_contextInfo (sheet: NSWindow; docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; contextInfo: pointer); message 'beginSheet:modalForWindow:modalDelegate:didEndSelector:contextInfo:'; deprecated 'in 10_0, 10_10, "Use -[NSWindow beginSheet:completionHandler:] instead"';
  672. procedure endSheet (sheet: NSWindow); message 'endSheet:'; deprecated 'in 10_0, 10_10, "Use -[NSWindow endSheet:] instead"';
  673. procedure endSheet_returnCode (sheet: NSWindow; returnCode: NSInteger); message 'endSheet:returnCode:'; deprecated 'in 10_0, 10_10, "Use -[NSWindow endSheet:returnCode:] instead"';
  674. end;
  675. {$endif}