Browse Source

* updated to Mac OS X 10.6 SDK
* generated with version 2.1.2 of the conversion script, with many
improvements (script and instructions to regenerate headers will
be committed separately)
o QuartzCore framework translation
o categories are no longer merged into classes, but separate
o corrected several C->Pascal type definitions
o handle pointer types for parameters, return types and property types
o handle struct/class fields that are arrays or pointers
o handle pointers to id
o handle external functions that return "void *" (they were parsed as
procedures)
o handle anonymous classes (@class NSAnonType, such as CIImage) using
the "NSAnonType = objcclass; external;" syntax
o corrected handling of opaque structs
o fixed parsing of function pointer types
o instance-bitfields that do not appear in a struct are now recognised
o bitpacked structs are now translated into bitpacked records (but only
if they only contain bitpacked fields)
o C macros indicating deprecation are now translated into "deprecated"
modifiers for methods/variables/functions/properties
o no longer ignore deprecated categories, because some categories are
deprecated in Mac OS X 10.5/10.6, and we want to support writing code
for older systems too
o several fixes to property and enum parsing

git-svn-id: trunk@16521 -

Jonas Maebe 14 years ago
parent
commit
c132727caf
100 changed files with 4887 additions and 2879 deletions
  1. 81 5
      .gitattributes
  2. 186 0
      packages/cocoaint/Makefile
  3. 2 1
      packages/cocoaint/Makefile.fpc
  4. 226 0
      packages/cocoaint/src/AnonClassDefinitionsCoredata.pas
  5. 424 0
      packages/cocoaint/src/AnonClassDefinitionsQuartzcore.pas
  6. 344 0
      packages/cocoaint/src/AnonClassDefinitionsWebkit.pas
  7. 26 10
      packages/cocoaint/src/CocoaAll.pas
  8. 8 10
      packages/cocoaint/src/CoreData.pas
  9. 0 2
      packages/cocoaint/src/Foundation.pas
  10. 1 1
      packages/cocoaint/src/IvarSize.pas
  11. 0 658
      packages/cocoaint/src/NSDelegatesAll.pas
  12. 0 57
      packages/cocoaint/src/UndefinedClasses.inc
  13. 22 71
      packages/cocoaint/src/UndefinedTypes.inc
  14. 8 7
      packages/cocoaint/src/WebKit.pas
  15. 0 116
      packages/cocoaint/src/WebKitDelegatesAll.pas
  16. 16 15
      packages/cocoaint/src/appkit/AppKit.inc
  17. 25 16
      packages/cocoaint/src/appkit/NSATSTypesetter.inc
  18. 329 195
      packages/cocoaint/src/appkit/NSAccessibility.inc
  19. 6 20
      packages/cocoaint/src/appkit/NSActionCell.inc
  20. 12 3
      packages/cocoaint/src/appkit/NSAffineTransform.inc
  21. 46 32
      packages/cocoaint/src/appkit/NSAlert.inc
  22. 69 29
      packages/cocoaint/src/appkit/NSAnimation.inc
  23. 3 2
      packages/cocoaint/src/appkit/NSAnimationContext.inc
  24. 17 1
      packages/cocoaint/src/appkit/NSAppleScriptExtensions.inc
  25. 173 65
      packages/cocoaint/src/appkit/NSApplication.inc
  26. 23 1
      packages/cocoaint/src/appkit/NSApplicationScripting.inc
  27. 15 10
      packages/cocoaint/src/appkit/NSArrayController.inc
  28. 127 119
      packages/cocoaint/src/appkit/NSAttributedString.inc
  29. 46 19
      packages/cocoaint/src/appkit/NSBezierPath.inc
  30. 55 23
      packages/cocoaint/src/appkit/NSBitmapImageRep.inc
  31. 23 12
      packages/cocoaint/src/appkit/NSBox.inc
  32. 108 29
      packages/cocoaint/src/appkit/NSBrowser.inc
  33. 2 1
      packages/cocoaint/src/appkit/NSBrowserCell.inc
  34. 23 7
      packages/cocoaint/src/appkit/NSButton.inc
  35. 37 19
      packages/cocoaint/src/appkit/NSButtonCell.inc
  36. 12 4
      packages/cocoaint/src/appkit/NSCIImageRep.inc
  37. 6 5
      packages/cocoaint/src/appkit/NSCachedImageRep.inc
  38. 115 71
      packages/cocoaint/src/appkit/NSCell.inc
  39. 22 10
      packages/cocoaint/src/appkit/NSClipView.inc
  40. 98 57
      packages/cocoaint/src/appkit/NSCollectionView.inc
  41. 24 11
      packages/cocoaint/src/appkit/NSColor.inc
  42. 20 11
      packages/cocoaint/src/appkit/NSColorList.inc
  43. 45 33
      packages/cocoaint/src/appkit/NSColorPanel.inc
  44. 8 4
      packages/cocoaint/src/appkit/NSColorPicker.inc
  45. 1 1
      packages/cocoaint/src/appkit/NSColorPicking.inc
  46. 18 6
      packages/cocoaint/src/appkit/NSColorSpace.inc
  47. 11 6
      packages/cocoaint/src/appkit/NSColorWell.inc
  48. 32 6
      packages/cocoaint/src/appkit/NSComboBox.inc
  49. 32 14
      packages/cocoaint/src/appkit/NSComboBoxCell.inc
  50. 47 10
      packages/cocoaint/src/appkit/NSControl.inc
  51. 23 14
      packages/cocoaint/src/appkit/NSController.inc
  52. 18 4
      packages/cocoaint/src/appkit/NSCursor.inc
  53. 5 4
      packages/cocoaint/src/appkit/NSCustomImageRep.inc
  54. 2 1
      packages/cocoaint/src/appkit/NSDatePicker.inc
  55. 36 17
      packages/cocoaint/src/appkit/NSDatePickerCell.inc
  56. 29 13
      packages/cocoaint/src/appkit/NSDictionaryController.inc
  57. 29 8
      packages/cocoaint/src/appkit/NSDockTile.inc
  58. 46 42
      packages/cocoaint/src/appkit/NSDocument.inc
  59. 27 20
      packages/cocoaint/src/appkit/NSDocumentController.inc
  60. 22 1
      packages/cocoaint/src/appkit/NSDocumentScripting.inc
  61. 36 1
      packages/cocoaint/src/appkit/NSDragging.inc
  62. 50 26
      packages/cocoaint/src/appkit/NSDrawer.inc
  63. 5 4
      packages/cocoaint/src/appkit/NSEPSImageRep.inc
  64. 37 37
      packages/cocoaint/src/appkit/NSErrors.inc
  65. 111 42
      packages/cocoaint/src/appkit/NSEvent.inc
  66. 60 28
      packages/cocoaint/src/appkit/NSFileWrapper.inc
  67. 66 23
      packages/cocoaint/src/appkit/NSFont.inc
  68. 59 50
      packages/cocoaint/src/appkit/NSFontDescriptor.inc
  69. 33 14
      packages/cocoaint/src/appkit/NSFontManager.inc
  70. 62 52
      packages/cocoaint/src/appkit/NSFontPanel.inc
  71. 1 1
      packages/cocoaint/src/appkit/NSForm.inc
  72. 11 6
      packages/cocoaint/src/appkit/NSFormCell.inc
  73. 7 6
      packages/cocoaint/src/appkit/NSGlyphGenerator.inc
  74. 9 2
      packages/cocoaint/src/appkit/NSGlyphInfo.inc
  75. 20 13
      packages/cocoaint/src/appkit/NSGradient.inc
  76. 86 61
      packages/cocoaint/src/appkit/NSGraphics.inc
  77. 17 16
      packages/cocoaint/src/appkit/NSGraphicsContext.inc
  78. 23 10
      packages/cocoaint/src/appkit/NSHelpManager.inc
  79. 131 74
      packages/cocoaint/src/appkit/NSImage.inc
  80. 16 4
      packages/cocoaint/src/appkit/NSImageCell.inc
  81. 24 12
      packages/cocoaint/src/appkit/NSImageRep.inc
  82. 11 5
      packages/cocoaint/src/appkit/NSImageView.inc
  83. 38 23
      packages/cocoaint/src/appkit/NSInputManager.inc
  84. 42 21
      packages/cocoaint/src/appkit/NSInputServer.inc
  85. 21 3
      packages/cocoaint/src/appkit/NSInterfaceStyle.inc
  86. 153 112
      packages/cocoaint/src/appkit/NSKeyValueBinding.inc
  87. 85 57
      packages/cocoaint/src/appkit/NSLayoutManager.inc
  88. 2 1
      packages/cocoaint/src/appkit/NSLevelIndicator.inc
  89. 20 14
      packages/cocoaint/src/appkit/NSLevelIndicatorCell.inc
  90. 55 32
      packages/cocoaint/src/appkit/NSMatrix.inc
  91. 110 42
      packages/cocoaint/src/appkit/NSMenu.inc
  92. 46 20
      packages/cocoaint/src/appkit/NSMenuItem.inc
  93. 16 10
      packages/cocoaint/src/appkit/NSMenuItemCell.inc
  94. 25 20
      packages/cocoaint/src/appkit/NSMenuView.inc
  95. 23 14
      packages/cocoaint/src/appkit/NSMovie.inc
  96. 60 50
      packages/cocoaint/src/appkit/NSMovieView.inc
  97. 18 9
      packages/cocoaint/src/appkit/NSNib.inc
  98. 23 1
      packages/cocoaint/src/appkit/NSNibLoading.inc
  99. 18 11
      packages/cocoaint/src/appkit/NSObjectController.inc
  100. 46 23
      packages/cocoaint/src/appkit/NSOpenGL.inc

+ 81 - 5
.gitattributes

@@ -1007,17 +1007,17 @@ packages/chm/src/paslzx.pas svneol=native#text/plain
 packages/chm/src/paslzxcomp.pas svneol=native#text/plain
 packages/chm/src/paslzxcomp.pas svneol=native#text/plain
 packages/cocoaint/Makefile svneol=native#text/plain
 packages/cocoaint/Makefile svneol=native#text/plain
 packages/cocoaint/Makefile.fpc svneol=native#text/plain
 packages/cocoaint/Makefile.fpc svneol=native#text/plain
+packages/cocoaint/src/AnonClassDefinitionsCoredata.pas svneol=native#text/plain
+packages/cocoaint/src/AnonClassDefinitionsQuartzcore.pas svneol=native#text/plain
+packages/cocoaint/src/AnonClassDefinitionsWebkit.pas svneol=native#text/plain
 packages/cocoaint/src/CocoaAll.pas svneol=native#text/plain
 packages/cocoaint/src/CocoaAll.pas svneol=native#text/plain
 packages/cocoaint/src/CoreData.pas svneol=native#text/plain
 packages/cocoaint/src/CoreData.pas svneol=native#text/plain
 packages/cocoaint/src/Foundation.pas svneol=native#text/plain
 packages/cocoaint/src/Foundation.pas svneol=native#text/plain
 packages/cocoaint/src/IBMacros.pp svneol=native#text/plain
 packages/cocoaint/src/IBMacros.pp svneol=native#text/plain
 packages/cocoaint/src/InlineFunctions.inc svneol=native#text/plain
 packages/cocoaint/src/InlineFunctions.inc svneol=native#text/plain
 packages/cocoaint/src/IvarSize.pas svneol=native#text/plain
 packages/cocoaint/src/IvarSize.pas svneol=native#text/plain
-packages/cocoaint/src/NSDelegatesAll.pas svneol=native#text/plain
-packages/cocoaint/src/UndefinedClasses.inc svneol=native#text/plain
 packages/cocoaint/src/UndefinedTypes.inc svneol=native#text/plain
 packages/cocoaint/src/UndefinedTypes.inc svneol=native#text/plain
 packages/cocoaint/src/WebKit.pas svneol=native#text/plain
 packages/cocoaint/src/WebKit.pas svneol=native#text/plain
-packages/cocoaint/src/WebKitDelegatesAll.pas svneol=native#text/plain
 packages/cocoaint/src/appkit/AppKit.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/AppKit.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/CIColor.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/CIColor.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSATSTypesetter.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSATSTypesetter.inc svneol=native#text/plain
@@ -1114,6 +1114,7 @@ packages/cocoaint/src/appkit/NSPageLayout.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPanel.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPanel.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSParagraphStyle.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSParagraphStyle.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPasteboard.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPasteboard.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSPasteboardItem.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPathCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPathCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPathComponentCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPathComponentCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPathControl.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPathControl.inc svneol=native#text/plain
@@ -1121,6 +1122,7 @@ packages/cocoaint/src/appkit/NSPersistentDocument.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPopUpButton.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPopUpButton.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPopUpButtonCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPopUpButtonCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPredicateEditor.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPredicateEditor.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSPredicateEditorRowTemplate.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPrintInfo.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPrintInfo.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPrintOperation.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPrintOperation.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPrintPanel.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSPrintPanel.inc svneol=native#text/plain
@@ -1131,6 +1133,7 @@ packages/cocoaint/src/appkit/NSResponder.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSRuleEditor.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSRuleEditor.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSRulerMarker.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSRulerMarker.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSRulerView.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSRulerView.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSRunningApplication.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSSavePanel.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSSavePanel.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSScreen.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSScreen.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSScrollView.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSScrollView.inc svneol=native#text/plain
@@ -1165,6 +1168,7 @@ packages/cocoaint/src/appkit/NSTextContainer.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextField.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextField.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextFieldCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextFieldCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextInputClient.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextInputClient.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSTextInputContext.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextList.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextList.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextStorage.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextStorage.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextStorageScripting.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTextStorageScripting.inc svneol=native#text/plain
@@ -1175,10 +1179,14 @@ packages/cocoaint/src/appkit/NSTokenFieldCell.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSToolbar.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSToolbar.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSToolbarItem.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSToolbarItem.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSToolbarItemGroup.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSToolbarItemGroup.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSTouch.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTrackingArea.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTrackingArea.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTreeController.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTreeController.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTreeNode.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSTreeNode.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSTypesetter.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSUserDefaultsController.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSUserDefaultsController.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSUserInterfaceItemSearching.inc svneol=native#text/plain
+packages/cocoaint/src/appkit/NSUserInterfaceValidation.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSValidatedUserInterfaceItem.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSValidatedUserInterfaceItem.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSView.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSView.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSViewController.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSViewController.inc svneol=native#text/plain
@@ -1186,6 +1194,7 @@ packages/cocoaint/src/appkit/NSWindow.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSWindowController.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSWindowController.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSWindowScripting.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSWindowScripting.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSWorkspace.inc svneol=native#text/plain
 packages/cocoaint/src/appkit/NSWorkspace.inc svneol=native#text/plain
+packages/cocoaint/src/coredata/AnonIncludeClassDefinitionsCoredata.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/CoreData.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/CoreData.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/CoreDataDefines.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/CoreDataDefines.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/CoreDataErrors.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/CoreDataErrors.inc svneol=native#text/plain
@@ -1195,6 +1204,7 @@ packages/cocoaint/src/coredata/NSAttributeDescription.inc svneol=native#text/pla
 packages/cocoaint/src/coredata/NSEntityDescription.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSEntityDescription.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSEntityMapping.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSEntityMapping.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSEntityMigrationPolicy.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSEntityMigrationPolicy.inc svneol=native#text/plain
+packages/cocoaint/src/coredata/NSExpressionDescription.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSFetchRequest.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSFetchRequest.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSFetchRequestExpression.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSFetchRequestExpression.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSFetchedPropertyDescription.inc svneol=native#text/plain
 packages/cocoaint/src/coredata/NSFetchedPropertyDescription.inc svneol=native#text/plain
@@ -1219,6 +1229,7 @@ packages/cocoaint/src/foundation/NSArray.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSAttributedString.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSAttributedString.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSAutoreleasePool.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSAutoreleasePool.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSBundle.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSBundle.inc svneol=native#text/plain
+packages/cocoaint/src/foundation/NSCache.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSCalendar.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSCalendar.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSCalendarDate.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSCalendarDate.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSCharacterSet.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSCharacterSet.inc svneol=native#text/plain
@@ -1232,7 +1243,6 @@ packages/cocoaint/src/foundation/NSDate.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDateFormatter.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDateFormatter.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDecimal.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDecimal.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDecimalNumber.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDecimalNumber.inc svneol=native#text/plain
-packages/cocoaint/src/foundation/NSDelegatesAll.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDictionary.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDictionary.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDistantObject.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDistantObject.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDistributedLock.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSDistributedLock.inc svneol=native#text/plain
@@ -1253,6 +1263,7 @@ packages/cocoaint/src/foundation/NSHashTable.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSHost.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSHost.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSIndexPath.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSIndexPath.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSIndexSet.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSIndexSet.inc svneol=native#text/plain
+packages/cocoaint/src/foundation/NSInvocation.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSKeyValueCoding.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSKeyValueCoding.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSKeyValueObserving.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSKeyValueObserving.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSKeyedArchiver.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSKeyedArchiver.inc svneol=native#text/plain
@@ -1270,8 +1281,10 @@ packages/cocoaint/src/foundation/NSObjCRuntime.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSObject.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSObject.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSObjectScripting.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSObjectScripting.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSOperation.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSOperation.inc svneol=native#text/plain
+packages/cocoaint/src/foundation/NSOrthography.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPathUtilities.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPathUtilities.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPointerArray.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPointerArray.inc svneol=native#text/plain
+packages/cocoaint/src/foundation/NSPointerFunctions.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPort.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPort.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPortCoder.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPortCoder.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPortMessage.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSPortMessage.inc svneol=native#text/plain
@@ -1300,6 +1313,7 @@ packages/cocoaint/src/foundation/NSSpellServer.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSStream.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSStream.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSString.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSString.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSTask.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSTask.inc svneol=native#text/plain
+packages/cocoaint/src/foundation/NSTextCheckingResult.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSThread.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSThread.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSTimeZone.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSTimeZone.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSTimer.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSTimer.inc svneol=native#text/plain
@@ -1330,8 +1344,62 @@ packages/cocoaint/src/foundation/NSXMLParser.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSZone.inc svneol=native#text/plain
 packages/cocoaint/src/foundation/NSZone.inc svneol=native#text/plain
 packages/cocoaint/src/iPhoneAll.pas svneol=native#text/plain
 packages/cocoaint/src/iPhoneAll.pas svneol=native#text/plain
 packages/cocoaint/src/patches/NSBundle.patch svneol=native#text/plain
 packages/cocoaint/src/patches/NSBundle.patch svneol=native#text/plain
+packages/cocoaint/src/patches/NSObjCRuntime.patch svneol=native#text/plain
+packages/cocoaint/src/quartzcore/AnonIncludeClassDefinitionsQuartzcore.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAAnimation.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CABase.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CACIFilterAdditions.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAConstraintLayoutManager.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAEmitterCell.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAEmitterLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAGradientLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CALayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAMediaTiming.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAMediaTimingFunction.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAOpenGLLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CARenderer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAReplicatorLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAScrollLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAShapeLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CATextLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CATiledLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CATransaction.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CATransform3D.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CATransformLayer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CAValueFunction.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIColor.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIContext.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIFilter.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIFilterGenerator.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIFilterShape.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIImage.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIImageAccumulator.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIImageProvider.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIKernel.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIPlugIn.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIPlugInInterface.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIRAWFilter.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CISampler.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CIVector.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVBase.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVBuffer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVDisplayLink.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVHostTime.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVImageBuffer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVOpenGLBuffer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVOpenGLBufferPool.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVOpenGLTexture.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVOpenGLTextureCache.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVPixelBuffer.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVPixelBufferPool.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVPixelFormatDescription.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/CVReturn.inc svneol=native#text/plain
+packages/cocoaint/src/quartzcore/QuartzCore.inc svneol=native#text/plain
 packages/cocoaint/src/uikit/UIKit.inc svneol=native#text/plain
 packages/cocoaint/src/uikit/UIKit.inc svneol=native#text/plain
 packages/cocoaint/src/uikit/UndefinedClasses.inc svneol=native#text/plain
 packages/cocoaint/src/uikit/UndefinedClasses.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/AnonIncludeClassDefinitionsWebkit.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/CarbonUtils.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOM.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMAbstractView.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMAbstractView.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMAttr.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMAttr.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMCDATASection.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMCDATASection.inc svneol=native#text/plain
@@ -1367,6 +1435,9 @@ packages/cocoaint/src/webkit/DOMEventTarget.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMEvents.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMEvents.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMException.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMException.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMExtensions.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMExtensions.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMFile.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMFileList.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMHTML.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMHTMLAnchorElement.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMHTMLAnchorElement.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMHTMLAppletElement.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMHTMLAppletElement.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMHTMLAreaElement.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMHTMLAreaElement.inc svneol=native#text/plain
@@ -1432,12 +1503,14 @@ packages/cocoaint/src/webkit/DOMMouseEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMMutationEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMMutationEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNamedNodeMap.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNamedNodeMap.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNode.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNode.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMNodeFilter.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNodeIterator.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNodeIterator.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNodeList.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNodeList.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNotation.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMNotation.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMObject.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMObject.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMOverflowEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMOverflowEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMProcessingInstruction.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMProcessingInstruction.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMProgressEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRGBColor.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRGBColor.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRange.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRange.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRangeException.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRangeException.inc svneol=native#text/plain
@@ -1445,16 +1518,19 @@ packages/cocoaint/src/webkit/DOMRanges.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRect.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMRect.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMStyleSheet.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMStyleSheet.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMStyleSheetList.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMStyleSheetList.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMStylesheets.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMText.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMText.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMTraversal.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMTraversal.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMTreeWalker.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMTreeWalker.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMUIEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMUIEvent.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMViews.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMWheelEvent.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMWheelEvent.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/DOMXPath.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathException.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathException.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathExpression.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathExpression.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathNSResolver.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathNSResolver.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathResult.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/DOMXPathResult.inc svneol=native#text/plain
-packages/cocoaint/src/webkit/UndefinedClasses.inc svneol=native#text/plain
+packages/cocoaint/src/webkit/HIWebView.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/UndefinedTypes.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/UndefinedTypes.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/WebArchive.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/WebArchive.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/WebBackForwardList.inc svneol=native#text/plain
 packages/cocoaint/src/webkit/WebBackForwardList.inc svneol=native#text/plain

+ 186 - 0
packages/cocoaint/Makefile

@@ -452,6 +452,192 @@ endif
 ifeq ($(FULL_TARGET),mipsel-linux)
 ifeq ($(FULL_TARGET),mipsel-linux)
 override TARGET_UNITS+=CocoaAll WebKit CoreData
 override TARGET_UNITS+=CocoaAll WebKit CoreData
 endif
 endif
+ifeq ($(FULL_TARGET),i386-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-go32v2)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-win32)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-os2)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-freebsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-beos)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-haiku)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-netbsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-solaris)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-qnx)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-netware)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-openbsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-wdosx)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-darwin)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-emx)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-watcom)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-netwlibc)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-wince)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-symbian)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-nativent)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),i386-iphonesim)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-freebsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-netbsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-amiga)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-atari)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-openbsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-palmos)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),m68k-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc-netbsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc-amiga)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc-macos)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc-darwin)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc-morphos)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),sparc-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),sparc-netbsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),sparc-solaris)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),sparc-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),x86_64-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),x86_64-freebsd)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),x86_64-solaris)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),x86_64-darwin)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),x86_64-win64)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),x86_64-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-palmos)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-darwin)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-wince)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-gba)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-nds)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),arm-symbian)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc64-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc64-darwin)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),powerpc64-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),avr-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),armeb-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),armeb-embedded)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
+ifeq ($(FULL_TARGET),mipsel-linux)
+override TARGET_IMPLICITUNITS+=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
+endif
 override INSTALL_FPCPACKAGE=y
 override INSTALL_FPCPACKAGE=y
 ifeq ($(FULL_TARGET),i386-linux)
 ifeq ($(FULL_TARGET),i386-linux)
 override COMPILER_SOURCEDIR+=src
 override COMPILER_SOURCEDIR+=src

+ 2 - 1
packages/cocoaint/Makefile.fpc

@@ -8,6 +8,7 @@ version=2.5.1
 
 
 [target]
 [target]
 units=CocoaAll WebKit CoreData
 units=CocoaAll WebKit CoreData
+implicitunits=AnonClassDefinitionsQuartzcore AnonClassDefinitionsWebkit
 
 
 [libs]
 [libs]
 libversion=2.5.1
 libversion=2.5.1
@@ -27,4 +28,4 @@ packages=univint
 [rules]
 [rules]
 WebKit$(PPUEXT): CocoaAll$(PPUEXT)
 WebKit$(PPUEXT): CocoaAll$(PPUEXT)
 
 
-CoreData$(PPUEXT): CocoaAll$(PPUEXT)
+CoreData$(PPUEXT): CocoaAll$(PPUEXT)

+ 226 - 0
packages/cocoaint/src/AnonClassDefinitionsCoredata.pas

@@ -0,0 +1,226 @@
+{ Parsed from Coredata }
+
+{$mode delphi}
+{$modeswitch objectivec1}
+{$modeswitch cvar}
+
+unit AnonClassDefinitionsCoredata;
+
+interface
+
+type
+  Protocol = objcclass; external;
+  NSAffineTransform = objcclass; external;
+  NSData = objcclass; external;
+  NSAppleEventDescriptor = objcclass; external;
+  NSAppleEventManager = objcclass; external;
+  NSDictionary = objcclass; external;
+  NSString = objcclass; external;
+  NSURL = objcclass; external;
+  NSAppleScript = objcclass; external;
+  NSMutableData = objcclass; external;
+  NSMutableDictionary = objcclass; external;
+  NSMutableArray = objcclass; external;
+  NSArchiver = objcclass; external;
+  NSUnarchiver = objcclass; external;
+  NSIndexSet = objcclass; external;
+  NSArray = objcclass; external;
+  NSAttributedString = objcclass; external;
+  NSMutableAttributedString = objcclass; external;
+  NSAutoreleasePool = objcclass; external;
+  NSError = objcclass; external;
+  NSBundle = objcclass; external;
+  NSCache = objcclass; external;
+  NSDateComponents = objcclass; external;
+  NSLocale = objcclass; external;
+  NSTimeZone = objcclass; external;
+  NSCalendar = objcclass; external;
+  NSCalendarDate = objcclass; external;
+  NSCharacterSet = objcclass; external;
+  NSMutableCharacterSet = objcclass; external;
+  NSClassDescription = objcclass; external;
+  NSCoder = objcclass; external;
+  NSPredicateOperator = objcclass; external;
+  NSExpression = objcclass; external;
+  NSComparisonPredicate = objcclass; external;
+  NSCompoundPredicate = objcclass; external;
+  NSDistantObject = objcclass; external;
+  NSException = objcclass; external;
+  NSPort = objcclass; external;
+  NSRunLoop = objcclass; external;
+  NSPortNameServer = objcclass; external;
+  NSDistantObjectRequest = objcclass; external;
+  NSConnection = objcclass; external;
+  NSPurgeableData = objcclass; external;
+  NSDate = objcclass; external;
+  NSDateFormatter = objcclass; external;
+  NSDecimalNumber = objcclass; external;
+  NSDecimalNumberHandler = objcclass; external;
+  NSSet = objcclass; external;
+  NSDistributedLock = objcclass; external;
+  NSDistributedNotificationCenter = objcclass; external;
+  NSEnumerator = objcclass; external;
+  NSAssertionHandler = objcclass; external;
+  NSPredicate = objcclass; external;
+  NSFileHandle = objcclass; external;
+  NSPipe = objcclass; external;
+  NSDirectoryEnumerator = objcclass; external;
+  NSNumber = objcclass; external;
+  NSFileManager = objcclass; external;
+  NSFormatter = objcclass; external;
+  NSGarbageCollector = objcclass; external;
+  NSHashTable = objcclass; external;
+  NSHost = objcclass; external;
+  NSHTTPCookieInternal = objcclass; external;
+  NSHTTPCookie = objcclass; external;
+  NSHTTPCookieStorageInternal = objcclass; external;
+  NSHTTPCookieStorage = objcclass; external;
+  NSIndexPath = objcclass; external;
+  NSMutableIndexSet = objcclass; external;
+  NSMethodSignature = objcclass; external;
+  NSInvocation = objcclass; external;
+  NSKeyedArchiver = objcclass; external;
+  NSKeyedUnarchiver = objcclass; external;
+  NSLock = objcclass; external;
+  NSConditionLock = objcclass; external;
+  NSRecursiveLock = objcclass; external;
+  NSCondition = objcclass; external;
+  NSMapTable = objcclass; external;
+  NSMetadataItem = objcclass; external;
+  NSMetadataQueryAttributeValueTuple = objcclass; external;
+  NSMetadataQueryResultGroup = objcclass; external;
+  NSMetadataQuery = objcclass; external;
+  NSInputStream = objcclass; external;
+  NSOutputStream = objcclass; external;
+  NSNetService = objcclass; external;
+  NSNetServiceBrowser = objcclass; external;
+  NSOperationQueue = objcclass; external;
+  NSNotification = objcclass; external;
+  NSNotificationCenter = objcclass; external;
+  NSNotificationQueue = objcclass; external;
+  NSNull = objcclass; external;
+  NSNumberFormatter = objcclass; external;
+  NSObject = objcclass; external;
+  NSScriptObjectSpecifier = objcclass; external;
+  NSOperation = objcclass; external;
+  NSBlockOperation = objcclass; external;
+  NSInvocationOperation = objcclass; external;
+  NSOrthography = objcclass; external;
+  NSPointerArray = objcclass; external;
+  NSPointerFunctions = objcclass; external;
+  NSPortMessage = objcclass; external;
+  NSMachPort = objcclass; external;
+  NSMessagePort = objcclass; external;
+  NSSocketPort = objcclass; external;
+  NSPortCoder = objcclass; external;
+  NSMachBootstrapServer = objcclass; external;
+  NSMessagePortNameServer = objcclass; external;
+  NSSocketPortNameServer = objcclass; external;
+  NSProcessInfo = objcclass; external;
+  NSPropertyListSerialization = objcclass; external;
+  NSProtocolChecker = objcclass; external;
+  NSProxy = objcclass; external;
+  NSTimer = objcclass; external;
+  NSScanner = objcclass; external;
+  NSScriptCommandDescription = objcclass; external;
+  NSScriptClassDescription = objcclass; external;
+  NSScriptCoercionHandler = objcclass; external;
+  NSScriptCommand = objcclass; external;
+  NSScriptExecutionContext = objcclass; external;
+  NSScriptWhoseTest = objcclass; external;
+  NSIndexSpecifier = objcclass; external;
+  NSMiddleSpecifier = objcclass; external;
+  NSNameSpecifier = objcclass; external;
+  NSPositionalSpecifier = objcclass; external;
+  NSPropertySpecifier = objcclass; external;
+  NSRandomSpecifier = objcclass; external;
+  NSRangeSpecifier = objcclass; external;
+  NSRelativeSpecifier = objcclass; external;
+  NSUniqueIDSpecifier = objcclass; external;
+  NSWhoseSpecifier = objcclass; external;
+  NSCloneCommand = objcclass; external;
+  NSCloseCommand = objcclass; external;
+  NSCountCommand = objcclass; external;
+  NSCreateCommand = objcclass; external;
+  NSDeleteCommand = objcclass; external;
+  NSExistsCommand = objcclass; external;
+  NSGetCommand = objcclass; external;
+  NSMoveCommand = objcclass; external;
+  NSQuitCommand = objcclass; external;
+  NSSetCommand = objcclass; external;
+  NSMutableSet = objcclass; external;
+  NSScriptSuiteRegistry = objcclass; external;
+  NSLogicalTest = objcclass; external;
+  NSSpecifierTest = objcclass; external;
+  NSCountedSet = objcclass; external;
+  NSSortDescriptor = objcclass; external;
+  NSSpellServer = objcclass; external;
+  NSStream = objcclass; external;
+  NSMutableString = objcclass; external;
+  NSSimpleCString = objcclass; external;
+  NSConstantString = objcclass; external;
+  NSTask = objcclass; external;
+  NSTextCheckingResult = objcclass; external;
+  NSThread = objcclass; external;
+  NSUndoManager = objcclass; external;
+  NSURLAuthenticationChallenge = objcclass; external;
+  NSURLCredential = objcclass; external;
+  NSURLProtectionSpace = objcclass; external;
+  NSURLResponse = objcclass; external;
+  NSURLAuthenticationChallengeInternal = objcclass; external;
+  NSCachedURLResponseInternal = objcclass; external;
+  NSURLRequest = objcclass; external;
+  NSCachedURLResponse = objcclass; external;
+  NSURLCacheInternal = objcclass; external;
+  NSURLCache = objcclass; external;
+  NSURLConnectionInternal = objcclass; external;
+  NSURLConnection = objcclass; external;
+  NSURLCredentialInternal = objcclass; external;
+  NSURLCredentialStorageInternal = objcclass; external;
+  NSURLCredentialStorage = objcclass; external;
+  NSURLDownloadInternal = objcclass; external;
+  NSURLDownload = objcclass; external;
+  NSURLHandle = objcclass; external;
+  NSURLProtectionSpaceInternal = objcclass; external;
+  NSMutableURLRequest = objcclass; external;
+  NSURLProtocol = objcclass; external;
+  NSURLProtocolInternal = objcclass; external;
+  NSURLRequestInternal = objcclass; external;
+  NSURLResponseInternal = objcclass; external;
+  NSHTTPURLResponseInternal = objcclass; external;
+  NSHTTPURLResponse = objcclass; external;
+  NSUserDefaults = objcclass; external;
+  NSValue = objcclass; external;
+  NSValueTransformer = objcclass; external;
+  NSXMLDTD = objcclass; external;
+  NSXMLDocument = objcclass; external;
+  NSXMLDTDNode = objcclass; external;
+  NSXMLElement = objcclass; external;
+  NSXMLNode = objcclass; external;
+  NSXMLParser = objcclass; external;
+  NSAtomicStore = objcclass; external;
+  NSAtomicStoreCacheNode = objcclass; external;
+  NSEntityDescription = objcclass; external;
+  NSAttributeDescription = objcclass; external;
+  NSManagedObjectModel = objcclass; external;
+  NSManagedObjectContext = objcclass; external;
+  NSManagedObject = objcclass; external;
+  NSEntityMapping = objcclass; external;
+  NSMigrationManager = objcclass; external;
+  NSEntityMigrationPolicy = objcclass; external;
+  NSExpressionDescription = objcclass; external;
+  NSFetchRequest = objcclass; external;
+  NSFetchedPropertyDescription = objcclass; external;
+  NSFetchRequestExpression = objcclass; external;
+  NSManagedObjectID = objcclass; external;
+  NSPersistentStore = objcclass; external;
+  NSPersistentStoreCoordinator = objcclass; external;
+  NSMappingModel = objcclass; external;
+  NSMigrationContext = objcclass; external;
+  NSPropertyDescription = objcclass; external;
+  NSPropertyMapping = objcclass; external;
+  NSRelationshipDescription = objcclass; external;
+
+implementation
+
+end.

+ 424 - 0
packages/cocoaint/src/AnonClassDefinitionsQuartzcore.pas

@@ -0,0 +1,424 @@
+{ Parsed from Quartzcore }
+
+{$mode delphi}
+{$modeswitch objectivec1}
+{$modeswitch cvar}
+
+unit AnonClassDefinitionsQuartzcore;
+
+interface
+
+type
+  Protocol = objcclass; external;
+  NSAffineTransform = objcclass; external;
+  NSData = objcclass; external;
+  NSAppleEventDescriptor = objcclass; external;
+  NSAppleEventManager = objcclass; external;
+  NSDictionary = objcclass; external;
+  NSString = objcclass; external;
+  NSURL = objcclass; external;
+  NSAppleScript = objcclass; external;
+  NSMutableData = objcclass; external;
+  NSMutableDictionary = objcclass; external;
+  NSMutableArray = objcclass; external;
+  NSArchiver = objcclass; external;
+  NSUnarchiver = objcclass; external;
+  NSIndexSet = objcclass; external;
+  NSArray = objcclass; external;
+  NSAttributedString = objcclass; external;
+  NSMutableAttributedString = objcclass; external;
+  NSAutoreleasePool = objcclass; external;
+  NSError = objcclass; external;
+  NSBundle = objcclass; external;
+  NSCache = objcclass; external;
+  NSDateComponents = objcclass; external;
+  NSLocale = objcclass; external;
+  NSTimeZone = objcclass; external;
+  NSCalendar = objcclass; external;
+  NSCalendarDate = objcclass; external;
+  NSCharacterSet = objcclass; external;
+  NSMutableCharacterSet = objcclass; external;
+  NSClassDescription = objcclass; external;
+  NSCoder = objcclass; external;
+  NSPredicateOperator = objcclass; external;
+  NSExpression = objcclass; external;
+  NSComparisonPredicate = objcclass; external;
+  NSCompoundPredicate = objcclass; external;
+  NSDistantObject = objcclass; external;
+  NSException = objcclass; external;
+  NSPort = objcclass; external;
+  NSRunLoop = objcclass; external;
+  NSPortNameServer = objcclass; external;
+  NSDistantObjectRequest = objcclass; external;
+  NSConnection = objcclass; external;
+  NSPurgeableData = objcclass; external;
+  NSDate = objcclass; external;
+  NSDateFormatter = objcclass; external;
+  NSDecimalNumber = objcclass; external;
+  NSDecimalNumberHandler = objcclass; external;
+  NSSet = objcclass; external;
+  NSDistributedLock = objcclass; external;
+  NSDistributedNotificationCenter = objcclass; external;
+  NSEnumerator = objcclass; external;
+  NSAssertionHandler = objcclass; external;
+  NSPredicate = objcclass; external;
+  NSFileHandle = objcclass; external;
+  NSPipe = objcclass; external;
+  NSDirectoryEnumerator = objcclass; external;
+  NSNumber = objcclass; external;
+  NSFileManager = objcclass; external;
+  NSFormatter = objcclass; external;
+  NSGarbageCollector = objcclass; external;
+  NSHashTable = objcclass; external;
+  NSHost = objcclass; external;
+  NSHTTPCookieInternal = objcclass; external;
+  NSHTTPCookie = objcclass; external;
+  NSHTTPCookieStorageInternal = objcclass; external;
+  NSHTTPCookieStorage = objcclass; external;
+  NSIndexPath = objcclass; external;
+  NSMutableIndexSet = objcclass; external;
+  NSMethodSignature = objcclass; external;
+  NSInvocation = objcclass; external;
+  NSKeyedArchiver = objcclass; external;
+  NSKeyedUnarchiver = objcclass; external;
+  NSLock = objcclass; external;
+  NSConditionLock = objcclass; external;
+  NSRecursiveLock = objcclass; external;
+  NSCondition = objcclass; external;
+  NSMapTable = objcclass; external;
+  NSMetadataItem = objcclass; external;
+  NSMetadataQueryAttributeValueTuple = objcclass; external;
+  NSMetadataQueryResultGroup = objcclass; external;
+  NSMetadataQuery = objcclass; external;
+  NSInputStream = objcclass; external;
+  NSOutputStream = objcclass; external;
+  NSNetService = objcclass; external;
+  NSNetServiceBrowser = objcclass; external;
+  NSOperationQueue = objcclass; external;
+  NSNotification = objcclass; external;
+  NSNotificationCenter = objcclass; external;
+  NSNotificationQueue = objcclass; external;
+  NSNull = objcclass; external;
+  NSNumberFormatter = objcclass; external;
+  NSObject = objcclass; external;
+  NSScriptObjectSpecifier = objcclass; external;
+  NSOperation = objcclass; external;
+  NSBlockOperation = objcclass; external;
+  NSInvocationOperation = objcclass; external;
+  NSOrthography = objcclass; external;
+  NSPointerArray = objcclass; external;
+  NSPointerFunctions = objcclass; external;
+  NSPortMessage = objcclass; external;
+  NSMachPort = objcclass; external;
+  NSMessagePort = objcclass; external;
+  NSSocketPort = objcclass; external;
+  NSPortCoder = objcclass; external;
+  NSMachBootstrapServer = objcclass; external;
+  NSMessagePortNameServer = objcclass; external;
+  NSSocketPortNameServer = objcclass; external;
+  NSProcessInfo = objcclass; external;
+  NSPropertyListSerialization = objcclass; external;
+  NSProtocolChecker = objcclass; external;
+  NSProxy = objcclass; external;
+  NSTimer = objcclass; external;
+  NSScanner = objcclass; external;
+  NSScriptCommandDescription = objcclass; external;
+  NSScriptClassDescription = objcclass; external;
+  NSScriptCoercionHandler = objcclass; external;
+  NSScriptCommand = objcclass; external;
+  NSScriptExecutionContext = objcclass; external;
+  NSScriptWhoseTest = objcclass; external;
+  NSIndexSpecifier = objcclass; external;
+  NSMiddleSpecifier = objcclass; external;
+  NSNameSpecifier = objcclass; external;
+  NSPositionalSpecifier = objcclass; external;
+  NSPropertySpecifier = objcclass; external;
+  NSRandomSpecifier = objcclass; external;
+  NSRangeSpecifier = objcclass; external;
+  NSRelativeSpecifier = objcclass; external;
+  NSUniqueIDSpecifier = objcclass; external;
+  NSWhoseSpecifier = objcclass; external;
+  NSCloneCommand = objcclass; external;
+  NSCloseCommand = objcclass; external;
+  NSCountCommand = objcclass; external;
+  NSCreateCommand = objcclass; external;
+  NSDeleteCommand = objcclass; external;
+  NSExistsCommand = objcclass; external;
+  NSGetCommand = objcclass; external;
+  NSMoveCommand = objcclass; external;
+  NSQuitCommand = objcclass; external;
+  NSSetCommand = objcclass; external;
+  NSMutableSet = objcclass; external;
+  NSScriptSuiteRegistry = objcclass; external;
+  NSLogicalTest = objcclass; external;
+  NSSpecifierTest = objcclass; external;
+  NSCountedSet = objcclass; external;
+  NSSortDescriptor = objcclass; external;
+  NSSpellServer = objcclass; external;
+  NSStream = objcclass; external;
+  NSMutableString = objcclass; external;
+  NSSimpleCString = objcclass; external;
+  NSConstantString = objcclass; external;
+  NSTask = objcclass; external;
+  NSTextCheckingResult = objcclass; external;
+  NSThread = objcclass; external;
+  NSUndoManager = objcclass; external;
+  NSURLAuthenticationChallenge = objcclass; external;
+  NSURLCredential = objcclass; external;
+  NSURLProtectionSpace = objcclass; external;
+  NSURLResponse = objcclass; external;
+  NSURLAuthenticationChallengeInternal = objcclass; external;
+  NSCachedURLResponseInternal = objcclass; external;
+  NSURLRequest = objcclass; external;
+  NSCachedURLResponse = objcclass; external;
+  NSURLCacheInternal = objcclass; external;
+  NSURLCache = objcclass; external;
+  NSURLConnectionInternal = objcclass; external;
+  NSURLConnection = objcclass; external;
+  NSURLCredentialInternal = objcclass; external;
+  NSURLCredentialStorageInternal = objcclass; external;
+  NSURLCredentialStorage = objcclass; external;
+  NSURLDownloadInternal = objcclass; external;
+  NSURLDownload = objcclass; external;
+  NSURLHandle = objcclass; external;
+  NSURLProtectionSpaceInternal = objcclass; external;
+  NSMutableURLRequest = objcclass; external;
+  NSURLProtocol = objcclass; external;
+  NSURLProtocolInternal = objcclass; external;
+  NSURLRequestInternal = objcclass; external;
+  NSURLResponseInternal = objcclass; external;
+  NSHTTPURLResponseInternal = objcclass; external;
+  NSHTTPURLResponse = objcclass; external;
+  NSUserDefaults = objcclass; external;
+  NSValue = objcclass; external;
+  NSValueTransformer = objcclass; external;
+  NSXMLDTD = objcclass; external;
+  NSXMLDocument = objcclass; external;
+  NSXMLDTDNode = objcclass; external;
+  NSXMLElement = objcclass; external;
+  NSXMLNode = objcclass; external;
+  NSXMLParser = objcclass; external;
+  NSActionCell = objcclass; external;
+  NSBezierPath = objcclass; external;
+  NSTextField = objcclass; external;
+  NSPanel = objcclass; external;
+  NSWindow = objcclass; external;
+  NSImage = objcclass; external;
+  NSButton = objcclass; external;
+  NSAlert = objcclass; external;
+  NSGraphicsContext = objcclass; external;
+  NSAnimation = objcclass; external;
+  NSViewAnimation = objcclass; external;
+  NSAnimationContext = objcclass; external;
+  NSPasteboard = objcclass; external;
+  NSDockTile = objcclass; external;
+  NSApplication = objcclass; external;
+  NSArrayController = objcclass; external;
+  NSATSTypesetter = objcclass; external;
+  NSFileWrapper = objcclass; external;
+  NSTextBlock = objcclass; external;
+  NSTextTable = objcclass; external;
+  NSTextList = objcclass; external;
+  CIImage = objcclass; external;
+  NSColor = objcclass; external;
+  NSColorSpace = objcclass; external;
+  NSBitmapImageRep = objcclass; external;
+  NSFont = objcclass; external;
+  NSBox = objcclass; external;
+  NSMatrix = objcclass; external;
+  NSScroller = objcclass; external;
+  NSBrowser = objcclass; external;
+  NSBrowserCell = objcclass; external;
+  NSSound = objcclass; external;
+  NSButtonCell = objcclass; external;
+  NSCachedImageRep = objcclass; external;
+  NSEvent = objcclass; external;
+  NSMenu = objcclass; external;
+  NSText = objcclass; external;
+  NSView = objcclass; external;
+  NSTextView = objcclass; external;
+  NSCell = objcclass; external;
+  NSCIImageRep = objcclass; external;
+  NSClipView = objcclass; external;
+  NSCollectionView = objcclass; external;
+  NSNib = objcclass; external;
+  NSCollectionViewItem = objcclass; external;
+  NSColorList = objcclass; external;
+  NSColorPanel = objcclass; external;
+  NSColorPicker = objcclass; external;
+  NSColorWell = objcclass; external;
+  NSComboBox = objcclass; external;
+  NSTableView = objcclass; external;
+  NSComboBoxCell = objcclass; external;
+  NSControl = objcclass; external;
+  NSController = objcclass; external;
+  NSCursor = objcclass; external;
+  NSCustomImageRep = objcclass; external;
+  NSDatePicker = objcclass; external;
+  NSDatePickerCell = objcclass; external;
+  NSDictionaryController = objcclass; external;
+  NSMenuItem = objcclass; external;
+  NSPageLayout = objcclass; external;
+  NSPrintInfo = objcclass; external;
+  NSPrintOperation = objcclass; external;
+  NSSavePanel = objcclass; external;
+  NSWindowController = objcclass; external;
+  NSDocument = objcclass; external;
+  NSOpenPanel = objcclass; external;
+  NSDocumentController = objcclass; external;
+  NSDrawer = objcclass; external;
+  NSPDFImageRep = objcclass; external;
+  NSEPSImageRep = objcclass; external;
+  NSTrackingArea = objcclass; external;
+  NSFontDescriptor = objcclass; external;
+  NSFontPanel = objcclass; external;
+  NSFontManager = objcclass; external;
+  NSFormCell = objcclass; external;
+  NSGlyphGenerator = objcclass; external;
+  NSGlyphInfo = objcclass; external;
+  NSGradient = objcclass; external;
+  CIContext = objcclass; external;
+  NSHelpManager = objcclass; external;
+  NSImageRep = objcclass; external;
+  _NSImageAuxiliary = objcclass; external;
+  NSImageCell = objcclass; external;
+  NSImageView = objcclass; external;
+  NSInputServer = objcclass; external;
+  NSInputManager = objcclass; external;
+  NSTextStorage = objcclass; external;
+  NSTypesetter = objcclass; external;
+  NSTextContainer = objcclass; external;
+  NSRulerView = objcclass; external;
+  NSParagraphStyle = objcclass; external;
+  NSRulerMarker = objcclass; external;
+  NSTabWell = objcclass; external;
+  NSStorage = objcclass; external;
+  NSRunStorage = objcclass; external;
+  NSSortedArray = objcclass; external;
+  NSLayoutManager = objcclass; external;
+  NSLevelIndicator = objcclass; external;
+  NSLevelIndicatorCell = objcclass; external;
+  NSMenuView = objcclass; external;
+  NSMenuItemCell = objcclass; external;
+  NSScreen = objcclass; external;
+  QTMovie = objcclass; external;
+  NSMovie = objcclass; external;
+  NSMovieView = objcclass; external;
+  NSIBObjectData = objcclass; external;
+  NSNibConnector = objcclass; external;
+  NSNibControlConnector = objcclass; external;
+  NSNibOutletConnector = objcclass; external;
+  NSManagedObjectContext = objcclass; external;
+  NSFetchRequest = objcclass; external;
+  NSObjectController = objcclass; external;
+  NSOpenGLPixelFormat = objcclass; external;
+  NSOpenGLPixelBuffer = objcclass; external;
+  NSOpenGLContext = objcclass; external;
+  NSOpenGLLayer = objcclass; external;
+  NSOpenGLView = objcclass; external;
+  NSTableHeaderView = objcclass; external;
+  NSTableColumn = objcclass; external;
+  NSMouseTracker = objcclass; external;
+  NSOutlineView = objcclass; external;
+  NSViewController = objcclass; external;
+  NSTextTab = objcclass; external;
+  NSMutableParagraphStyle = objcclass; external;
+  NSPasteboardItem = objcclass; external;
+  NSPathComponentCell = objcclass; external;
+  NSPopUpButtonCell = objcclass; external;
+  NSPathCell = objcclass; external;
+  NSPathControl = objcclass; external;
+  NSManagedObjectModel = objcclass; external;
+  NSPersistentDocument = objcclass; external;
+  NSPICTImageRep = objcclass; external;
+  NSPopUpButton = objcclass; external;
+  NSPredicateTemplate = objcclass; external;
+  NSPredicateEditor = objcclass; external;
+  NSEntityDescription = objcclass; external;
+  NSPredicateEditorRowTemplate = objcclass; external;
+  NSPrinter = objcclass; external;
+  NSPrintPanel = objcclass; external;
+  NSProgressIndicator = objcclass; external;
+  NSQuickDrawView = objcclass; external;
+  NSResponder = objcclass; external;
+  NSRuleEditor = objcclass; external;
+  NSScrollView = objcclass; external;
+  NSRunningApplication = objcclass; external;
+  NSNavView = objcclass; external;
+  NSSavePanelAuxiliary = objcclass; external;
+  NSSearchField = objcclass; external;
+  NSSearchFieldCell = objcclass; external;
+  NSSecureTextField = objcclass; external;
+  NSSecureTextFieldCell = objcclass; external;
+  NSSegmentedCell = objcclass; external;
+  NSSegmentedControl = objcclass; external;
+  NSShadow = objcclass; external;
+  NSSimpleHorizontalTypesetter = objcclass; external;
+  NSSlider = objcclass; external;
+  NSSliderCell = objcclass; external;
+  NSSpeechRecognizer = objcclass; external;
+  NSSpeechSynthesizer = objcclass; external;
+  NSSpellChecker = objcclass; external;
+  NSSplitView = objcclass; external;
+  NSStatusItem = objcclass; external;
+  NSStatusBar = objcclass; external;
+  NSStepper = objcclass; external;
+  NSStepperCell = objcclass; external;
+  NSTableHeaderCell = objcclass; external;
+  NSTabViewItem = objcclass; external;
+  NSTabView = objcclass; external;
+  NSTextAttachment = objcclass; external;
+  NSTextAttachmentCell = objcclass; external;
+  NSTextFieldCell = objcclass; external;
+  NSTextInputContext = objcclass; external;
+  NSTextTableBlock = objcclass; external;
+  NSTokenField = objcclass; external;
+  NSTokenFieldCell = objcclass; external;
+  NSToolbarItem = objcclass; external;
+  NSToolbar = objcclass; external;
+  NSToolbarItemViewer = objcclass; external;
+  NSToolbarItemGroup = objcclass; external;
+  NSTouch = objcclass; external;
+  NSTreeNode = objcclass; external;
+  NSTreeController = objcclass; external;
+  NSUserDefaultsController = objcclass; external;
+  CIFilter = objcclass; external;
+  CALayer = objcclass; external;
+  _NSViewAuxiliary = objcclass; external;
+  NSWindowAuxiliary = objcclass; external;
+  NSWorkspace = objcclass; external;
+  CAMediaTimingFunction = objcclass; external;
+  CAValueFunction = objcclass; external;
+  CAAnimation = objcclass; external;
+  CAPropertyAnimation = objcclass; external;
+  CABasicAnimation = objcclass; external;
+  CAKeyframeAnimation = objcclass; external;
+  CATransition = objcclass; external;
+  CAAnimationGroup = objcclass; external;
+  CAConstraint = objcclass; external;
+  CAConstraintLayoutManager = objcclass; external;
+  CAEmitterCell = objcclass; external;
+  CAEmitterLayer = objcclass; external;
+  CAGradientLayer = objcclass; external;
+  CALayerArray = objcclass; external;
+  CAOpenGLLayer = objcclass; external;
+  CARenderer = objcclass; external;
+  CAReplicatorLayer = objcclass; external;
+  CAScrollLayer = objcclass; external;
+  CAShapeLayer = objcclass; external;
+  CATextLayer = objcclass; external;
+  CATiledLayer = objcclass; external;
+  CATransaction = objcclass; external;
+  CATransformLayer = objcclass; external;
+  CIColor = objcclass; external;
+  CIKernel = objcclass; external;
+  CIFilterGenerator = objcclass; external;
+  CIFilterShape = objcclass; external;
+  CIImageAccumulator = objcclass; external;
+  CIPlugIn = objcclass; external;
+  CISampler = objcclass; external;
+  CIVector = objcclass; external;
+
+implementation
+
+end.

+ 344 - 0
packages/cocoaint/src/AnonClassDefinitionsWebkit.pas

@@ -0,0 +1,344 @@
+{ Parsed from Webkit }
+
+{$mode delphi}
+{$modeswitch objectivec1}
+{$modeswitch cvar}
+
+unit AnonClassDefinitionsWebkit;
+
+interface
+
+type
+  Protocol = objcclass; external;
+  NSAffineTransform = objcclass; external;
+  NSData = objcclass; external;
+  NSAppleEventDescriptor = objcclass; external;
+  NSAppleEventManager = objcclass; external;
+  NSDictionary = objcclass; external;
+  NSString = objcclass; external;
+  NSURL = objcclass; external;
+  NSAppleScript = objcclass; external;
+  NSMutableData = objcclass; external;
+  NSMutableDictionary = objcclass; external;
+  NSMutableArray = objcclass; external;
+  NSArchiver = objcclass; external;
+  NSUnarchiver = objcclass; external;
+  NSIndexSet = objcclass; external;
+  NSArray = objcclass; external;
+  NSAttributedString = objcclass; external;
+  NSMutableAttributedString = objcclass; external;
+  NSAutoreleasePool = objcclass; external;
+  NSError = objcclass; external;
+  NSBundle = objcclass; external;
+  NSCache = objcclass; external;
+  NSDateComponents = objcclass; external;
+  NSLocale = objcclass; external;
+  NSTimeZone = objcclass; external;
+  NSCalendar = objcclass; external;
+  NSCalendarDate = objcclass; external;
+  NSCharacterSet = objcclass; external;
+  NSMutableCharacterSet = objcclass; external;
+  NSClassDescription = objcclass; external;
+  NSCoder = objcclass; external;
+  NSPredicateOperator = objcclass; external;
+  NSExpression = objcclass; external;
+  NSComparisonPredicate = objcclass; external;
+  NSCompoundPredicate = objcclass; external;
+  NSDistantObject = objcclass; external;
+  NSException = objcclass; external;
+  NSPort = objcclass; external;
+  NSRunLoop = objcclass; external;
+  NSPortNameServer = objcclass; external;
+  NSDistantObjectRequest = objcclass; external;
+  NSConnection = objcclass; external;
+  NSPurgeableData = objcclass; external;
+  NSDate = objcclass; external;
+  NSDateFormatter = objcclass; external;
+  NSDecimalNumber = objcclass; external;
+  NSDecimalNumberHandler = objcclass; external;
+  NSSet = objcclass; external;
+  NSDistributedLock = objcclass; external;
+  NSDistributedNotificationCenter = objcclass; external;
+  NSEnumerator = objcclass; external;
+  NSAssertionHandler = objcclass; external;
+  NSPredicate = objcclass; external;
+  NSFileHandle = objcclass; external;
+  NSPipe = objcclass; external;
+  NSDirectoryEnumerator = objcclass; external;
+  NSNumber = objcclass; external;
+  NSFileManager = objcclass; external;
+  NSFormatter = objcclass; external;
+  NSGarbageCollector = objcclass; external;
+  NSHashTable = objcclass; external;
+  NSHost = objcclass; external;
+  NSHTTPCookieInternal = objcclass; external;
+  NSHTTPCookie = objcclass; external;
+  NSHTTPCookieStorageInternal = objcclass; external;
+  NSHTTPCookieStorage = objcclass; external;
+  NSIndexPath = objcclass; external;
+  NSMutableIndexSet = objcclass; external;
+  NSMethodSignature = objcclass; external;
+  NSInvocation = objcclass; external;
+  NSKeyedArchiver = objcclass; external;
+  NSKeyedUnarchiver = objcclass; external;
+  NSLock = objcclass; external;
+  NSConditionLock = objcclass; external;
+  NSRecursiveLock = objcclass; external;
+  NSCondition = objcclass; external;
+  NSMapTable = objcclass; external;
+  NSMetadataItem = objcclass; external;
+  NSMetadataQueryAttributeValueTuple = objcclass; external;
+  NSMetadataQueryResultGroup = objcclass; external;
+  NSMetadataQuery = objcclass; external;
+  NSInputStream = objcclass; external;
+  NSOutputStream = objcclass; external;
+  NSNetService = objcclass; external;
+  NSNetServiceBrowser = objcclass; external;
+  NSOperationQueue = objcclass; external;
+  NSNotification = objcclass; external;
+  NSNotificationCenter = objcclass; external;
+  NSNotificationQueue = objcclass; external;
+  NSNull = objcclass; external;
+  NSNumberFormatter = objcclass; external;
+  NSObject = objcclass; external;
+  NSScriptObjectSpecifier = objcclass; external;
+  NSOperation = objcclass; external;
+  NSBlockOperation = objcclass; external;
+  NSInvocationOperation = objcclass; external;
+  NSOrthography = objcclass; external;
+  NSPointerArray = objcclass; external;
+  NSPointerFunctions = objcclass; external;
+  NSPortMessage = objcclass; external;
+  NSMachPort = objcclass; external;
+  NSMessagePort = objcclass; external;
+  NSSocketPort = objcclass; external;
+  NSPortCoder = objcclass; external;
+  NSMachBootstrapServer = objcclass; external;
+  NSMessagePortNameServer = objcclass; external;
+  NSSocketPortNameServer = objcclass; external;
+  NSProcessInfo = objcclass; external;
+  NSPropertyListSerialization = objcclass; external;
+  NSProtocolChecker = objcclass; external;
+  NSProxy = objcclass; external;
+  NSTimer = objcclass; external;
+  NSScanner = objcclass; external;
+  NSScriptCommandDescription = objcclass; external;
+  NSScriptClassDescription = objcclass; external;
+  NSScriptCoercionHandler = objcclass; external;
+  NSScriptCommand = objcclass; external;
+  NSScriptExecutionContext = objcclass; external;
+  NSScriptWhoseTest = objcclass; external;
+  NSIndexSpecifier = objcclass; external;
+  NSMiddleSpecifier = objcclass; external;
+  NSNameSpecifier = objcclass; external;
+  NSPositionalSpecifier = objcclass; external;
+  NSPropertySpecifier = objcclass; external;
+  NSRandomSpecifier = objcclass; external;
+  NSRangeSpecifier = objcclass; external;
+  NSRelativeSpecifier = objcclass; external;
+  NSUniqueIDSpecifier = objcclass; external;
+  NSWhoseSpecifier = objcclass; external;
+  NSCloneCommand = objcclass; external;
+  NSCloseCommand = objcclass; external;
+  NSCountCommand = objcclass; external;
+  NSCreateCommand = objcclass; external;
+  NSDeleteCommand = objcclass; external;
+  NSExistsCommand = objcclass; external;
+  NSGetCommand = objcclass; external;
+  NSMoveCommand = objcclass; external;
+  NSQuitCommand = objcclass; external;
+  NSSetCommand = objcclass; external;
+  NSMutableSet = objcclass; external;
+  NSScriptSuiteRegistry = objcclass; external;
+  NSLogicalTest = objcclass; external;
+  NSSpecifierTest = objcclass; external;
+  NSCountedSet = objcclass; external;
+  NSSortDescriptor = objcclass; external;
+  NSSpellServer = objcclass; external;
+  NSStream = objcclass; external;
+  NSMutableString = objcclass; external;
+  NSSimpleCString = objcclass; external;
+  NSConstantString = objcclass; external;
+  NSTask = objcclass; external;
+  NSTextCheckingResult = objcclass; external;
+  NSThread = objcclass; external;
+  NSUndoManager = objcclass; external;
+  NSURLAuthenticationChallenge = objcclass; external;
+  NSURLCredential = objcclass; external;
+  NSURLProtectionSpace = objcclass; external;
+  NSURLResponse = objcclass; external;
+  NSURLAuthenticationChallengeInternal = objcclass; external;
+  NSCachedURLResponseInternal = objcclass; external;
+  NSURLRequest = objcclass; external;
+  NSCachedURLResponse = objcclass; external;
+  NSURLCacheInternal = objcclass; external;
+  NSURLCache = objcclass; external;
+  NSURLConnectionInternal = objcclass; external;
+  NSURLConnection = objcclass; external;
+  NSURLCredentialInternal = objcclass; external;
+  NSURLCredentialStorageInternal = objcclass; external;
+  NSURLCredentialStorage = objcclass; external;
+  NSURLDownloadInternal = objcclass; external;
+  NSURLDownload = objcclass; external;
+  NSURLHandle = objcclass; external;
+  NSURLProtectionSpaceInternal = objcclass; external;
+  NSMutableURLRequest = objcclass; external;
+  NSURLProtocol = objcclass; external;
+  NSURLProtocolInternal = objcclass; external;
+  NSURLRequestInternal = objcclass; external;
+  NSURLResponseInternal = objcclass; external;
+  NSHTTPURLResponseInternal = objcclass; external;
+  NSHTTPURLResponse = objcclass; external;
+  NSUserDefaults = objcclass; external;
+  NSValue = objcclass; external;
+  NSValueTransformer = objcclass; external;
+  NSXMLDTD = objcclass; external;
+  NSXMLDocument = objcclass; external;
+  NSXMLDTDNode = objcclass; external;
+  NSXMLElement = objcclass; external;
+  NSXMLNode = objcclass; external;
+  NSXMLParser = objcclass; external;
+  NSImage = objcclass; external;
+  DOMDocument = objcclass; external;
+  DOMAbstractView = objcclass; external;
+  DOMCSSStyleDeclaration = objcclass; external;
+  DOMElement = objcclass; external;
+  DOMAttr = objcclass; external;
+  DOMCDATASection = objcclass; external;
+  DOMCharacterData = objcclass; external;
+  DOMComment = objcclass; external;
+  DOMCounter = objcclass; external;
+  DOMCSSCharsetRule = objcclass; external;
+  DOMCSSFontFaceRule = objcclass; external;
+  DOMCSSStyleSheet = objcclass; external;
+  DOMMediaList = objcclass; external;
+  DOMCSSImportRule = objcclass; external;
+  DOMCSSRuleList = objcclass; external;
+  DOMCSSMediaRule = objcclass; external;
+  DOMCSSPageRule = objcclass; external;
+  DOMRGBColor = objcclass; external;
+  DOMRect = objcclass; external;
+  DOMCSSPrimitiveValue = objcclass; external;
+  DOMCSSRule = objcclass; external;
+  DOMCSSValue = objcclass; external;
+  DOMCSSStyleRule = objcclass; external;
+  DOMCSSUnknownRule = objcclass; external;
+  DOMCSSValueList = objcclass; external;
+  DOMDocumentFragment = objcclass; external;
+  DOMDocumentType = objcclass; external;
+  DOMEntityReference = objcclass; external;
+  DOMEvent = objcclass; external;
+  DOMHTMLCollection = objcclass; external;
+  DOMHTMLElement = objcclass; external;
+  DOMImplementation = objcclass; external;
+  DOMNode = objcclass; external;
+  DOMNodeIterator = objcclass; external;
+  DOMNodeList = objcclass; external;
+  DOMProcessingInstruction = objcclass; external;
+  DOMRange = objcclass; external;
+  DOMStyleSheetList = objcclass; external;
+  DOMText = objcclass; external;
+  DOMTreeWalker = objcclass; external;
+  DOMXPathExpression = objcclass; external;
+  DOMXPathResult = objcclass; external;
+  DOMNamedNodeMap = objcclass; external;
+  DOMEntity = objcclass; external;
+  DOMFile = objcclass; external;
+  DOMFileList = objcclass; external;
+  DOMHTMLAnchorElement = objcclass; external;
+  DOMHTMLAppletElement = objcclass; external;
+  DOMHTMLAreaElement = objcclass; external;
+  DOMHTMLBaseElement = objcclass; external;
+  DOMHTMLBaseFontElement = objcclass; external;
+  DOMHTMLBodyElement = objcclass; external;
+  DOMHTMLBRElement = objcclass; external;
+  DOMHTMLFormElement = objcclass; external;
+  DOMHTMLButtonElement = objcclass; external;
+  DOMHTMLDirectoryElement = objcclass; external;
+  DOMHTMLDivElement = objcclass; external;
+  DOMHTMLDListElement = objcclass; external;
+  DOMHTMLDocument = objcclass; external;
+  DOMHTMLEmbedElement = objcclass; external;
+  DOMHTMLFieldSetElement = objcclass; external;
+  DOMHTMLFontElement = objcclass; external;
+  DOMHTMLFrameElement = objcclass; external;
+  DOMHTMLFrameSetElement = objcclass; external;
+  DOMHTMLHeadElement = objcclass; external;
+  DOMHTMLHeadingElement = objcclass; external;
+  DOMHTMLHRElement = objcclass; external;
+  DOMHTMLHtmlElement = objcclass; external;
+  DOMHTMLIFrameElement = objcclass; external;
+  DOMHTMLImageElement = objcclass; external;
+  DOMHTMLInputElement = objcclass; external;
+  DOMHTMLIsIndexElement = objcclass; external;
+  DOMHTMLLabelElement = objcclass; external;
+  DOMHTMLLegendElement = objcclass; external;
+  DOMHTMLLIElement = objcclass; external;
+  DOMStyleSheet = objcclass; external;
+  DOMHTMLLinkElement = objcclass; external;
+  DOMHTMLMapElement = objcclass; external;
+  DOMHTMLMarqueeElement = objcclass; external;
+  DOMHTMLMenuElement = objcclass; external;
+  DOMHTMLMetaElement = objcclass; external;
+  DOMHTMLModElement = objcclass; external;
+  DOMHTMLObjectElement = objcclass; external;
+  DOMHTMLOListElement = objcclass; external;
+  DOMHTMLOptGroupElement = objcclass; external;
+  DOMHTMLOptionElement = objcclass; external;
+  DOMHTMLOptionsCollection = objcclass; external;
+  DOMHTMLParagraphElement = objcclass; external;
+  DOMHTMLParamElement = objcclass; external;
+  DOMHTMLPreElement = objcclass; external;
+  DOMHTMLQuoteElement = objcclass; external;
+  DOMHTMLScriptElement = objcclass; external;
+  DOMHTMLSelectElement = objcclass; external;
+  DOMHTMLStyleElement = objcclass; external;
+  DOMHTMLTableCaptionElement = objcclass; external;
+  DOMHTMLTableCellElement = objcclass; external;
+  DOMHTMLTableColElement = objcclass; external;
+  DOMHTMLTableSectionElement = objcclass; external;
+  DOMHTMLTableElement = objcclass; external;
+  DOMHTMLTableRowElement = objcclass; external;
+  DOMHTMLTextAreaElement = objcclass; external;
+  DOMHTMLTitleElement = objcclass; external;
+  DOMHTMLUListElement = objcclass; external;
+  DOMKeyboardEvent = objcclass; external;
+  DOMMouseEvent = objcclass; external;
+  DOMMutationEvent = objcclass; external;
+  DOMNotation = objcclass; external;
+  DOMObject = objcclass; external;
+  DOMOverflowEvent = objcclass; external;
+  DOMProgressEvent = objcclass; external;
+  NSColor = objcclass; external;
+  DOMUIEvent = objcclass; external;
+  DOMWheelEvent = objcclass; external;
+  WebView = objcclass; external;
+  WebArchivePrivate = objcclass; external;
+  WebResource = objcclass; external;
+  WebArchive = objcclass; external;
+  WebHistoryItem = objcclass; external;
+  WebBackForwardListPrivate = objcclass; external;
+  WebBackForwardList = objcclass; external;
+  WebDataSourcePrivate = objcclass; external;
+  WebFrame = objcclass; external;
+  WebDataSource = objcclass; external;
+  WebDownloadInternal = objcclass; external;
+  WebDownload = objcclass; external;
+  WebFramePrivate = objcclass; external;
+  WebFrameView = objcclass; external;
+  WebScriptObject = objcclass; external;
+  WebFrameViewPrivate = objcclass; external;
+  WebHistoryPrivate = objcclass; external;
+  WebHistory = objcclass; external;
+  WebHistoryItemPrivate = objcclass; external;
+  WebPolicyPrivate = objcclass; external;
+  WebPreferencesPrivate = objcclass; external;
+  WebPreferences = objcclass; external;
+  WebResourcePrivate = objcclass; external;
+  WebScriptObjectPrivate = objcclass; external;
+  WebUndefined = objcclass; external;
+  WebViewPrivate = objcclass; external;
+
+implementation
+
+end.

+ 26 - 10
packages/cocoaint/src/CocoaAll.pas

@@ -1,67 +1,82 @@
 unit CocoaAll;
 unit CocoaAll;
 
 
-{$mode objfpc}
+{$mode delphi}
 {$modeswitch objectivec1}
 {$modeswitch objectivec1}
+{$modeswitch cvar} { for "external" after the semi-colon with external vars }
 
 
 interface
 interface
 
 
 uses 
 uses 
   ctypes,
   ctypes,
   AEDataModel,IconsCore,
   AEDataModel,IconsCore,
-  CFBase, CFArray, CFBag , CFCharacterSet, CFData, CFDate, CFDictionary, CFNumber ,CFPropertyList, CFSet, CFString, CFStringEncodingExt, CFTimeZone, CFTree, CFURL, CFXMLNode, CFXMLParser, CFMachPort, CFMessagePort, CFRunLoop, CFSocket, CFBinaryHeap, CFBitVector, CFBundle, CFByteOrders, CFPlugIn, CFPreferences, CFURLAccess, CFUUID, CFLocale, CFStream, CFDateFormatter, CFNumberFormatter, CFCalendar, CFUserNotification, CFNotificationCenter, CFAttributedString,
+  CFBase, CFArray, CFBag , CFCharacterSet, CFData, CFDate, CFDictionary, CFNumber ,CFPropertyList, CFSet, CFString, CFStringEncodingExt, CFTimeZone, CFTree, CFURL, CFXMLNode, CFXMLParser, CFMachPort, CFMessagePort, CFRunLoop, CFSocket, CFBinaryHeap, CFBitVector, CFBundle, CFByteOrders, CFPlugIn, CFPreferences, CFURLAccess, CFUUID, CFLocale, CFStream, CFDateFormatter, CFNumberFormatter, CFCalendar, CFUserNotification, CFNotificationCenter, CFAttributedString, CFNetworkErrorss,
   CGBase, CGAffineTransforms, CGBitmapContext, CGColor, CGColorSpace, CGContext, CGDataConsumer, CGDataProvider, CGDirectDisplay, CGDirectPalette, CGDisplayConfiguration, CGDisplayFades, CGErrors, CGEvent, CGEventSource, CGEventTypes, CGFont, CGFunction, CGGLContext, CGGeometry, CGImage, CGLayer, CGPDFArray, CGPDFContentStream, CGPDFContext, CGPDFDictionary, CGPDFDocument, CGPDFObject, CGPDFOperatorTable, CGPDFPage, CGPDFScanner, CGPDFStream, CGPDFString, CGPSConverter, CGPath, CGPattern, CGRemoteOperation, CGSession, CGShading, CGWindowLevels,
   CGBase, CGAffineTransforms, CGBitmapContext, CGColor, CGColorSpace, CGContext, CGDataConsumer, CGDataProvider, CGDirectDisplay, CGDirectPalette, CGDisplayConfiguration, CGDisplayFades, CGErrors, CGEvent, CGEventSource, CGEventTypes, CGFont, CGFunction, CGGLContext, CGGeometry, CGImage, CGLayer, CGPDFArray, CGPDFContentStream, CGPDFContext, CGPDFDictionary, CGPDFDocument, CGPDFObject, CGPDFOperatorTable, CGPDFPage, CGPDFScanner, CGPDFStream, CGPDFString, CGPSConverter, CGPath, CGPattern, CGRemoteOperation, CGSession, CGShading, CGWindowLevels,
-  MacTypes;
+  CVBase,CVImageBuffer,
+  IOSurfaceAPI,
+  SecBase, SecTrust,
+  MacTypes, MacOSXPosix,
+  macgl, CGLTypes,
+  AnonClassDefinitionsQuartzcore;
   
   
 {$linkframework Cocoa}
 {$linkframework Cocoa}
 {$define INTERFACE}
 {$define INTERFACE}
 
 
 {$include UndefinedTypes.inc}
 {$include UndefinedTypes.inc}
+// also includes the ones for foundation and appkit
+{$include quartzcore/AnonIncludeClassDefinitionsQuartzcore.inc}
 
 
 {$define HEADER}
 {$define HEADER}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef HEADER}
 {$undef HEADER}
 
 
 {$define TYPES}
 {$define TYPES}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef TYPES}
 {$undef TYPES}
 
 
 {$define RECORDS}
 {$define RECORDS}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef RECORDS}
 {$undef RECORDS}
 
 
 type
 type
 {$define FORWARD}
 {$define FORWARD}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef FORWARD}
 {$undef FORWARD}
 
 
-{$include UndefinedClasses.inc}
+{$define PROTOCOLS}
+{$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
+{$include appkit/AppKit.inc}
+{$undef PROTOCOLS}
 
 
 {$define CLASSES}
 {$define CLASSES}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef CLASSES}
 {$undef CLASSES}
  
  
-{$define PROTOCOLS}
-{$include foundation/Foundation.inc}
-{$include appkit/AppKit.inc}
-{$undef PROTOCOLS}
-
 {$define FUNCTIONS}
 {$define FUNCTIONS}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef FUNCTIONS}
 {$undef FUNCTIONS}
 
 
 {$define EXTERNAL_SYMBOLS}
 {$define EXTERNAL_SYMBOLS}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef EXTERNAL_SYMBOLS}
 {$undef EXTERNAL_SYMBOLS}
 
 
 {$define USER_PATCHES}
 {$define USER_PATCHES}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef USER_PATCHES}
 {$undef USER_PATCHES}
 
 
@@ -98,8 +113,9 @@ implementation
 
 
 {$define USER_PATCHES}
 {$define USER_PATCHES}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
+{$include quartzcore/QuartzCore.inc}
 {$include appkit/AppKit.inc}
 {$include appkit/AppKit.inc}
 {$undef USER_PATCHES}
 {$undef USER_PATCHES}
 
 
 {$undef IMPLEMENTATION}
 {$undef IMPLEMENTATION}
-end.
+end.

+ 8 - 10
packages/cocoaint/src/CoreData.pas

@@ -1,4 +1,5 @@
-{$mode objfpc}
+{$mode delphi}
+{$modeswitch cvar}
 {$modeswitch objectivec1}
 {$modeswitch objectivec1}
 unit CoreData;
 unit CoreData;
 interface
 interface
@@ -7,6 +8,8 @@ uses
 {$linkframework Cocoa}	{ Cocoa is "umbrella" fremework, includes CoreData }
 {$linkframework Cocoa}	{ Cocoa is "umbrella" fremework, includes CoreData }
 {$define INTERFACE}
 {$define INTERFACE}
 
 
+{$include coredata/AnonIncludeClassDefinitionsCoredata.inc}
+
 {$define HEADER}
 {$define HEADER}
 {$include coredata/CoreData.inc}
 {$include coredata/CoreData.inc}
 {$undef HEADER}
 {$undef HEADER}
@@ -19,23 +22,18 @@ uses
 {$include coredata/CoreData.inc}
 {$include coredata/CoreData.inc}
 {$undef RECORDS}
 {$undef RECORDS}
 
 
-type
-	{GK: ctypes don't define it... }
-	uintptr_t	= ptruint;
 {$define FORWARD}
 {$define FORWARD}
 {$include coredata/CoreData.inc}
 {$include coredata/CoreData.inc}
 {$undef FORWARD}
 {$undef FORWARD}
 
 
-{$define CLASSES}
-	{ Internal class in NSMigrationManager.h }
-	NSMigrationContext = id;
-{$include coredata/CoreData.inc}
-{$undef CLASSES}
-
 {$define PROTOCOLS}
 {$define PROTOCOLS}
 {$include coredata/CoreData.inc}
 {$include coredata/CoreData.inc}
 {$undef PROTOCOLS}
 {$undef PROTOCOLS}
 
 
+{$define CLASSES}
+{$include coredata/CoreData.inc}
+{$undef CLASSES}
+
 {$define FUNCTIONS}
 {$define FUNCTIONS}
 {$include coredata/CoreData.inc}
 {$include coredata/CoreData.inc}
 {$undef FUNCTIONS}
 {$undef FUNCTIONS}

+ 0 - 2
packages/cocoaint/src/Foundation.pas

@@ -30,8 +30,6 @@ type
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
 {$undef FORWARD}
 {$undef FORWARD}
 
 
-{$include UndefinedClasses.inc}
-
 {$define CLASSES}
 {$define CLASSES}
 {$include foundation/Foundation.inc}
 {$include foundation/Foundation.inc}
 {$undef CLASSES}
 {$undef CLASSES}

+ 1 - 1
packages/cocoaint/src/IvarSize.pas

@@ -2,7 +2,7 @@
 {$modeswitch objectivec1}
 {$modeswitch objectivec1}
 program IvarSize;
 program IvarSize;
 uses
 uses
- objp,objcrtl,objcrtlmacosx;
+ objcrtl,objcrtlmacosx,CocoaAll;
 type
 type
  TDerivedNSAffineTransform = objcclass (NSAffineTransform)
  TDerivedNSAffineTransform = objcclass (NSAffineTransform)
  extrabyte: byte;
  extrabyte: byte;

+ 0 - 658
packages/cocoaint/src/NSDelegatesAll.pas

@@ -1,658 +0,0 @@
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.2 - Tue Sep 8 9:10:40 ICT 2009 }
-
-unit NSDelegatesAll;
-interface
-
-{ Copy and paste these delegate methods into your real classes. }
-
-type
-  NSAlertDelegate = objccategory
-    function alertShowHelp(alert: NSAlert): Boolean; message 'alertShowHelp:';
-  end;
-
-type
-  NSAnimationDelegate = objccategory
-    procedure animation_didReachProgressMark(animation: NSAnimation; progress: NSAnimationProgress); message 'animation:didReachProgressMark:';
-    function animation_valueForProgress(animation: NSAnimation; progress: NSAnimationProgress): single; message 'animation:valueForProgress:';
-    procedure animationDidEnd(animation: NSAnimation); message 'animationDidEnd:';
-    procedure animationDidStop(animation: NSAnimation); message 'animationDidStop:';
-    function animationShouldStart(animation: NSAnimation): Boolean; message 'animationShouldStart:';
-  end;
-
-type
-  NSApplicationDelegate = objccategory
-    function application_openFile(sender: NSApplication; filename: NSString): Boolean; message 'application:openFile:';
-    function application_openFileWithoutUI(sender: id; filename: NSString): Boolean; message 'application:openFileWithoutUI:';
-    procedure application_openFiles(sender: NSApplication; filenames: NSArray); message 'application:openFiles:';
-    function application_openTempFile(sender: NSApplication; filename: NSString): Boolean; message 'application:openTempFile:';
-    function application_printFile(sender: NSApplication; filename: NSString): Boolean; message 'application:printFile:';
-    procedure application_printFiles(sender: NSApplication; filenames: NSArray); message 'application:printFiles:';
-    function application_printFiles_withSettings_showPrintPanels(application: NSApplication; fileNames: NSArray; printSettings: NSDictionary; showPrintPanels: Boolean): NSApplicationPrintReply; message 'application:printFiles:withSettings:showPrintPanels:';
-    function application_willPresentError(application: NSApplication; error: NSError): NSError; message 'application:willPresentError:';
-    function applicationDockMenu(sender: NSApplication): NSMenu; message 'applicationDockMenu:';
-    function applicationOpenUntitledFile(sender: NSApplication): Boolean; message 'applicationOpenUntitledFile:';
-    function applicationShouldHandleReopen_hasVisibleWindows(sender: NSApplication; flag: Boolean): Boolean; message 'applicationShouldHandleReopen:hasVisibleWindows:';
-    function applicationShouldOpenUntitledFile(sender: NSApplication): Boolean; message 'applicationShouldOpenUntitledFile:';
-    function applicationShouldTerminate(sender: NSApplication): NSApplicationTerminateReply; message 'applicationShouldTerminate:';
-    function applicationShouldTerminateAfterLastWindowClosed(sender: NSApplication): Boolean; message 'applicationShouldTerminateAfterLastWindowClosed:';
-  end;
-
-type
-  NSApplicationNotifications = objccategory
-    procedure applicationDidBecomeActive(notification: NSNotification); message 'applicationDidBecomeActive:';
-    procedure applicationDidChangeScreenParameters(notification: NSNotification); message 'applicationDidChangeScreenParameters:';
-    procedure applicationDidFinishLaunching(notification: NSNotification); message 'applicationDidFinishLaunching:';
-    procedure applicationDidHide(notification: NSNotification); message 'applicationDidHide:';
-    procedure applicationDidResignActive(notification: NSNotification); message 'applicationDidResignActive:';
-    procedure applicationDidUnhide(notification: NSNotification); message 'applicationDidUnhide:';
-    procedure applicationDidUpdate(notification: NSNotification); message 'applicationDidUpdate:';
-    procedure applicationWillBecomeActive(notification: NSNotification); message 'applicationWillBecomeActive:';
-    procedure applicationWillFinishLaunching(notification: NSNotification); message 'applicationWillFinishLaunching:';
-    procedure applicationWillHide(notification: NSNotification); message 'applicationWillHide:';
-    procedure applicationWillResignActive(notification: NSNotification); message 'applicationWillResignActive:';
-    procedure applicationWillTerminate(notification: NSNotification); message 'applicationWillTerminate:';
-    procedure applicationWillUnhide(notification: NSNotification); message 'applicationWillUnhide:';
-    procedure applicationWillUpdate(notification: NSNotification); message 'applicationWillUpdate:';
-  end;
-
-type
-  NSApplicationScriptingDelegation = objccategory
-    function application_delegateHandlesKey(sender: NSApplication; key: NSString): Boolean; message 'application:delegateHandlesKey:';
-  end;
-
-type
-  NSBrowserDelegate = objccategory
-    function browser_acceptDrop_atRow_column_dropOperation(browser: NSBrowser; info: id; row: clong; column: clong; dropOperation: NSBrowserDropOperation): Boolean; message 'browser:acceptDrop:atRow:column:dropOperation:';
-    function browser_canDragRowsWithIndexes_inColumn_withEvent(browser: NSBrowser; rowIndexes: NSIndexSet; column: clong; event: NSEvent): Boolean; message 'browser:canDragRowsWithIndexes:inColumn:withEvent:';
-    procedure browser_createRowsForColumn_inMatrix(sender: NSBrowser; column: clong; matrix: NSMatrix); message 'browser:createRowsForColumn:inMatrix:';
-    function browser_draggingImageForRowsWithIndexes_inColumn_withEvent_offset(browser: NSBrowser; rowIndexes: NSIndexSet; column: clong; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'browser:draggingImageForRowsWithIndexes:inColumn:withEvent:offset:';
-    function browser_isColumnValid(sender: NSBrowser; column: clong): Boolean; message 'browser:isColumnValid:';
-    function browser_namesOfPromisedFilesDroppedAtDestination_forDraggedRowsWithIndexes_inColumn(browser: NSBrowser; dropDestination: NSURL; rowIndexes: NSIndexSet; column: clong): NSArray; message 'browser:namesOfPromisedFilesDroppedAtDestination:forDraggedRowsWithIndexes:inColumn:';
-    function browser_nextTypeSelectMatchFromRow_toRow_inColumn_forString(browser: NSBrowser; startRow: clong; endRow: clong; column: clong; searchString: NSString): clong; message 'browser:nextTypeSelectMatchFromRow:toRow:inColumn:forString:';
-    function browser_numberOfRowsInColumn(sender: NSBrowser; column: clong): clong; message 'browser:numberOfRowsInColumn:';
-    function browser_selectCellWithString_inColumn(sender: NSBrowser; title: NSString; column: clong): Boolean; message 'browser:selectCellWithString:inColumn:';
-    function browser_selectRow_inColumn(sender: NSBrowser; row: clong; column: clong): Boolean; message 'browser:selectRow:inColumn:';
-    function browser_shouldShowCellExpansionForRow_column(browser: NSBrowser; row: clong; column: clong): Boolean; message 'browser:shouldShowCellExpansionForRow:column:';
-    function browser_shouldSizeColumn_forUserResize_toWidth(browser: NSBrowser; columnIndex: clong; forUserResize: Boolean; suggestedWidth: CGFloat): CGFloat; message 'browser:shouldSizeColumn:forUserResize:toWidth:';
-    function browser_shouldTypeSelectForEvent_withCurrentSearchString(browser: NSBrowser; event: NSEvent; searchString: NSString): Boolean; message 'browser:shouldTypeSelectForEvent:withCurrentSearchString:';
-    function browser_sizeToFitWidthOfColumn(browser: NSBrowser; columnIndex: clong): CGFloat; message 'browser:sizeToFitWidthOfColumn:';
-    function browser_titleOfColumn(sender: NSBrowser; column: clong): NSString; message 'browser:titleOfColumn:';
-    function browser_typeSelectStringForRow_inColumn(browser: NSBrowser; row: clong; column: clong): NSString; message 'browser:typeSelectStringForRow:inColumn:';
-    function browser_validateDrop_proposedRow_column_dropOperation(browser: NSBrowser; info: id; row: clong; column: clong; dropOperation: NSBrowserDropOperation): NSDragOperation; message 'browser:validateDrop:proposedRow:column:dropOperation:';
-    procedure browser_willDisplayCell_atRow_column(sender: NSBrowser; cell_: id; row: clong; column: clong); message 'browser:willDisplayCell:atRow:column:';
-    function browser_writeRowsWithIndexes_inColumn_toPasteboard(browser: NSBrowser; rowIndexes: NSIndexSet; column: clong; pasteboard: NSPasteboard): Boolean; message 'browser:writeRowsWithIndexes:inColumn:toPasteboard:';
-    procedure browserColumnConfigurationDidChange(notification: NSNotification); message 'browserColumnConfigurationDidChange:';
-    procedure browserDidScroll(sender: NSBrowser); message 'browserDidScroll:';
-    procedure browserWillScroll(sender: NSBrowser); message 'browserWillScroll:';
-  end;
-
-type
-  NSComboBoxCellDataSource = objccategory
-    function comboBoxCell_completedString(aComboBoxCell: NSComboBoxCell; uncompletedString: NSString): NSString; message 'comboBoxCell:completedString:';
-    function comboBoxCell_indexOfItemWithStringValue(aComboBoxCell: NSComboBoxCell; string_: NSString): culong; message 'comboBoxCell:indexOfItemWithStringValue:';
-    function comboBoxCell_objectValueForItemAtIndex(aComboBoxCell: NSComboBoxCell; index: clong): id; message 'comboBoxCell:objectValueForItemAtIndex:';
-    function numberOfItemsInComboBoxCell(comboBoxCell: NSComboBoxCell): clong; message 'numberOfItemsInComboBoxCell:';
-  end;
-
-type
-  NSComboBoxDataSource = objccategory
-    function comboBox_completedString(aComboBox: NSComboBox; string_: NSString): NSString; message 'comboBox:completedString:';
-    function comboBox_indexOfItemWithStringValue(aComboBox: NSComboBox; string_: NSString): culong; message 'comboBox:indexOfItemWithStringValue:';
-    function comboBox_objectValueForItemAtIndex(aComboBox: NSComboBox; index: clong): id; message 'comboBox:objectValueForItemAtIndex:';
-    function numberOfItemsInComboBox(aComboBox: NSComboBox): clong; message 'numberOfItemsInComboBox:';
-  end;
-
-type
-  NSComboBoxNotifications = objccategory
-    procedure comboBoxSelectionDidChange(notification: NSNotification); message 'comboBoxSelectionDidChange:';
-    procedure comboBoxSelectionIsChanging(notification: NSNotification); message 'comboBoxSelectionIsChanging:';
-    procedure comboBoxWillDismiss(notification: NSNotification); message 'comboBoxWillDismiss:';
-    procedure comboBoxWillPopUp(notification: NSNotification); message 'comboBoxWillPopUp:';
-  end;
-
-type
-  NSConnectionDelegateMethods = objccategory
-    function authenticateComponents_withData(components: NSArray; signature: NSData): Boolean; message 'authenticateComponents:withData:';
-    function authenticationDataForComponents(components: NSArray): NSData; message 'authenticationDataForComponents:';
-    function connection_shouldMakeNewConnection(ancestor: NSConnection; conn: NSConnection): Boolean; message 'connection:shouldMakeNewConnection:';
-    function createConversationForConnection(conn: NSConnection): id; message 'createConversationForConnection:';
-    function makeNewConnection_sender(conn: NSConnection; ancestor: NSConnection): Boolean; message 'makeNewConnection:sender:';
-  end;
-
-type
-  NSControlSubclassDelegate = objccategory
-    function control_didFailToFormatString_errorDescription(control: NSControl; string_: NSString; error: NSString): Boolean; message 'control:didFailToFormatString:errorDescription:';
-    procedure control_didFailToValidatePartialString_errorDescription(control: NSControl; string_: NSString; error: NSString); message 'control:didFailToValidatePartialString:errorDescription:';
-    function control_isValidObject(control: NSControl; obj: id): Boolean; message 'control:isValidObject:';
-    function control_textShouldBeginEditing(control: NSControl; fieldEditor: NSText): Boolean; message 'control:textShouldBeginEditing:';
-    function control_textShouldEndEditing(control: NSControl; fieldEditor: NSText): Boolean; message 'control:textShouldEndEditing:';
-    function control_textView_completions_forPartialWordRange_indexOfSelectedItem(control: NSControl; textView: NSTextView; words: NSArray; charRange: NSRange; index: clong): NSArray; message 'control:textView:completions:forPartialWordRange:indexOfSelectedItem:';
-    function control_textView_doCommandBySelector(control: NSControl; textView: NSTextView; commandSelector: SEL): Boolean; message 'control:textView:doCommandBySelector:';
-  end;
-
-type
-  NSControlSubclassNotifications = objccategory
-    procedure controlTextDidBeginEditing(obj: NSNotification); message 'controlTextDidBeginEditing:';
-    procedure controlTextDidChange(obj: NSNotification); message 'controlTextDidChange:';
-    procedure controlTextDidEndEditing(obj: NSNotification); message 'controlTextDidEndEditing:';
-  end;
-
-type
-  NSCopyLinkMoveHandler = objccategory
-    function fileManager_shouldProceedAfterError(fm: NSFileManager; errorInfo: NSDictionary): Boolean; message 'fileManager:shouldProceedAfterError:';
-    procedure fileManager_willProcessPath(fm: NSFileManager; path: NSString); message 'fileManager:willProcessPath:';
-  end;
-
-type
-  NSDatePickerCellDelegate = objccategory
-    procedure datePickerCell_validateProposedDateValue_timeInterval(aDatePickerCell: NSDatePickerCell; proposedDateValue: NSDate; proposedTimeInterval: NSTimeInterval); message 'datePickerCell:validateProposedDateValue:timeInterval:';
-  end;
-
-type
-  NSDistantObjectRequestMethods = objccategory
-    function connection_handleRequest(connection_: NSConnection; doreq: NSDistantObjectRequest): Boolean; message 'connection:handleRequest:';
-  end;
-
-type
-  NSDraggingDestination = objccategory
-    procedure concludeDragOperation(sender: id); message 'concludeDragOperation:';
-    procedure draggingEnded(sender: id); message 'draggingEnded:';
-    function draggingEntered(sender: id): NSDragOperation; message 'draggingEntered:';
-    procedure draggingExited(sender: id); message 'draggingExited:';
-    function draggingUpdated(sender: id): NSDragOperation; message 'draggingUpdated:';
-    function performDragOperation(sender: id): Boolean; message 'performDragOperation:';
-    function prepareForDragOperation(sender: id): Boolean; message 'prepareForDragOperation:';
-    function wantsPeriodicDraggingUpdates: Boolean; message 'wantsPeriodicDraggingUpdates';
-  end;
-
-type
-  NSDraggingSource = objccategory
-    procedure draggedImage_beganAt(image: NSImage; screenPoint: NSPoint); message 'draggedImage:beganAt:';
-    procedure draggedImage_endedAt_deposited(image: NSImage; screenPoint: NSPoint; flag: Boolean); message 'draggedImage:endedAt:deposited:';
-    procedure draggedImage_endedAt_operation(image: NSImage; screenPoint: NSPoint; operation: NSDragOperation); message 'draggedImage:endedAt:operation:';
-    procedure draggedImage_movedTo(image: NSImage; screenPoint: NSPoint); message 'draggedImage:movedTo:';
-    function draggingSourceOperationMaskForLocal(flag: Boolean): NSDragOperation; message 'draggingSourceOperationMaskForLocal:';
-    function ignoreModifierKeysWhileDragging: Boolean; message 'ignoreModifierKeysWhileDragging';
-    function namesOfPromisedFilesDroppedAtDestination(dropDestination: NSURL): NSArray; message 'namesOfPromisedFilesDroppedAtDestination:';
-  end;
-
-type
-  NSDrawerDelegate = objccategory
-    function drawerShouldClose(sender: NSDrawer): Boolean; message 'drawerShouldClose:';
-    function drawerShouldOpen(sender: NSDrawer): Boolean; message 'drawerShouldOpen:';
-    function drawerWillResizeContents_toSize(sender: NSDrawer; contentSize: NSSize): NSSize; message 'drawerWillResizeContents:toSize:';
-  end;
-
-type
-  NSDrawerNotifications = objccategory
-    procedure drawerDidClose(notification: NSNotification); message 'drawerDidClose:';
-    procedure drawerDidOpen(notification: NSNotification); message 'drawerDidOpen:';
-    procedure drawerWillClose(notification: NSNotification); message 'drawerWillClose:';
-    procedure drawerWillOpen(notification: NSNotification); message 'drawerWillOpen:';
-  end;
-
-type
-  NSEditorRegistration = objccategory
-    procedure objectDidBeginEditing(editor: id); message 'objectDidBeginEditing:';
-    procedure objectDidEndEditing(editor: id); message 'objectDidEndEditing:';
-  end;
-
-type
-  NSFileManagerFileOperationAdditions = objccategory
-    function fileManager_shouldCopyItemAtPath_toPath(fileManager: NSFileManager; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldCopyItemAtPath:toPath:';
-    function fileManager_shouldLinkItemAtPath_toPath(fileManager: NSFileManager; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldLinkItemAtPath:toPath:';
-    function fileManager_shouldMoveItemAtPath_toPath(fileManager: NSFileManager; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldMoveItemAtPath:toPath:';
-    function fileManager_shouldProceedAfterError_copyingItemAtPath_toPath(fileManager: NSFileManager; error: NSError; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldProceedAfterError:copyingItemAtPath:toPath:';
-    function fileManager_shouldProceedAfterError_linkingItemAtPath_toPath(fileManager: NSFileManager; error: NSError; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldProceedAfterError:linkingItemAtPath:toPath:';
-    function fileManager_shouldProceedAfterError_movingItemAtPath_toPath(fileManager: NSFileManager; error: NSError; srcPath: NSString; dstPath: NSString): Boolean; message 'fileManager:shouldProceedAfterError:movingItemAtPath:toPath:';
-    function fileManager_shouldProceedAfterError_removingItemAtPath(fileManager: NSFileManager; error: NSError; path: NSString): Boolean; message 'fileManager:shouldProceedAfterError:removingItemAtPath:';
-    function fileManager_shouldRemoveItemAtPath(fileManager: NSFileManager; path: NSString): Boolean; message 'fileManager:shouldRemoveItemAtPath:';
-  end;
-
-type
-  NSFontManagerDelegate = objccategory
-    function fontManager_willIncludeFont(sender: id; fontName: NSString): Boolean; message 'fontManager:willIncludeFont:';
-  end;
-
-type
-  NSImageDelegate = objccategory
-    procedure image_didLoadPartOfRepresentation_withValidRows(image: NSImage; rep: NSImageRep; rows: clong); message 'image:didLoadPartOfRepresentation:withValidRows:';
-    procedure image_didLoadRepresentation_withStatus(image: NSImage; rep: NSImageRep; status: NSImageLoadStatus); message 'image:didLoadRepresentation:withStatus:';
-    procedure image_didLoadRepresentationHeader(image: NSImage; rep: NSImageRep); message 'image:didLoadRepresentationHeader:';
-    procedure image_willLoadRepresentation(image: NSImage; rep: NSImageRep); message 'image:willLoadRepresentation:';
-    function imageDidNotDraw_inRect(sender: id; aRect: NSRect): NSImage; message 'imageDidNotDraw:inRect:';
-  end;
-
-type
-  NSKeyValueObserverNotification = objccategory
-    procedure didChange_valuesAtIndexes_forKey(changeKind: NSKeyValueChange; indexes: NSIndexSet; key: NSString); message 'didChange:valuesAtIndexes:forKey:';
-    procedure didChangeValueForKey(key: NSString); message 'didChangeValueForKey:';
-    procedure didChangeValueForKey_withSetMutation_usingObjects(key: NSString; mutationKind: NSKeyValueSetMutationKind; objects: NSSet); message 'didChangeValueForKey:withSetMutation:usingObjects:';
-    procedure willChange_valuesAtIndexes_forKey(changeKind: NSKeyValueChange; indexes: NSIndexSet; key: NSString); message 'willChange:valuesAtIndexes:forKey:';
-    procedure willChangeValueForKey(key: NSString); message 'willChangeValueForKey:';
-    procedure willChangeValueForKey_withSetMutation_usingObjects(key: NSString; mutationKind: NSKeyValueSetMutationKind; objects: NSSet); message 'willChangeValueForKey:withSetMutation:usingObjects:';
-  end;
-
-type
-  NSKeyedArchiverDelegate = objccategory
-    procedure archiver_didEncodeObject(archiver: NSKeyedArchiver; object_: id); message 'archiver:didEncodeObject:';
-    function archiver_willEncodeObject(archiver: NSKeyedArchiver; object_: id): id; message 'archiver:willEncodeObject:';
-    procedure archiver_willReplaceObject_withObject(archiver: NSKeyedArchiver; object_: id; newObject: id); message 'archiver:willReplaceObject:withObject:';
-    procedure archiverDidFinish(archiver: NSKeyedArchiver); message 'archiverDidFinish:';
-    procedure archiverWillFinish(archiver: NSKeyedArchiver); message 'archiverWillFinish:';
-  end;
-
-type
-  NSKeyedUnarchiverDelegate = objccategory
-    function unarchiver_cannotDecodeObjectOfClassName_originalClasses(unarchiver: NSKeyedUnarchiver; name: NSString; classNames: NSArray): Pobjc_class; message 'unarchiver:cannotDecodeObjectOfClassName:originalClasses:';
-    function unarchiver_didDecodeObject(unarchiver: NSKeyedUnarchiver; object_: id): id; message 'unarchiver:didDecodeObject:';
-    procedure unarchiver_willReplaceObject_withObject(unarchiver: NSKeyedUnarchiver; object_: id; newObject: id); message 'unarchiver:willReplaceObject:withObject:';
-    procedure unarchiverDidFinish(unarchiver: NSKeyedUnarchiver); message 'unarchiverDidFinish:';
-    procedure unarchiverWillFinish(unarchiver: NSKeyedUnarchiver); message 'unarchiverWillFinish:';
-  end;
-
-type
-  NSLayoutManagerDelegate = objccategory
-    procedure layoutManager_didCompleteLayoutForTextContainer_atEnd(layoutManager: NSLayoutManager; textContainer: NSTextContainer; layoutFinishedFlag: Boolean); message 'layoutManager:didCompleteLayoutForTextContainer:atEnd:';
-    function layoutManager_shouldUseTemporaryAttributes_forDrawingToScreen_atCharacterIndex_effectiveRange(layoutManager: NSLayoutManager; attrs: NSDictionary; toScreen: Boolean; charIndex: culong; effectiveCharRange: NSRangePointer): NSDictionary; message 'layoutManager:shouldUseTemporaryAttributes:forDrawingToScreen:atCharacterIndex:effectiveRange:';
-    procedure layoutManagerDidInvalidateLayout(sender: NSLayoutManager); message 'layoutManagerDidInvalidateLayout:';
-  end;
-
-type
-  NSMachPortDelegateMethods = objccategory
-    procedure handleMachMessage(msg: Pointer); message 'handleMachMessage:';
-  end;
-
-type
-  NSMenuDelegate = objccategory
-    function menu_updateItem_atIndex_shouldCancel(menu: NSMenu; item: NSMenuItem; index: clong; shouldCancel: Boolean): Boolean; message 'menu:updateItem:atIndex:shouldCancel:';
-    procedure menu_willHighlightItem(menu: NSMenu; item: NSMenuItem); message 'menu:willHighlightItem:';
-    procedure menuDidClose(menu: NSMenu); message 'menuDidClose:';
-    function menuHasKeyEquivalent_forEvent_target_action(menu: NSMenu; event: NSEvent; target: id; action: SEL): Boolean; message 'menuHasKeyEquivalent:forEvent:target:action:';
-    procedure menuNeedsUpdate(menu: NSMenu); message 'menuNeedsUpdate:';
-    procedure menuWillOpen(menu: NSMenu); message 'menuWillOpen:';
-    function numberOfItemsInMenu(menu: NSMenu): clong; message 'numberOfItemsInMenu:';
-  end;
-
-type
-  NSMetadataQueryDelegate = objccategory
-    function metadataQuery_replacementObjectForResultObject(query: NSMetadataQuery; result_: NSMetadataItem): id; message 'metadataQuery:replacementObjectForResultObject:';
-    function metadataQuery_replacementValueForAttribute_value(query: NSMetadataQuery; attrName: NSString; attrValue: id): id; message 'metadataQuery:replacementValueForAttribute:value:';
-  end;
-
-type
-  NSNetServiceBrowserDelegateMethods = objccategory
-    procedure netServiceBrowser_didFindDomain_moreComing(aNetServiceBrowser: NSNetServiceBrowser; domainString: NSString; moreComing: Boolean); message 'netServiceBrowser:didFindDomain:moreComing:';
-    procedure netServiceBrowser_didFindService_moreComing(aNetServiceBrowser: NSNetServiceBrowser; aNetService: NSNetService; moreComing: Boolean); message 'netServiceBrowser:didFindService:moreComing:';
-    procedure netServiceBrowser_didNotSearch(aNetServiceBrowser: NSNetServiceBrowser; errorDict: NSDictionary); message 'netServiceBrowser:didNotSearch:';
-    procedure netServiceBrowser_didRemoveDomain_moreComing(aNetServiceBrowser: NSNetServiceBrowser; domainString: NSString; moreComing: Boolean); message 'netServiceBrowser:didRemoveDomain:moreComing:';
-    procedure netServiceBrowser_didRemoveService_moreComing(aNetServiceBrowser: NSNetServiceBrowser; aNetService: NSNetService; moreComing: Boolean); message 'netServiceBrowser:didRemoveService:moreComing:';
-    procedure netServiceBrowserDidStopSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserDidStopSearch:';
-    procedure netServiceBrowserWillSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserWillSearch:';
-  end;
-
-type
-  NSNetServiceDelegateMethods = objccategory
-    procedure netService_didNotPublish(sender: NSNetService; errorDict: NSDictionary); message 'netService:didNotPublish:';
-    procedure netService_didNotResolve(sender: NSNetService; errorDict: NSDictionary); message 'netService:didNotResolve:';
-    procedure netService_didUpdateTXTRecordData(sender: NSNetService; data: NSData); message 'netService:didUpdateTXTRecordData:';
-    procedure netServiceDidPublish(sender: NSNetService); message 'netServiceDidPublish:';
-    procedure netServiceDidResolveAddress(sender: NSNetService); message 'netServiceDidResolveAddress:';
-    procedure netServiceDidStop(sender: NSNetService); message 'netServiceDidStop:';
-    procedure netServiceWillPublish(sender: NSNetService); message 'netServiceWillPublish:';
-    procedure netServiceWillResolve(sender: NSNetService); message 'netServiceWillResolve:';
-  end;
-
-type
-  NSOutlineViewDataSource = objccategory
-    function outlineView_acceptDrop_item_childIndex(outlineView: NSOutlineView; info: id; item: id; index: clong): Boolean; message 'outlineView:acceptDrop:item:childIndex:';
-    function outlineView_child_ofItem(outlineView: NSOutlineView; index: clong; item: id): id; message 'outlineView:child:ofItem:';
-    function outlineView_isItemExpandable(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:isItemExpandable:';
-    function outlineView_itemForPersistentObject(outlineView: NSOutlineView; object_: id): id; message 'outlineView:itemForPersistentObject:';
-    function outlineView_namesOfPromisedFilesDroppedAtDestination_forDraggedItems(outlineView: NSOutlineView; dropDestination: NSURL; items: NSArray): NSArray; message 'outlineView:namesOfPromisedFilesDroppedAtDestination:forDraggedItems:';
-    function outlineView_numberOfChildrenOfItem(outlineView: NSOutlineView; item: id): clong; message 'outlineView:numberOfChildrenOfItem:';
-    function outlineView_objectValueForTableColumn_byItem(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): id; message 'outlineView:objectValueForTableColumn:byItem:';
-    function outlineView_persistentObjectForItem(outlineView: NSOutlineView; item: id): id; message 'outlineView:persistentObjectForItem:';
-    procedure outlineView_setObjectValue_forTableColumn_byItem(outlineView: NSOutlineView; object_: id; tableColumn: NSTableColumn; item: id); message 'outlineView:setObjectValue:forTableColumn:byItem:';
-    procedure outlineView_sortDescriptorsDidChange(outlineView: NSOutlineView; oldDescriptors: NSArray); message 'outlineView:sortDescriptorsDidChange:';
-    function outlineView_validateDrop_proposedItem_proposedChildIndex(outlineView: NSOutlineView; info: id; item: id; index: clong): NSDragOperation; message 'outlineView:validateDrop:proposedItem:proposedChildIndex:';
-    function outlineView_writeItems_toPasteboard(outlineView: NSOutlineView; items: NSArray; pasteboard: NSPasteboard): Boolean; message 'outlineView:writeItems:toPasteboard:';
-  end;
-
-type
-  NSOutlineViewDelegate = objccategory
-    function outlineView_dataCellForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): NSCell; message 'outlineView:dataCellForTableColumn:item:';
-    procedure outlineView_didClickTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:didClickTableColumn:';
-    procedure outlineView_didDragTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:didDragTableColumn:';
-    function outlineView_heightOfRowByItem(outlineView: NSOutlineView; item: id): CGFloat; message 'outlineView:heightOfRowByItem:';
-    function outlineView_isGroupItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:isGroupItem:';
-    procedure outlineView_mouseDownInHeaderOfTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:mouseDownInHeaderOfTableColumn:';
-    function outlineView_nextTypeSelectMatchFromItem_toItem_forString(outlineView: NSOutlineView; startItem: id; endItem: id; searchString: NSString): id; message 'outlineView:nextTypeSelectMatchFromItem:toItem:forString:';
-    function outlineView_selectionIndexesForProposedSelection(outlineView: NSOutlineView; proposedSelectionIndexes: NSIndexSet): NSIndexSet; message 'outlineView:selectionIndexesForProposedSelection:';
-    function outlineView_shouldCollapseItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:shouldCollapseItem:';
-    function outlineView_shouldEditTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): Boolean; message 'outlineView:shouldEditTableColumn:item:';
-    function outlineView_shouldExpandItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:shouldExpandItem:';
-    function outlineView_shouldSelectItem(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:shouldSelectItem:';
-    function outlineView_shouldSelectTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn): Boolean; message 'outlineView:shouldSelectTableColumn:';
-    function outlineView_shouldShowCellExpansionForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): Boolean; message 'outlineView:shouldShowCellExpansionForTableColumn:item:';
-    function outlineView_shouldTrackCell_forTableColumn_item(outlineView: NSOutlineView; cell_: NSCell; tableColumn: NSTableColumn; item: id): Boolean; message 'outlineView:shouldTrackCell:forTableColumn:item:';
-    function outlineView_shouldTypeSelectForEvent_withCurrentSearchString(outlineView: NSOutlineView; event: NSEvent; searchString: NSString): Boolean; message 'outlineView:shouldTypeSelectForEvent:withCurrentSearchString:';
-    function outlineView_toolTipForCell_rect_tableColumn_item_mouseLocation(outlineView: NSOutlineView; cell_: NSCell; rect: NSRectPointer; tableColumn: NSTableColumn; item: id; mouseLocation: NSPoint): NSString; message 'outlineView:toolTipForCell:rect:tableColumn:item:mouseLocation:';
-    function outlineView_typeSelectStringForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): NSString; message 'outlineView:typeSelectStringForTableColumn:item:';
-    procedure outlineView_willDisplayCell_forTableColumn_item(outlineView: NSOutlineView; cell_: id; tableColumn: NSTableColumn; item: id); message 'outlineView:willDisplayCell:forTableColumn:item:';
-    procedure outlineView_willDisplayOutlineCell_forTableColumn_item(outlineView: NSOutlineView; cell_: id; tableColumn: NSTableColumn; item: id); message 'outlineView:willDisplayOutlineCell:forTableColumn:item:';
-    function selectionShouldChangeInOutlineView(outlineView: NSOutlineView): Boolean; message 'selectionShouldChangeInOutlineView:';
-  end;
-
-type
-  NSOutlineViewNotifications = objccategory
-    procedure outlineViewColumnDidMove(notification: NSNotification); message 'outlineViewColumnDidMove:';
-    procedure outlineViewColumnDidResize(notification: NSNotification); message 'outlineViewColumnDidResize:';
-    procedure outlineViewItemDidCollapse(notification: NSNotification); message 'outlineViewItemDidCollapse:';
-    procedure outlineViewItemDidExpand(notification: NSNotification); message 'outlineViewItemDidExpand:';
-    procedure outlineViewItemWillCollapse(notification: NSNotification); message 'outlineViewItemWillCollapse:';
-    procedure outlineViewItemWillExpand(notification: NSNotification); message 'outlineViewItemWillExpand:';
-    procedure outlineViewSelectionDidChange(notification: NSNotification); message 'outlineViewSelectionDidChange:';
-    procedure outlineViewSelectionIsChanging(notification: NSNotification); message 'outlineViewSelectionIsChanging:';
-  end;
-
-type
-  NSPasteboardOwner = objccategory
-    procedure pasteboard_provideDataForType(sender: NSPasteboard; type_: NSString); message 'pasteboard:provideDataForType:';
-    procedure pasteboardChangedOwner(sender: NSPasteboard); message 'pasteboardChangedOwner:';
-  end;
-
-type
-  NSPortDelegateMethods = objccategory
-    procedure handlePortMessage(message: NSPortMessage); message 'handlePortMessage:';
-  end;
-
-type
-  NSRuleEditorDelegateMethods = objccategory
-    function ruleEditor_child_forCriterion_withRowType(editor: NSRuleEditor; index: clong; criterion: id; rowType: NSRuleEditorRowType): id; message 'ruleEditor:child:forCriterion:withRowType:';
-    function ruleEditor_displayValueForCriterion_inRow(editor: NSRuleEditor; criterion: id; row: clong): id; message 'ruleEditor:displayValueForCriterion:inRow:';
-    function ruleEditor_numberOfChildrenForCriterion_withRowType(editor: NSRuleEditor; criterion: id; rowType: NSRuleEditorRowType): clong; message 'ruleEditor:numberOfChildrenForCriterion:withRowType:';
-    function ruleEditor_predicatePartsForCriterion_withDisplayValue_inRow(editor: NSRuleEditor; criterion: id; value: id; row: clong): NSDictionary; message 'ruleEditor:predicatePartsForCriterion:withDisplayValue:inRow:';
-    procedure ruleEditorRowsDidChange(notification: NSNotification); message 'ruleEditorRowsDidChange:';
-  end;
-
-type
-  NSSavePanelDelegate = objccategory
-    function panel_compareFilename_with_caseSensitive(sender: id; name: NSString; name1: NSString; caseSensitive: Boolean): NSComparisonResult; message 'panel:compareFilename:with:caseSensitive:';
-    procedure panel_directoryDidChange(sender: id; path: NSString); message 'panel:directoryDidChange:';
-    function panel_isValidFilename(sender: id; filename_: NSString): Boolean; message 'panel:isValidFilename:';
-    function panel_shouldShowFilename(sender: id; filename_: NSString): Boolean; message 'panel:shouldShowFilename:';
-    function panel_userEnteredFilename_confirmed(sender: id; filename_: NSString; okFlag: Boolean): NSString; message 'panel:userEnteredFilename:confirmed:';
-    procedure panel_willExpand(sender: id; expanding: Boolean); message 'panel:willExpand:';
-    procedure panelSelectionDidChange(sender: id); message 'panelSelectionDidChange:';
-  end;
-
-type
-  NSSoundDelegateMethods = objccategory
-    procedure sound_didFinishPlaying(sound: NSSound; aBool: Boolean); message 'sound:didFinishPlaying:';
-  end;
-
-type
-  NSSpeechRecognizerDelegate = objccategory
-    procedure speechRecognizer_didRecognizeCommand(sender: NSSpeechRecognizer; command: id); message 'speechRecognizer:didRecognizeCommand:';
-  end;
-
-type
-  NSSpeechSynthesizerDelegate = objccategory
-    procedure speechSynthesizer_didEncounterErrorAtIndex_ofString_message(sender: NSSpeechSynthesizer; characterIndex: culong; string_: NSString; message: NSString); message 'speechSynthesizer:didEncounterErrorAtIndex:ofString:message:';
-    procedure speechSynthesizer_didEncounterSyncMessage(sender: NSSpeechSynthesizer; message: NSString); message 'speechSynthesizer:didEncounterSyncMessage:';
-    procedure speechSynthesizer_didFinishSpeaking(sender: NSSpeechSynthesizer; finishedSpeaking: Boolean); message 'speechSynthesizer:didFinishSpeaking:';
-    procedure speechSynthesizer_willSpeakPhoneme(sender: NSSpeechSynthesizer; phonemeOpcode: cshort); message 'speechSynthesizer:willSpeakPhoneme:';
-    procedure speechSynthesizer_willSpeakWord_ofString(sender: NSSpeechSynthesizer; characterRange: NSRange; string_: NSString); message 'speechSynthesizer:willSpeakWord:ofString:';
-  end;
-
-type
-  NSSpellServerDelegate = objccategory
-    function spellServer_checkGrammarInString_language_details(sender: NSSpellServer; stringToCheck: NSString; language: NSString; details: NSArray): NSRange; message 'spellServer:checkGrammarInString:language:details:';
-    procedure spellServer_didForgetWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString); message 'spellServer:didForgetWord:inLanguage:';
-    procedure spellServer_didLearnWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString); message 'spellServer:didLearnWord:inLanguage:';
-    function spellServer_findMisspelledWordInString_language_wordCount_countOnly(sender: NSSpellServer; stringToCheck: NSString; language: NSString; wordCount: clong; countOnly: Boolean): NSRange; message 'spellServer:findMisspelledWordInString:language:wordCount:countOnly:';
-    function spellServer_suggestCompletionsForPartialWordRange_inString_language(sender: NSSpellServer; range: NSRange; string_: NSString; language: NSString): NSArray; message 'spellServer:suggestCompletionsForPartialWordRange:inString:language:';
-    function spellServer_suggestGuessesForWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString): NSArray; message 'spellServer:suggestGuessesForWord:inLanguage:';
-  end;
-
-type
-  NSSplitViewDelegate = objccategory
-    function splitView_additionalEffectiveRectOfDividerAtIndex(splitView: NSSplitView; dividerIndex: clong): NSRect; message 'splitView:additionalEffectiveRectOfDividerAtIndex:';
-    function splitView_canCollapseSubview(splitView: NSSplitView; subview: NSView): Boolean; message 'splitView:canCollapseSubview:';
-    function splitView_constrainMaxCoordinate_ofSubviewAt(splitView: NSSplitView; proposedMaximumPosition: CGFloat; dividerIndex: clong): CGFloat; message 'splitView:constrainMaxCoordinate:ofSubviewAt:';
-    function splitView_constrainMinCoordinate_ofSubviewAt(splitView: NSSplitView; proposedMinimumPosition: CGFloat; dividerIndex: clong): CGFloat; message 'splitView:constrainMinCoordinate:ofSubviewAt:';
-    function splitView_constrainSplitPosition_ofSubviewAt(splitView: NSSplitView; proposedPosition: CGFloat; dividerIndex: clong): CGFloat; message 'splitView:constrainSplitPosition:ofSubviewAt:';
-    function splitView_effectiveRect_forDrawnRect_ofDividerAtIndex(splitView: NSSplitView; proposedEffectiveRect: NSRect; drawnRect: NSRect; dividerIndex: clong): NSRect; message 'splitView:effectiveRect:forDrawnRect:ofDividerAtIndex:';
-    procedure splitView_resizeSubviewsWithOldSize(splitView: NSSplitView; oldSize: NSSize); message 'splitView:resizeSubviewsWithOldSize:';
-    function splitView_shouldCollapseSubview_forDoubleClickOnDividerAtIndex(splitView: NSSplitView; subview: NSView; dividerIndex: clong): Boolean; message 'splitView:shouldCollapseSubview:forDoubleClickOnDividerAtIndex:';
-    function splitView_shouldHideDividerAtIndex(splitView: NSSplitView; dividerIndex: clong): Boolean; message 'splitView:shouldHideDividerAtIndex:';
-    procedure splitViewDidResizeSubviews(notification: NSNotification); message 'splitViewDidResizeSubviews:';
-    procedure splitViewWillResizeSubviews(notification: NSNotification); message 'splitViewWillResizeSubviews:';
-  end;
-
-type
-  NSStreamDelegateEventExtensions = objccategory
-    procedure stream_handleEvent(aStream: NSStream; eventCode: NSStreamEvent); message 'stream:handleEvent:';
-  end;
-
-type
-  NSTabViewDelegate = objccategory
-    procedure tabView_didSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem); message 'tabView:didSelectTabViewItem:';
-    function tabView_shouldSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem): Boolean; message 'tabView:shouldSelectTabViewItem:';
-    procedure tabView_willSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem); message 'tabView:willSelectTabViewItem:';
-    procedure tabViewDidChangeNumberOfTabViewItems(TabView: NSTabView); message 'tabViewDidChangeNumberOfTabViewItems:';
-  end;
-
-type
-  NSTableDataSource = objccategory
-    function numberOfRowsInTableView(tableView: NSTableView): clong; message 'numberOfRowsInTableView:';
-    function tableView_acceptDrop_row_dropOperation(tableView: NSTableView; info: id; row: clong; dropOperation: NSTableViewDropOperation): Boolean; message 'tableView:acceptDrop:row:dropOperation:';
-    function tableView_namesOfPromisedFilesDroppedAtDestination_forDraggedRowsWithIndexes(tableView: NSTableView; dropDestination: NSURL; indexSet: NSIndexSet): NSArray; message 'tableView:namesOfPromisedFilesDroppedAtDestination:forDraggedRowsWithIndexes:';
-    function tableView_objectValueForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): id; message 'tableView:objectValueForTableColumn:row:';
-    procedure tableView_setObjectValue_forTableColumn_row(tableView: NSTableView; object_: id; tableColumn: NSTableColumn; row: clong); message 'tableView:setObjectValue:forTableColumn:row:';
-    procedure tableView_sortDescriptorsDidChange(tableView: NSTableView; oldDescriptors: NSArray); message 'tableView:sortDescriptorsDidChange:';
-    function tableView_validateDrop_proposedRow_proposedDropOperation(tableView: NSTableView; info: id; row: clong; dropOperation: NSTableViewDropOperation): NSDragOperation; message 'tableView:validateDrop:proposedRow:proposedDropOperation:';
-    function tableView_writeRows_toPasteboard(tableView: NSTableView; rows: NSArray; pboard: NSPasteboard): Boolean; message 'tableView:writeRows:toPasteboard:';
-    function tableView_writeRowsWithIndexes_toPasteboard(tableView: NSTableView; rowIndexes: NSIndexSet; pboard: NSPasteboard): Boolean; message 'tableView:writeRowsWithIndexes:toPasteboard:';
-  end;
-
-type
-  NSTableViewDelegate = objccategory
-    function selectionShouldChangeInTableView(tableView: NSTableView): Boolean; message 'selectionShouldChangeInTableView:';
-    function tableView_dataCellForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): NSCell; message 'tableView:dataCellForTableColumn:row:';
-    procedure tableView_didClickTableColumn(tableView: NSTableView; tableColumn: NSTableColumn); message 'tableView:didClickTableColumn:';
-    procedure tableView_didDragTableColumn(tableView: NSTableView; tableColumn: NSTableColumn); message 'tableView:didDragTableColumn:';
-    function tableView_heightOfRow(tableView: NSTableView; row: clong): CGFloat; message 'tableView:heightOfRow:';
-    function tableView_isGroupRow(tableView: NSTableView; row: clong): Boolean; message 'tableView:isGroupRow:';
-    procedure tableView_mouseDownInHeaderOfTableColumn(tableView: NSTableView; tableColumn: NSTableColumn); message 'tableView:mouseDownInHeaderOfTableColumn:';
-    function tableView_nextTypeSelectMatchFromRow_toRow_forString(tableView: NSTableView; startRow: clong; endRow: clong; searchString: NSString): clong; message 'tableView:nextTypeSelectMatchFromRow:toRow:forString:';
-    function tableView_selectionIndexesForProposedSelection(tableView: NSTableView; proposedSelectionIndexes: NSIndexSet): NSIndexSet; message 'tableView:selectionIndexesForProposedSelection:';
-    function tableView_shouldEditTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): Boolean; message 'tableView:shouldEditTableColumn:row:';
-    function tableView_shouldSelectRow(tableView: NSTableView; row: clong): Boolean; message 'tableView:shouldSelectRow:';
-    function tableView_shouldSelectTableColumn(tableView: NSTableView; tableColumn: NSTableColumn): Boolean; message 'tableView:shouldSelectTableColumn:';
-    function tableView_shouldShowCellExpansionForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): Boolean; message 'tableView:shouldShowCellExpansionForTableColumn:row:';
-    function tableView_shouldTrackCell_forTableColumn_row(tableView: NSTableView; cell_: NSCell; tableColumn: NSTableColumn; row: clong): Boolean; message 'tableView:shouldTrackCell:forTableColumn:row:';
-    function tableView_shouldTypeSelectForEvent_withCurrentSearchString(tableView: NSTableView; event: NSEvent; searchString: NSString): Boolean; message 'tableView:shouldTypeSelectForEvent:withCurrentSearchString:';
-    function tableView_toolTipForCell_rect_tableColumn_row_mouseLocation(tableView: NSTableView; cell_: NSCell; rect: NSRectPointer; tableColumn: NSTableColumn; row: clong; mouseLocation: NSPoint): NSString; message 'tableView:toolTipForCell:rect:tableColumn:row:mouseLocation:';
-    function tableView_typeSelectStringForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: clong): NSString; message 'tableView:typeSelectStringForTableColumn:row:';
-    procedure tableView_willDisplayCell_forTableColumn_row(tableView: NSTableView; cell_: id; tableColumn: NSTableColumn; row: clong); message 'tableView:willDisplayCell:forTableColumn:row:';
-  end;
-
-type
-  NSTableViewNotifications = objccategory
-    procedure tableViewColumnDidMove(notification: NSNotification); message 'tableViewColumnDidMove:';
-    procedure tableViewColumnDidResize(notification: NSNotification); message 'tableViewColumnDidResize:';
-    procedure tableViewSelectionDidChange(notification: NSNotification); message 'tableViewSelectionDidChange:';
-    procedure tableViewSelectionIsChanging(notification: NSNotification); message 'tableViewSelectionIsChanging:';
-  end;
-
-type
-  NSTextDelegate = objccategory
-    procedure textDidBeginEditing(notification: NSNotification); message 'textDidBeginEditing:';
-    procedure textDidChange(notification: NSNotification); message 'textDidChange:';
-    procedure textDidEndEditing(notification: NSNotification); message 'textDidEndEditing:';
-    function textShouldBeginEditing(textObject: NSText): Boolean; message 'textShouldBeginEditing:';
-    function textShouldEndEditing(textObject: NSText): Boolean; message 'textShouldEndEditing:';
-  end;
-
-type
-  NSTextStorageDelegate = objccategory
-    procedure textStorageDidProcessEditing(notification: NSNotification); message 'textStorageDidProcessEditing:';
-    procedure textStorageWillProcessEditing(notification: NSNotification); message 'textStorageWillProcessEditing:';
-  end;
-
-type
-  NSTextViewDelegate = objccategory
-    procedure textView_clickedOnCell_inRect(textView: NSTextView; cell: id; cellFrame: NSRect); message 'textView:clickedOnCell:inRect:';
-    procedure textView_clickedOnCell_inRect_atIndex(textView: NSTextView; cell: id; cellFrame: NSRect; charIndex: culong); message 'textView:clickedOnCell:inRect:atIndex:';
-    function textView_clickedOnLink(textView: NSTextView; link: id): Boolean; message 'textView:clickedOnLink:';
-    function textView_clickedOnLink_atIndex(textView: NSTextView; link: id; charIndex: culong): Boolean; message 'textView:clickedOnLink:atIndex:';
-    function textView_completions_forPartialWordRange_indexOfSelectedItem(textView: NSTextView; words: NSArray; charRange: NSRange; index: clong): NSArray; message 'textView:completions:forPartialWordRange:indexOfSelectedItem:';
-    function textView_doCommandBySelector(textView: NSTextView; commandSelector: SEL): Boolean; message 'textView:doCommandBySelector:';
-    procedure textView_doubleClickedOnCell_inRect(textView: NSTextView; cell: id; cellFrame: NSRect); message 'textView:doubleClickedOnCell:inRect:';
-    procedure textView_doubleClickedOnCell_inRect_atIndex(textView: NSTextView; cell: id; cellFrame: NSRect; charIndex: culong); message 'textView:doubleClickedOnCell:inRect:atIndex:';
-    procedure textView_draggedCell_inRect_event(view: NSTextView; cell: id; rect: NSRect; event: NSEvent); message 'textView:draggedCell:inRect:event:';
-    procedure textView_draggedCell_inRect_event_atIndex(view: NSTextView; cell: id; rect: NSRect; event: NSEvent; charIndex: culong); message 'textView:draggedCell:inRect:event:atIndex:';
-    function textView_menu_forEvent_atIndex(view: NSTextView; menu_: NSMenu; event: NSEvent; charIndex: culong): NSMenu; message 'textView:menu:forEvent:atIndex:';
-    function textView_shouldChangeTextInRange_replacementString(textView: NSTextView; affectedCharRange: NSRange; replacementString: NSString): Boolean; message 'textView:shouldChangeTextInRange:replacementString:';
-    function textView_shouldChangeTextInRanges_replacementStrings(textView: NSTextView; affectedRanges: NSArray; replacementStrings: NSArray): Boolean; message 'textView:shouldChangeTextInRanges:replacementStrings:';
-    function textView_shouldChangeTypingAttributes_toAttributes(textView: NSTextView; oldTypingAttributes: NSDictionary; newTypingAttributes: NSDictionary): NSDictionary; message 'textView:shouldChangeTypingAttributes:toAttributes:';
-    function textView_shouldSetSpellingState_range(textView: NSTextView; value: clong; affectedCharRange: NSRange): clong; message 'textView:shouldSetSpellingState:range:';
-    function textView_willChangeSelectionFromCharacterRange_toCharacterRange(textView: NSTextView; oldSelectedCharRange: NSRange; newSelectedCharRange: NSRange): NSRange; message 'textView:willChangeSelectionFromCharacterRange:toCharacterRange:';
-    function textView_willChangeSelectionFromCharacterRanges_toCharacterRanges(textView: NSTextView; oldSelectedCharRanges: NSArray; newSelectedCharRanges: NSArray): NSArray; message 'textView:willChangeSelectionFromCharacterRanges:toCharacterRanges:';
-    function textView_willDisplayToolTip_forCharacterAtIndex(textView: NSTextView; toolTip_: NSString; characterIndex: culong): NSString; message 'textView:willDisplayToolTip:forCharacterAtIndex:';
-    function textView_writablePasteboardTypesForCell_atIndex(view: NSTextView; cell: id; charIndex: culong): NSArray; message 'textView:writablePasteboardTypesForCell:atIndex:';
-    function textView_writeCell_atIndex_toPasteboard_type(view: NSTextView; cell: id; charIndex: culong; pboard: NSPasteboard; type_: NSString): Boolean; message 'textView:writeCell:atIndex:toPasteboard:type:';
-    procedure textViewDidChangeSelection(notification: NSNotification); message 'textViewDidChangeSelection:';
-    procedure textViewDidChangeTypingAttributes(notification: NSNotification); message 'textViewDidChangeTypingAttributes:';
-    function undoManagerForTextView(view: NSTextView): NSUndoManager; message 'undoManagerForTextView:';
-  end;
-
-type
-  NSTokenFieldCellDelegate = objccategory
-    function tokenFieldCell_completionsForSubstring_indexOfToken_indexOfSelectedItem(tokenFieldCell: NSTokenFieldCell; substring: NSString; tokenIndex: clong; selectedIndex: clong): NSArray; message 'tokenFieldCell:completionsForSubstring:indexOfToken:indexOfSelectedItem:';
-    function tokenFieldCell_displayStringForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSString; message 'tokenFieldCell:displayStringForRepresentedObject:';
-    function tokenFieldCell_editingStringForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSString; message 'tokenFieldCell:editingStringForRepresentedObject:';
-    function tokenFieldCell_hasMenuForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): Boolean; message 'tokenFieldCell:hasMenuForRepresentedObject:';
-    function tokenFieldCell_menuForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSMenu; message 'tokenFieldCell:menuForRepresentedObject:';
-    function tokenFieldCell_readFromPasteboard(tokenFieldCell: NSTokenFieldCell; pboard: NSPasteboard): NSArray; message 'tokenFieldCell:readFromPasteboard:';
-    function tokenFieldCell_representedObjectForEditingString(tokenFieldCell: NSTokenFieldCell; editingString: NSString): id; message 'tokenFieldCell:representedObjectForEditingString:';
-    function tokenFieldCell_shouldAddObjects_atIndex(tokenFieldCell: NSTokenFieldCell; tokens: NSArray; index: culong): NSArray; message 'tokenFieldCell:shouldAddObjects:atIndex:';
-    function tokenFieldCell_styleForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject_: id): NSTokenStyle; message 'tokenFieldCell:styleForRepresentedObject:';
-    function tokenFieldCell_writeRepresentedObjects_toPasteboard(tokenFieldCell: NSTokenFieldCell; objects: NSArray; pboard: NSPasteboard): Boolean; message 'tokenFieldCell:writeRepresentedObjects:toPasteboard:';
-  end;
-
-type
-  NSTokenFieldDelegate = objccategory
-    function tokenField_completionsForSubstring_indexOfToken_indexOfSelectedItem(tokenField: NSTokenField; substring: NSString; tokenIndex: clong; selectedIndex: clong): NSArray; message 'tokenField:completionsForSubstring:indexOfToken:indexOfSelectedItem:';
-    function tokenField_displayStringForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSString; message 'tokenField:displayStringForRepresentedObject:';
-    function tokenField_editingStringForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSString; message 'tokenField:editingStringForRepresentedObject:';
-    function tokenField_hasMenuForRepresentedObject(tokenField: NSTokenField; representedObject: id): Boolean; message 'tokenField:hasMenuForRepresentedObject:';
-    function tokenField_menuForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSMenu; message 'tokenField:menuForRepresentedObject:';
-    function tokenField_readFromPasteboard(tokenField: NSTokenField; pboard: NSPasteboard): NSArray; message 'tokenField:readFromPasteboard:';
-    function tokenField_representedObjectForEditingString(tokenField: NSTokenField; editingString: NSString): id; message 'tokenField:representedObjectForEditingString:';
-    function tokenField_shouldAddObjects_atIndex(tokenField: NSTokenField; tokens: NSArray; index: culong): NSArray; message 'tokenField:shouldAddObjects:atIndex:';
-    function tokenField_styleForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSTokenStyle; message 'tokenField:styleForRepresentedObject:';
-    function tokenField_writeRepresentedObjects_toPasteboard(tokenField: NSTokenField; objects: NSArray; pboard: NSPasteboard): Boolean; message 'tokenField:writeRepresentedObjects:toPasteboard:';
-  end;
-
-type
-  NSToolbarDelegate = objccategory
-    function toolbar_itemForItemIdentifier_willBeInsertedIntoToolbar(toolbar: NSToolbar; itemIdentifier: NSString; flag: Boolean): NSToolbarItem; message 'toolbar:itemForItemIdentifier:willBeInsertedIntoToolbar:';
-    function toolbarAllowedItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarAllowedItemIdentifiers:';
-    function toolbarDefaultItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarDefaultItemIdentifiers:';
-    function toolbarSelectableItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarSelectableItemIdentifiers:';
-  end;
-
-type
-  NSToolbarNotifications = objccategory
-    procedure toolbarDidRemoveItem(notification: NSNotification); message 'toolbarDidRemoveItem:';
-    procedure toolbarWillAddItem(notification: NSNotification); message 'toolbarWillAddItem:';
-  end;
-
-type
-  NSURLConnectionDelegate = objccategory
-    procedure connection_didCancelAuthenticationChallenge(connection: NSURLConnection; challenge: NSURLAuthenticationChallenge); message 'connection:didCancelAuthenticationChallenge:';
-    procedure connection_didFailWithError(connection: NSURLConnection; error: NSError); message 'connection:didFailWithError:';
-    procedure connection_didReceiveAuthenticationChallenge(connection: NSURLConnection; challenge: NSURLAuthenticationChallenge); message 'connection:didReceiveAuthenticationChallenge:';
-    procedure connection_didReceiveData(connection: NSURLConnection; data: NSData); message 'connection:didReceiveData:';
-    procedure connection_didReceiveResponse(connection: NSURLConnection; response: NSURLResponse); message 'connection:didReceiveResponse:';
-    function connection_willCacheResponse(connection: NSURLConnection; cachedResponse: NSCachedURLResponse): NSCachedURLResponse; message 'connection:willCacheResponse:';
-    function connection_willSendRequest_redirectResponse(connection: NSURLConnection; request: NSURLRequest; response: NSURLResponse): NSURLRequest; message 'connection:willSendRequest:redirectResponse:';
-    procedure connectionDidFinishLoading(connection: NSURLConnection); message 'connectionDidFinishLoading:';
-  end;
-
-type
-  NSURLDownloadDelegate = objccategory
-    procedure download_decideDestinationWithSuggestedFilename(download: NSURLDownload; filename: NSString); message 'download:decideDestinationWithSuggestedFilename:';
-    procedure download_didCancelAuthenticationChallenge(download: NSURLDownload; challenge: NSURLAuthenticationChallenge); message 'download:didCancelAuthenticationChallenge:';
-    procedure download_didCreateDestination(download: NSURLDownload; path: NSString); message 'download:didCreateDestination:';
-    procedure download_didFailWithError(download: NSURLDownload; error: NSError); message 'download:didFailWithError:';
-    procedure download_didReceiveAuthenticationChallenge(download: NSURLDownload; challenge: NSURLAuthenticationChallenge); message 'download:didReceiveAuthenticationChallenge:';
-    procedure download_didReceiveDataOfLength(download: NSURLDownload; length: culong); message 'download:didReceiveDataOfLength:';
-    procedure download_didReceiveResponse(download: NSURLDownload; response: NSURLResponse); message 'download:didReceiveResponse:';
-    function download_shouldDecodeSourceDataOfMIMEType(download: NSURLDownload; encodingType: NSString): Boolean; message 'download:shouldDecodeSourceDataOfMIMEType:';
-    procedure download_willResumeWithResponse_fromByte(download: NSURLDownload; response: NSURLResponse; startingByte: clonglong); message 'download:willResumeWithResponse:fromByte:';
-    function download_willSendRequest_redirectResponse(download: NSURLDownload; request_: NSURLRequest; redirectResponse: NSURLResponse): NSURLRequest; message 'download:willSendRequest:redirectResponse:';
-    procedure downloadDidBegin(download: NSURLDownload); message 'downloadDidBegin:';
-    procedure downloadDidFinish(download: NSURLDownload); message 'downloadDidFinish:';
-  end;
-
-type
-  NSWindowDelegate = objccategory
-    function window_shouldDragDocumentWithEvent_from_withPasteboard(window: NSWindow; event: NSEvent; dragImageLocation: NSPoint; pasteboard: NSPasteboard): Boolean; message 'window:shouldDragDocumentWithEvent:from:withPasteboard:';
-    function window_shouldPopUpDocumentPathMenu(window: NSWindow; menu_: NSMenu): Boolean; message 'window:shouldPopUpDocumentPathMenu:';
-    function window_willPositionSheet_usingRect(window: NSWindow; sheet: NSWindow; rect: NSRect): NSRect; message 'window:willPositionSheet:usingRect:';
-    function windowShouldClose(sender: id): Boolean; message 'windowShouldClose:';
-    function windowShouldZoom_toFrame(window: NSWindow; newFrame: NSRect): Boolean; message 'windowShouldZoom:toFrame:';
-    function windowWillResize_toSize(sender: NSWindow; frameSize: NSSize): NSSize; message 'windowWillResize:toSize:';
-    function windowWillReturnFieldEditor_toObject(sender: NSWindow; client: id): id; message 'windowWillReturnFieldEditor:toObject:';
-    function windowWillReturnUndoManager(window: NSWindow): NSUndoManager; message 'windowWillReturnUndoManager:';
-    function windowWillUseStandardFrame_defaultFrame(window: NSWindow; newFrame: NSRect): NSRect; message 'windowWillUseStandardFrame:defaultFrame:';
-  end;
-
-type
-  NSWindowNotifications = objccategory
-    procedure windowDidBecomeKey(notification: NSNotification); message 'windowDidBecomeKey:';
-    procedure windowDidBecomeMain(notification: NSNotification); message 'windowDidBecomeMain:';
-    procedure windowDidChangeScreen(notification: NSNotification); message 'windowDidChangeScreen:';
-    procedure windowDidChangeScreenProfile(notification: NSNotification); message 'windowDidChangeScreenProfile:';
-    procedure windowDidDeminiaturize(notification: NSNotification); message 'windowDidDeminiaturize:';
-    procedure windowDidEndSheet(notification: NSNotification); message 'windowDidEndSheet:';
-    procedure windowDidExpose(notification: NSNotification); message 'windowDidExpose:';
-    procedure windowDidMiniaturize(notification: NSNotification); message 'windowDidMiniaturize:';
-    procedure windowDidMove(notification: NSNotification); message 'windowDidMove:';
-    procedure windowDidResignKey(notification: NSNotification); message 'windowDidResignKey:';
-    procedure windowDidResignMain(notification: NSNotification); message 'windowDidResignMain:';
-    procedure windowDidResize(notification: NSNotification); message 'windowDidResize:';
-    procedure windowDidUpdate(notification: NSNotification); message 'windowDidUpdate:';
-    procedure windowWillBeginSheet(notification: NSNotification); message 'windowWillBeginSheet:';
-    procedure windowWillClose(notification: NSNotification); message 'windowWillClose:';
-    procedure windowWillMiniaturize(notification: NSNotification); message 'windowWillMiniaturize:';
-    procedure windowWillMove(notification: NSNotification); message 'windowWillMove:';
-  end;
-
-type
-  NSXMLParserDelegateEventAdditions = objccategory
-    procedure parser_didEndElement_namespaceURI_qualifiedName(parser: NSXMLParser; elementName: NSString; namespaceURI: NSString; qName: NSString); message 'parser:didEndElement:namespaceURI:qualifiedName:';
-    procedure parser_didEndMappingPrefix(parser: NSXMLParser; prefix: NSString); message 'parser:didEndMappingPrefix:';
-    procedure parser_didStartElement_namespaceURI_qualifiedName_attributes(parser: NSXMLParser; elementName: NSString; namespaceURI: NSString; qName: NSString; attributeDict: NSDictionary); message 'parser:didStartElement:namespaceURI:qualifiedName:attributes:';
-    procedure parser_didStartMappingPrefix_toURI(parser: NSXMLParser; prefix: NSString; namespaceURI: NSString); message 'parser:didStartMappingPrefix:toURI:';
-    procedure parser_foundAttributeDeclarationWithName_forElement_type_defaultValue(parser: NSXMLParser; attributeName: NSString; elementName: NSString; type_: NSString; defaultValue: NSString); message 'parser:foundAttributeDeclarationWithName:forElement:type:defaultValue:';
-    procedure parser_foundCDATA(parser: NSXMLParser; CDATABlock: NSData); message 'parser:foundCDATA:';
-    procedure parser_foundCharacters(parser: NSXMLParser; string_: NSString); message 'parser:foundCharacters:';
-    procedure parser_foundComment(parser: NSXMLParser; comment: NSString); message 'parser:foundComment:';
-    procedure parser_foundElementDeclarationWithName_model(parser: NSXMLParser; elementName: NSString; model: NSString); message 'parser:foundElementDeclarationWithName:model:';
-    procedure parser_foundExternalEntityDeclarationWithName_publicID_systemID(parser: NSXMLParser; name: NSString; publicID_: NSString; systemID_: NSString); message 'parser:foundExternalEntityDeclarationWithName:publicID:systemID:';
-    procedure parser_foundIgnorableWhitespace(parser: NSXMLParser; whitespaceString: NSString); message 'parser:foundIgnorableWhitespace:';
-    procedure parser_foundInternalEntityDeclarationWithName_value(parser: NSXMLParser; name: NSString; value: NSString); message 'parser:foundInternalEntityDeclarationWithName:value:';
-    procedure parser_foundNotationDeclarationWithName_publicID_systemID(parser: NSXMLParser; name: NSString; publicID_: NSString; systemID_: NSString); message 'parser:foundNotationDeclarationWithName:publicID:systemID:';
-    procedure parser_foundProcessingInstructionWithTarget_data(parser: NSXMLParser; target: NSString; data: NSString); message 'parser:foundProcessingInstructionWithTarget:data:';
-    procedure parser_foundUnparsedEntityDeclarationWithName_publicID_systemID_notationName(parser: NSXMLParser; name: NSString; publicID_: NSString; systemID_: NSString; notationName: NSString); message 'parser:foundUnparsedEntityDeclarationWithName:publicID:systemID:notationName:';
-    procedure parser_parseErrorOccurred(parser: NSXMLParser; parseError: NSError); message 'parser:parseErrorOccurred:';
-    function parser_resolveExternalEntityName_systemID(parser: NSXMLParser; name: NSString; systemID_: NSString): NSData; message 'parser:resolveExternalEntityName:systemID:';
-    procedure parser_validationErrorOccurred(parser: NSXMLParser; validationError: NSError); message 'parser:validationErrorOccurred:';
-    procedure parserDidEndDocument(parser: NSXMLParser); message 'parserDidEndDocument:';
-    procedure parserDidStartDocument(parser: NSXMLParser); message 'parserDidStartDocument:';
-  end;

+ 0 - 57
packages/cocoaint/src/UndefinedClasses.inc

@@ -1,57 +0,0 @@
-{MISSING CLASSES}
-NSTypesetter = NSObject;
-NSInvocation = id;
-NSPointerFunctions = id;
-NSManagedObjectContext = id;
-NSFetchRequest = id;
-CIColor = id;
-NSPredicateOperator = id;
-
-{"internal" classes that appeared in instance variables - declare as external?}
-NSURLAuthenticationChallengeInternal = id;
-NSURLCredentialInternal = id;
-NSURLCredentialStorageInternal = id;
-NSURLProtectionSpaceInternal = id;
-NSCachedURLResponseInternal = id;
-NSURLCacheInternal = id;
-NSURLConnectionInternal = id;
-NSURLProtocolInternal = id;
-NSURLRequestInternal = id;
-NSURLResponseInternal = id;
-NSHTTPURLResponseInternal = id;
-NSHTTPCookieInternal = id;
-NSHTTPCookieStorageInternal = id;
-NSURLDownloadInternal = id;
-
-{"auxiliary" instance variable classes - external?}
-_NSImageAuxiliary = id;
-_NSViewAuxiliary = id;
-NSWindowAuxiliary = id;
-NSSavePanelAuxiliary = id;
-
-{private instance variable classes - external?}
-NSNavView = id;
-NSMouseTracker = id;
-__NSOVRowEntry = id;
-NSStorage = id;
-NSRunStorage = id;
-NSSortedArray = id;
-NSTabWell = id;
-NSManagedObjectModel = id;
-
-{MISSING PROTOCOLS}
-NSCopyingProtocol = objcprotocol
-end; external;
-
-NSMutableCopyingProtocol = objcprotocol
-end; external;
-
-NSCodingProtocol = objcprotocol
-end; external;
-
-NSValidatedUserInterfaceItemProtocol = objcprotocol
-end; external;
-
-NSUserInterfaceValidationsProtocol = objcprotocol
-end; external;
-

+ 22 - 71
packages/cocoaint/src/UndefinedTypes.inc

@@ -1,26 +1,10 @@
 type
 type
-  __NSAppleEventManagerSuspension = Pointer;
- {$ifdef cpu64}
-  CGFloat = double;
- {$else}
-  CGFloat = single;
- {$endif}
-  UTF = UInt32;
-  NSPointerFunctionsOptions = UInt16;
-  URefCon = UInt32;
-  SRefCon = SInt32;
+  __NSAppleEventManagerSuspension = record end;
   IBAction = Pointer;
   IBAction = Pointer;
-  CIContext = id;
-  CIFilter = id;
-  CIImage = id;
-  CALayer = id;
-  QTMovie = Pointer;
-  GLint = integer;
-  GLenum = integer;
-  GLsizei = integer;
-  GLbitfield = integer;
   objc_protocol = protocol;
   objc_protocol = protocol;
-  idpointer = ^id;
+  idptr = ^id;
+  idptrptr = ^idptr;
+  SELptr = ^SEL;
 
 
 { Variable argument list - disabled for Pascal }
 { Variable argument list - disabled for Pascal }
 type
 type
@@ -34,12 +18,11 @@ type
  _CGLPBufferObject = Pointer;
  _CGLPBufferObject = Pointer;
  PATHSEGMENT = Pointer;		{from NSBezierPath.h what is this???}
  PATHSEGMENT = Pointer;		{from NSBezierPath.h what is this???}
  
  
-{ Pointer C-Types }
+{ from CoreData }
 type
 type
- NSIntegerPointer = pclong;
- NSUIntegerPointer = pculong;
- NSZonePointer = ^NSZone;
- NSTimeIntervalPointer = ^double;
+ NSAttributeType = NSUInteger;
+
+{ Pointer C-Types }
 
 
 { An array of objects }
 { An array of objects }
 type
 type
@@ -47,15 +30,21 @@ type
   NSObjectArrayOfObjectsPtr = ^NSObjectArrayOfObjects;
   NSObjectArrayOfObjectsPtr = ^NSObjectArrayOfObjects;
 
 
 { Cocoa types }
 { Cocoa types }
-const
-  NSIntegerMax = high(clong);
-  NSIntegerMin = low(clong);
-  NSUIntegerMax = high(culong);
-  NSNotFound = NSIntegerMax;
-
 const
 const
  UINT_MAX = high(culong);
  UINT_MAX = high(culong);
+// 7.18.2.4 Limits of integer types capable of holding object pointers
+ INTPTR_MIN = low(ptrint);
+ INTPTR_MAX = high(ptrint);
+ UINTPTR_MAX = high(ptruint);
+// 7.18.2.5 Limits of greatest-width integer types
+ INTMAX_MIN = low(int64);
+ INTMAX_MAX = high(int64);
+ UINTMAX_MAX = high(qword);
+// 7.18.3 "Other"
+ PTRDIFF_MIN = INTPTR_MIN;
+ PTRDIFF_MAX = INTPTR_MAX;
 
 
+{ from IOKit (not yet part of univint) }
 const
 const
  NX_TABLET_POINTER_UNKNOWN = 0;
  NX_TABLET_POINTER_UNKNOWN = 0;
  NX_TABLET_POINTER_PEN = 1;
  NX_TABLET_POINTER_PEN = 1;
@@ -65,6 +54,7 @@ const
  NX_SUBTYPE_DEFAULT = 0;
  NX_SUBTYPE_DEFAULT = 0;
  NX_SUBTYPE_TABLET_POINT = 1;
  NX_SUBTYPE_TABLET_POINT = 1;
  NX_SUBTYPE_TABLET_PROXIMITY = 2;
  NX_SUBTYPE_TABLET_PROXIMITY = 2;
+ NX_SUBTYPE_MOUSE_TOUCH = 3;
  
  
  NX_TABLET_BUTTON_PENTIPMASK = $0001;
  NX_TABLET_BUTTON_PENTIPMASK = $0001;
  NX_TABLET_BUTTON_PENLOWERSIDEMASK = $0002;
  NX_TABLET_BUTTON_PENLOWERSIDEMASK = $0002;
@@ -72,43 +62,4 @@ const
   
   
 { Parser hacks - these types should never exist }
 { Parser hacks - these types should never exist }
 type
 type
-  char_ = Pointer;
-  aeDesc_ = AEDesc;
-  CIContext_ = id;
-  CIImage_ = id;
-  NSRangePointerPointer = Pointer;
-  aeDesc_Pointer = Pointer;
-  __NSAppleEventManagerSuspensionPointer = Pointer;
-  
-{ Extra pointers for pass by reference arguments }
-{ NOTE: many of these were from records parsed that do not contain a pointer pair. Fix this later instead of declaring them here. }
-type
- NSPropertyListFormatPointer = Pointer;
- NSStringEncodingPointer = Pointer;
- AppleEventPointer = ^AppleEvent;
- NSGlyphPointer = Pointer;
- CIColorPointer = Pointer;
- NSDecimalPointer = Pointer;
- CIImagePointer = Pointer;
- NSTIFFCompressionPointer = Pointer;
- CIImage_Pointer = Pointer;
- CALayerPointer = Pointer;
- CIFilterPointer = Pointer;
- NSGlyphInscriptionPointer = Pointer;
- NSOpenGLPixelFormatAttributePointer = Pointer;
- GLintPointer = Pointer;
- NSManagedObjectContextPointer = Pointer;
- NSFetchRequestPointer = Pointer;
- NSFastEnumerationStatePointer = Pointer;
- 
-{ Parse bugs - these should have been parsed but were not due to errors }
-type
-  NSHashEnumerator = Pointer; {struct}
-  NSMapEnumerator = Pointer; {struct}
-  NSUncaughtExceptionHandler = Pointer; {function?}
- 
-{ NSPointerFunctions - missing from where?? }
-const
-  NSPointerFunctionsZeroingWeakMemory = 1 shl 0;
-  NSPointerFunctionsCopyIn = 1 shl 16;
-  NSPointerFunctionsObjectPointerPersonality = 2 shl 8;
+  __NSAppleEventManagerSuspensionPtr = Pointer;

+ 8 - 7
packages/cocoaint/src/WebKit.pas

@@ -1,6 +1,7 @@
 unit WebKit;
 unit WebKit;
 
 
-{$mode objfpc}
+{$mode delphi}
+{$modeswitch cvar}
 {$modeswitch objectivec1}
 {$modeswitch objectivec1}
 
 
 interface
 interface
@@ -11,11 +12,13 @@ uses
   ctypes, CocoaAll,
   ctypes, CocoaAll,
   CFBase, CFArray, CFBag , CFCharacterSet, CFData, CFDate, CFDictionary, CFNumber ,CFPropertyList, CFSet, CFString, CFStringEncodingExt, CFTimeZone, CFTree, CFURL, CFXMLNode, CFXMLParser, CFMachPort, CFMessagePort, CFRunLoop, CFSocket, CFBinaryHeap, CFBitVector, CFBundle, CFByteOrders, CFPlugIn, CFPreferences, CFURLAccess, CFUUID, CFLocale, CFStream, CFDateFormatter, CFNumberFormatter, CFCalendar, CFUserNotification, CFNotificationCenter, CFAttributedString,
   CFBase, CFArray, CFBag , CFCharacterSet, CFData, CFDate, CFDictionary, CFNumber ,CFPropertyList, CFSet, CFString, CFStringEncodingExt, CFTimeZone, CFTree, CFURL, CFXMLNode, CFXMLParser, CFMachPort, CFMessagePort, CFRunLoop, CFSocket, CFBinaryHeap, CFBitVector, CFBundle, CFByteOrders, CFPlugIn, CFPreferences, CFURLAccess, CFUUID, CFLocale, CFStream, CFDateFormatter, CFNumberFormatter, CFCalendar, CFUserNotification, CFNotificationCenter, CFAttributedString,
   CGBase, CGAffineTransforms, CGBitmapContext, CGColor, CGColorSpace, CGContext, CGDataConsumer, CGDataProvider, CGDirectDisplay, CGDirectPalette, CGDisplayConfiguration, CGDisplayFades, CGErrors, CGEvent, CGEventSource, CGEventTypes, CGFont, CGFunction, CGGLContext, CGGeometry, CGImage, CGLayer, CGPDFArray, CGPDFContentStream, CGPDFContext, CGPDFDictionary, CGPDFDocument, CGPDFObject, CGPDFOperatorTable, CGPDFPage, CGPDFScanner, CGPDFStream, CGPDFString, CGPSConverter, CGPath, CGPattern, CGRemoteOperation, CGSession, CGShading, CGWindowLevels,
   CGBase, CGAffineTransforms, CGBitmapContext, CGColor, CGColorSpace, CGContext, CGDataConsumer, CGDataProvider, CGDirectDisplay, CGDirectPalette, CGDisplayConfiguration, CGDisplayFades, CGErrors, CGEvent, CGEventSource, CGEventTypes, CGFont, CGFunction, CGGLContext, CGGeometry, CGImage, CGLayer, CGPDFArray, CGPDFContentStream, CGPDFContext, CGPDFDictionary, CGPDFDocument, CGPDFObject, CGPDFOperatorTable, CGPDFPage, CGPDFScanner, CGPDFStream, CGPDFString, CGPSConverter, CGPath, CGPattern, CGRemoteOperation, CGSession, CGShading, CGWindowLevels,
-  MacTypes;
+  MacTypes,
+  AnonClassDefinitionsWebkit;
   
   
 {$define INTERFACE}
 {$define INTERFACE}
 
 
 {$include webkit/UndefinedTypes.inc}
 {$include webkit/UndefinedTypes.inc}
+{$include webkit/AnonIncludeClassDefinitionsWebkit.inc}
 
 
 {$define HEADER}
 {$define HEADER}
 {$include webkit/WebKit.inc}
 {$include webkit/WebKit.inc}
@@ -34,16 +37,14 @@ type
 {$include webkit/WebKit.inc}
 {$include webkit/WebKit.inc}
 {$undef FORWARD}
 {$undef FORWARD}
 
 
-{$include webkit/UndefinedClasses.inc}
+{$define PROTOCOLS}
+{$include webkit/WebKit.inc}
+{$undef PROTOCOLS}
 
 
 {$define CLASSES}
 {$define CLASSES}
 {$include webkit/WebKit.inc}
 {$include webkit/WebKit.inc}
 {$undef CLASSES}
 {$undef CLASSES}
  
  
-{$define PROTOCOLS}
-{$include webkit/WebKit.inc}
-{$undef PROTOCOLS}
-
 {$define FUNCTIONS}
 {$define FUNCTIONS}
 {$include webkit/WebKit.inc}
 {$include webkit/WebKit.inc}
 {$undef FUNCTIONS}
 {$undef FUNCTIONS}

+ 0 - 116
packages/cocoaint/src/WebKitDelegatesAll.pas

@@ -1,116 +0,0 @@
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Sat Oct 3 15:45:10 ICT 2009 }
-
-unit WebKitDelegatesAll;
-interface
-
-{ Copy and paste these delegate methods into your real classes. }
-
-type
-  WebDownloadDelegate = objccategory (NSObject)
-    function downloadWindowForAuthenticationSheet(download: WebDownload): NSWindow; message 'downloadWindowForAuthenticationSheet:';
-  end;
-
-type
-  WebFrameLoadDelegate = objccategory (NSObject)
-    procedure webView_didCancelClientRedirectForFrame(sender: WebView; frame: WebFrame); message 'webView:didCancelClientRedirectForFrame:';
-    procedure webView_didChangeLocationWithinPageForFrame(sender: WebView; frame: WebFrame); message 'webView:didChangeLocationWithinPageForFrame:';
-    procedure webView_didClearWindowObject_forFrame(webView_: WebView; windowObject_: WebScriptObject; frame: WebFrame); message 'webView:didClearWindowObject:forFrame:';
-    procedure webView_didCommitLoadForFrame(sender: WebView; frame: WebFrame); message 'webView:didCommitLoadForFrame:';
-    procedure webView_didFailLoadWithError_forFrame(sender: WebView; error: NSError; frame: WebFrame); message 'webView:didFailLoadWithError:forFrame:';
-    procedure webView_didFailProvisionalLoadWithError_forFrame(sender: WebView; error: NSError; frame: WebFrame); message 'webView:didFailProvisionalLoadWithError:forFrame:';
-    procedure webView_didFinishLoadForFrame(sender: WebView; frame: WebFrame); message 'webView:didFinishLoadForFrame:';
-    procedure webView_didReceiveIcon_forFrame(sender: WebView; image: NSImagePointer; frame: WebFrame); message 'webView:didReceiveIcon:forFrame:';
-    procedure webView_didReceiveServerRedirectForProvisionalLoadForFrame(sender: WebView; frame: WebFrame); message 'webView:didReceiveServerRedirectForProvisionalLoadForFrame:';
-    procedure webView_didReceiveTitle_forFrame(sender: WebView; title: NSString; frame: WebFrame); message 'webView:didReceiveTitle:forFrame:';
-    procedure webView_didStartProvisionalLoadForFrame(sender: WebView; frame: WebFrame); message 'webView:didStartProvisionalLoadForFrame:';
-    procedure webView_willCloseFrame(sender: WebView; frame: WebFrame); message 'webView:willCloseFrame:';
-    procedure webView_willPerformClientRedirectToURL_delay_fireDate_forFrame(sender: WebView; URL: NSURL; seconds: NSTimeInterval; date: NSDate; frame: WebFrame); message 'webView:willPerformClientRedirectToURL:delay:fireDate:forFrame:';
-    procedure webView_windowScriptObjectAvailable(webView_: WebView; windowScriptObject: WebScriptObject); message 'webView:windowScriptObjectAvailable:';
-  end;
-
-type
-  WebPolicyDelegate = objccategory (NSObject)
-    procedure webView_decidePolicyForMIMEType_request_frame_decisionListener; message 'webView:decidePolicyForMIMEType:request:frame:decisionListener:';
-    procedure webView_decidePolicyForNavigationAction_request_frame_decisionListener; message 'webView:decidePolicyForNavigationAction:request:frame:decisionListener:';
-    procedure webView_decidePolicyForNewWindowAction_request_newFrameName_decisionListener; message 'webView:decidePolicyForNewWindowAction:request:newFrameName:decisionListener:';
-    procedure webView_unableToImplementPolicyWithError_frame(webView: WebView; error: NSError; frame: WebFrame); message 'webView:unableToImplementPolicyWithError:frame:';
-  end;
-
-type
-  WebResourceLoadDelegate = objccategory (NSObject)
-    function webView_identifierForInitialRequest_fromDataSource(sender: WebView; request: NSURLRequest; dataSource: WebDataSource): id; message 'webView:identifierForInitialRequest:fromDataSource:';
-    procedure webView_plugInFailedWithError_dataSource(sender: WebView; error: NSError; dataSource: WebDataSource); message 'webView:plugInFailedWithError:dataSource:';
-    procedure webView_resource_didCancelAuthenticationChallenge_fromDataSource(sender: WebView; identifier: id; challenge: NSURLAuthenticationChallenge; dataSource: WebDataSource); message 'webView:resource:didCancelAuthenticationChallenge:fromDataSource:';
-    procedure webView_resource_didFailLoadingWithError_fromDataSource(sender: WebView; identifier: id; error: NSError; dataSource: WebDataSource); message 'webView:resource:didFailLoadingWithError:fromDataSource:';
-    procedure webView_resource_didFinishLoadingFromDataSource(sender: WebView; identifier: id; dataSource: WebDataSource); message 'webView:resource:didFinishLoadingFromDataSource:';
-    procedure webView_resource_didReceiveAuthenticationChallenge_fromDataSource(sender: WebView; identifier: id; challenge: NSURLAuthenticationChallenge; dataSource: WebDataSource); message 'webView:resource:didReceiveAuthenticationChallenge:fromDataSource:';
-    procedure webView_resource_didReceiveContentLength_fromDataSource(sender: WebView; identifier: id; length: WebNSInteger; dataSource: WebDataSource); message 'webView:resource:didReceiveContentLength:fromDataSource:';
-    procedure webView_resource_didReceiveResponse_fromDataSource(sender: WebView; identifier: id; response: NSURLResponse; dataSource: WebDataSource); message 'webView:resource:didReceiveResponse:fromDataSource:';
-    function webView_resource_willSendRequest_redirectResponse_fromDataSource(sender: WebView; identifier: id; request: NSURLRequest; redirectResponse: NSURLResponse; dataSource: WebDataSource): NSURLRequest; message 'webView:resource:willSendRequest:redirectResponse:fromDataSource:';
-  end;
-
-type
-  WebUIDelegate = objccategory (NSObject)
-    function webView_contextMenuItemsForElement_defaultMenuItems(sender: WebView; element: NSDictionary; defaultMenuItems: NSArray): NSArray; message 'webView:contextMenuItemsForElement:defaultMenuItems:';
-    function webView_createWebViewModalDialogWithRequest(sender: WebView; request: NSURLRequest): WebView; message 'webView:createWebViewModalDialogWithRequest:';
-    function webView_createWebViewWithRequest(sender: WebView; request: NSURLRequest): WebView; message 'webView:createWebViewWithRequest:';
-    function webView_dragDestinationActionMaskForDraggingInfo(webView: WebView; draggingInfo: id): WebNSUInteger; message 'webView:dragDestinationActionMaskForDraggingInfo:';
-    function webView_dragSourceActionMaskForPoint(webView: WebView; point: NSPoint): WebNSUInteger; message 'webView:dragSourceActionMaskForPoint:';
-    procedure webView_drawFooterInRect(sender: WebView; rect: NSRect); message 'webView:drawFooterInRect:';
-    procedure webView_drawHeaderInRect(sender: WebView; rect: NSRect); message 'webView:drawHeaderInRect:';
-    procedure webView_makeFirstResponder(sender: WebView; responder: NSResponderPointer); message 'webView:makeFirstResponder:';
-    procedure webView_mouseDidMoveOverElement_modifierFlags(sender: WebView; elementInformation: NSDictionary; modifierFlags: WebNSUInteger); message 'webView:mouseDidMoveOverElement:modifierFlags:';
-    procedure webView_printFrameView(sender: WebView; frameView: WebFrameView); message 'webView:printFrameView:';
-    function webView_runBeforeUnloadConfirmPanelWithMessage_initiatedByFrame(sender: WebView; message: NSString; frame: WebFrame): Boolean; message 'webView:runBeforeUnloadConfirmPanelWithMessage:initiatedByFrame:';
-    procedure webView_runJavaScriptAlertPanelWithMessage(sender: WebView; message: NSString); message 'webView:runJavaScriptAlertPanelWithMessage:';
-    procedure webView_runJavaScriptAlertPanelWithMessage_initiatedByFrame(sender: WebView; message: NSString; frame: WebFrame); message 'webView:runJavaScriptAlertPanelWithMessage:initiatedByFrame:';
-    function webView_runJavaScriptConfirmPanelWithMessage(sender: WebView; message: NSString): Boolean; message 'webView:runJavaScriptConfirmPanelWithMessage:';
-    function webView_runJavaScriptConfirmPanelWithMessage_initiatedByFrame(sender: WebView; message: NSString; frame: WebFrame): Boolean; message 'webView:runJavaScriptConfirmPanelWithMessage:initiatedByFrame:';
-    function webView_runJavaScriptTextInputPanelWithPrompt_defaultText(sender: WebView; prompt: NSString; defaultText: NSString): NSString; message 'webView:runJavaScriptTextInputPanelWithPrompt:defaultText:';
-    function webView_runJavaScriptTextInputPanelWithPrompt_defaultText_initiatedByFrame(sender: WebView; prompt: NSString; defaultText: NSString; frame: WebFrame): NSString; message 'webView:runJavaScriptTextInputPanelWithPrompt:defaultText:initiatedByFrame:';
-    procedure webView_runOpenPanelForFileButtonWithResultListener(sender: WebView; resultListener: id); message 'webView:runOpenPanelForFileButtonWithResultListener:';
-    procedure webView_setContentRect(sender: WebView; frame: NSRect); message 'webView:setContentRect:';
-    procedure webView_setFrame(sender: WebView; frame: NSRect); message 'webView:setFrame:';
-    procedure webView_setResizable(sender: WebView; resizable: Boolean); message 'webView:setResizable:';
-    procedure webView_setStatusBarVisible(sender: WebView; visible: Boolean); message 'webView:setStatusBarVisible:';
-    procedure webView_setStatusText(sender: WebView; text: NSString); message 'webView:setStatusText:';
-    procedure webView_setToolbarsVisible(sender: WebView; visible: Boolean); message 'webView:setToolbarsVisible:';
-    function webView_shouldPerformAction_fromSender(webView: WebView; action: SEL; sender: id): Boolean; message 'webView:shouldPerformAction:fromSender:';
-    function webView_validateUserInterfaceItem_defaultValidation(webView: WebView; item: id; defaultValidation: Boolean): Boolean; message 'webView:validateUserInterfaceItem:defaultValidation:';
-    procedure webView_willPerformDragDestinationAction_forDraggingInfo(webView: WebView; action: WebDragDestinationAction; draggingInfo: id); message 'webView:willPerformDragDestinationAction:forDraggingInfo:';
-    procedure webView_willPerformDragSourceAction_fromPoint_withPasteboard(webView: WebView; action: WebDragSourceAction; point: NSPoint; pasteboard: NSPasteboardPointer); message 'webView:willPerformDragSourceAction:fromPoint:withPasteboard:';
-    function webViewAreToolbarsVisible(sender: WebView): Boolean; message 'webViewAreToolbarsVisible:';
-    procedure webViewClose(sender: WebView); message 'webViewClose:';
-    function webViewContentRect(sender: WebView): NSRect; message 'webViewContentRect:';
-    function webViewFirstResponder(sender: WebView): NSResponder; message 'webViewFirstResponder:';
-    procedure webViewFocus(sender: WebView); message 'webViewFocus:';
-    function webViewFooterHeight(sender: WebView): single; message 'webViewFooterHeight:';
-    function webViewFrame(sender: WebView): NSRect; message 'webViewFrame:';
-    function webViewHeaderHeight(sender: WebView): single; message 'webViewHeaderHeight:';
-    function webViewIsResizable(sender: WebView): Boolean; message 'webViewIsResizable:';
-    function webViewIsStatusBarVisible(sender: WebView): Boolean; message 'webViewIsStatusBarVisible:';
-    procedure webViewRunModal(sender: WebView); message 'webViewRunModal:';
-    procedure webViewShow(sender: WebView); message 'webViewShow:';
-    function webViewStatusText(sender: WebView): NSString; message 'webViewStatusText:';
-    procedure webViewUnfocus(sender: WebView); message 'webViewUnfocus:';
-  end;
-
-type
-  WebViewEditingDelegate = objccategory (NSObject)
-    function undoManagerForWebView(webView: WebView): NSUndoManager; message 'undoManagerForWebView:';
-    function webView_doCommandBySelector(webView: WebView; selector: SEL): Boolean; message 'webView:doCommandBySelector:';
-    function webView_shouldApplyStyle_toElementsInDOMRange(webView: WebView; style: DOMCSSStyleDeclaration; range: DOMRange): Boolean; message 'webView:shouldApplyStyle:toElementsInDOMRange:';
-    function webView_shouldBeginEditingInDOMRange(webView: WebView; range: DOMRange): Boolean; message 'webView:shouldBeginEditingInDOMRange:';
-    function webView_shouldChangeSelectedDOMRange_toDOMRange_affinity_stillSelecting(webView: WebView; currentRange: DOMRange; proposedRange: DOMRange; selectionAffinity: NSSelectionAffinity; flag: Boolean): Boolean; message 'webView:shouldChangeSelectedDOMRange:toDOMRange:affinity:stillSelecting:';
-    function webView_shouldChangeTypingStyle_toStyle(webView: WebView; currentStyle: DOMCSSStyleDeclaration; proposedStyle: DOMCSSStyleDeclaration): Boolean; message 'webView:shouldChangeTypingStyle:toStyle:';
-    function webView_shouldDeleteDOMRange(webView: WebView; range: DOMRange): Boolean; message 'webView:shouldDeleteDOMRange:';
-    function webView_shouldEndEditingInDOMRange(webView: WebView; range: DOMRange): Boolean; message 'webView:shouldEndEditingInDOMRange:';
-    function webView_shouldInsertNode_replacingDOMRange_givenAction(webView: WebView; node: DOMNode; range: DOMRange; action: WebViewInsertAction): Boolean; message 'webView:shouldInsertNode:replacingDOMRange:givenAction:';
-    function webView_shouldInsertText_replacingDOMRange_givenAction(webView: WebView; text: NSString; range: DOMRange; action: WebViewInsertAction): Boolean; message 'webView:shouldInsertText:replacingDOMRange:givenAction:';
-    procedure webViewDidBeginEditing(notification: NSNotification); message 'webViewDidBeginEditing:';
-    procedure webViewDidChange(notification: NSNotification); message 'webViewDidChange:';
-    procedure webViewDidChangeSelection(notification: NSNotification); message 'webViewDidChangeSelection:';
-    procedure webViewDidChangeTypingStyle(notification: NSNotification); message 'webViewDidChangeTypingStyle:';
-    procedure webViewDidEndEditing(notification: NSNotification); message 'webViewDidEndEditing:';
-  end;
-

+ 16 - 15
packages/cocoaint/src/appkit/AppKit.inc

@@ -1,18 +1,8 @@
-{
-	AppKit.h
-	Application Kit
-	Copyright (c) 1994-2007, Apple Inc.
-	All rights reserved.
 
 
-	This file is included by all AppKit application source files for easy building.  Using this file is preferred over importing individual files because it will use a precompiled version.
-}
-
-
-{NOTE: These headers were added for compatibility}
+{ Added for compatibility }
 {$include CIColor.inc}
 {$include CIColor.inc}
-{include NSValidatedUserInterfaceItem.inc}	// ??? NSValidatedUserInterfaceItem.h is not located in the current version in AppKit.framework.
 
 
-{From AppKit.h}
+{ === From OS 10.5 === }
 {$include NSResponder.inc} 
 {$include NSResponder.inc} 
 {$include NSGraphicsContext.inc} 
 {$include NSGraphicsContext.inc} 
 {$include NSAccessibility.inc} 
 {$include NSAccessibility.inc} 
@@ -30,7 +20,6 @@
 {$include NSFontManager.inc} 
 {$include NSFontManager.inc} 
 {$include NSFormCell.inc} 
 {$include NSFormCell.inc} 
 {$include NSMenu.inc} 
 {$include NSMenu.inc} 
-{$include NSMenuItem.inc} 
 {$include NSColor.inc} 
 {$include NSColor.inc} 
 {$include NSColorSpace.inc} 
 {$include NSColorSpace.inc} 
 {$include NSBrowserCell.inc} 
 {$include NSBrowserCell.inc} 
@@ -72,6 +61,7 @@
 {$include NSTokenFieldCell.inc} 
 {$include NSTokenFieldCell.inc} 
 {$include NSTrackingArea.inc} 
 {$include NSTrackingArea.inc} 
 {$include NSView.inc} 
 {$include NSView.inc} 
+{$include NSMenuItem.inc} 
 {$include NSScrollView.inc} 
 {$include NSScrollView.inc} 
 {$include NSSplitView.inc} 
 {$include NSSplitView.inc} 
 {$include NSClipView.inc} 
 {$include NSClipView.inc} 
@@ -120,7 +110,6 @@
 {$include NSRulerView.inc} 
 {$include NSRulerView.inc} 
 {$include NSSecureTextField.inc} 
 {$include NSSecureTextField.inc} 
 {$include NSInterfaceStyle.inc} 
 {$include NSInterfaceStyle.inc} 
-{------------> NOT FOUND!}{include NSNibDeclarations.inc} 
 {$include NSProgressIndicator.inc} 
 {$include NSProgressIndicator.inc} 
 {$include NSTabView.inc} 
 {$include NSTabView.inc} 
 {$include NSTabViewItem.inc} 
 {$include NSTabViewItem.inc} 
@@ -151,6 +140,7 @@
 {$include NSStepperCell.inc} 
 {$include NSStepperCell.inc} 
 {$include NSGlyphInfo.inc} 
 {$include NSGlyphInfo.inc} 
 {$include NSShadow.inc} 
 {$include NSShadow.inc} 
+{$include NSTypesetter.inc}
 {$include NSATSTypesetter.inc} 
 {$include NSATSTypesetter.inc} 
 {$include NSGlyphGenerator.inc} 
 {$include NSGlyphGenerator.inc} 
 {$include NSSearchField.inc} 
 {$include NSSearchField.inc} 
@@ -173,9 +163,20 @@
 {$include NSPersistentDocument.inc} 
 {$include NSPersistentDocument.inc} 
 {$include NSRuleEditor.inc} 
 {$include NSRuleEditor.inc} 
 {$include NSPredicateEditor.inc} 
 {$include NSPredicateEditor.inc} 
-{include NSPredicateEditorRowTemplate.inc} 	// ??? this is missing from I don't know where
+{$include NSPredicateEditorRowTemplate.inc}
 {$include NSPathCell.inc} 
 {$include NSPathCell.inc} 
 {$include NSPathControl.inc} 
 {$include NSPathControl.inc} 
 {$include NSPathComponentCell.inc} 
 {$include NSPathComponentCell.inc} 
 {$include NSCollectionView.inc} 
 {$include NSCollectionView.inc} 
 {$include NSTextInputClient.inc} 
 {$include NSTextInputClient.inc} 
+
+{ === From OS 10.6 === }
+{include NSOpenGLLayer.inc}
+{$include NSPasteboardItem.inc}
+{$include NSRunningApplication.inc}
+{$include NSTextInputContext.inc}
+{$include NSTouch.inc}
+{$include NSUserInterfaceItemSearching.inc}
+
+{ === Added for 10.6 parse but from 10.5 === }
+{$include NSUserInterfaceValidation.inc}

+ 25 - 16
packages/cocoaint/src/appkit/NSATSTypesetter.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSATSTypesetter.h }
 { Parsed from Appkit.framework NSATSTypesetter.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSATSTypesetter = objcclass;
   NSATSTypesetter = objcclass;
   NSATSTypesetterPointer = ^NSATSTypesetter;
   NSATSTypesetterPointer = ^NSATSTypesetter;
+  NSATSTypesetterPtr = NSATSTypesetterPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -50,21 +51,25 @@
     _layoutManager: NSLayoutManager;
     _layoutManager: NSLayoutManager;
     _textContainers: NSArray;
     _textContainers: NSArray;
     _currentTextContainer: NSTextContainer;
     _currentTextContainer: NSTextContainer;
-    _currentTextContainerIndex: NSUInteger;
-    _currentTextContainerSize: NSSize;
+    currentTextContainerIndex: NSUInteger;
+    currentTextContainerSize: NSSize;
     _currentParagraphStyle: NSParagraphStyle;
     _currentParagraphStyle: NSParagraphStyle;
         _atsReserved: array[0..7] of Pointer;
         _atsReserved: array[0..7] of Pointer;
-    __private: id;
+    _private: id;
     
     
   public
   public
     class function alloc: NSATSTypesetter; message 'alloc';
     class function alloc: NSATSTypesetter; message 'alloc';
 
 
     class function sharedTypesetter: id; message 'sharedTypesetter';
     class function sharedTypesetter: id; message 'sharedTypesetter';
+  end; external;
 
 
-    { Category: NSPantherCompatibility }
-    function lineFragmentRectForProposedRect_remainingRect(proposedRect: NSRect; remainingRect: NSRectPointer): NSRect; message 'lineFragmentRectForProposedRect:remainingRect:';
+{ NSPantherCompatibilityCategory }
+  NSPantherCompatibilityCategory = objccategory(NSATSTypesetter)
+    function lineFragmentRectForProposedRect_remainingRect(proposedRect: NSRect; remainingRect: NSRectPointer): NSRect; message 'lineFragmentRectForProposedRect:remainingRect:'; deprecated 'in Mac OS X 10.4 and later';
+  end; external;
 
 
-    { Category: NSPrimitiveInterface }
+{ NSPrimitiveInterfaceCategory }
+  NSPrimitiveInterfaceCategory = objccategory(NSATSTypesetter)
     function usesFontLeading: Boolean; message 'usesFontLeading';
     function usesFontLeading: Boolean; message 'usesFontLeading';
     procedure setUsesFontLeading(flag: Boolean); message 'setUsesFontLeading:';
     procedure setUsesFontLeading(flag: Boolean); message 'setUsesFontLeading:';
     function typesetterBehavior: NSTypesetterBehavior; message 'typesetterBehavior';
     function typesetterBehavior: NSTypesetterBehavior; message 'typesetterBehavior';
@@ -82,37 +87,41 @@
     procedure setParagraphGlyphRange_separatorGlyphRange(paragraphRange: NSRange; paragraphSeparatorRange: NSRange); message 'setParagraphGlyphRange:separatorGlyphRange:';
     procedure setParagraphGlyphRange_separatorGlyphRange(paragraphRange: NSRange; paragraphSeparatorRange: NSRange); message 'setParagraphGlyphRange:separatorGlyphRange:';
     function paragraphGlyphRange: NSRange; message 'paragraphGlyphRange';
     function paragraphGlyphRange: NSRange; message 'paragraphGlyphRange';
     function paragraphSeparatorGlyphRange: NSRange; message 'paragraphSeparatorGlyphRange';
     function paragraphSeparatorGlyphRange: NSRange; message 'paragraphSeparatorGlyphRange';
-    function layoutParagraphAtPoint(lineFragmentOrigin: NSPointPointer): NSUInteger; message 'layoutParagraphAtPoint:';
+    function layoutParagraphAtPoint(lineFragmentOrigin: NSPointPtr): NSUInteger; message 'layoutParagraphAtPoint:';
     function lineSpacingAfterGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: NSUInteger; rect: NSRect): CGFloat; message 'lineSpacingAfterGlyphAtIndex:withProposedLineFragmentRect:';
     function lineSpacingAfterGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: NSUInteger; rect: NSRect): CGFloat; message 'lineSpacingAfterGlyphAtIndex:withProposedLineFragmentRect:';
     function paragraphSpacingBeforeGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: NSUInteger; rect: NSRect): CGFloat; message 'paragraphSpacingBeforeGlyphAtIndex:withProposedLineFragmentRect:';
     function paragraphSpacingBeforeGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: NSUInteger; rect: NSRect): CGFloat; message 'paragraphSpacingBeforeGlyphAtIndex:withProposedLineFragmentRect:';
     function paragraphSpacingAfterGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: NSUInteger; rect: NSRect): CGFloat; message 'paragraphSpacingAfterGlyphAtIndex:withProposedLineFragmentRect:';
     function paragraphSpacingAfterGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: NSUInteger; rect: NSRect): CGFloat; message 'paragraphSpacingAfterGlyphAtIndex:withProposedLineFragmentRect:';
     function layoutManager: NSLayoutManager; message 'layoutManager';
     function layoutManager: NSLayoutManager; message 'layoutManager';
     function currentTextContainer: NSTextContainer; message 'currentTextContainer';
     function currentTextContainer: NSTextContainer; message 'currentTextContainer';
     procedure setHardInvalidation_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setHardInvalidation:forGlyphRange:';
     procedure setHardInvalidation_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setHardInvalidation:forGlyphRange:';
-    procedure getLineFragmentRect_usedRect_forParagraphSeparatorGlyphRange_atProposedOrigin(lineFragmentRect: NSRectPointer; lineFragmentUsedRect: NSRectPointer; paragraphSeparatorGlyphRange_: NSRange; lineOrigin: NSPoint); message 'getLineFragmentRect:usedRect:forParagraphSeparatorGlyphRange:atProposedOrigin:';
+    procedure getLineFragmentRect_usedRect_forParagraphSeparatorGlyphRange_atProposedOrigin(lineFragmentRect: NSRectPtr; lineFragmentUsedRect: NSRectPtr; paragraphSeparatorGlyphRange_: NSRange; lineOrigin: NSPoint); message 'getLineFragmentRect:usedRect:forParagraphSeparatorGlyphRange:atProposedOrigin:';
+  end; external;
 
 
-    { Category: NSLayoutPhaseInterface }
-    procedure willSetLineFragmentRect_forGlyphRange_usedRect_baselineOffset(lineRect: NSRectPointer; glyphRange: NSRange; usedRect: NSRectPointer; baselineOffset: psingle); message 'willSetLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
+{ NSLayoutPhaseInterface_NSATSTypesetterCategory }
+  NSLayoutPhaseInterface_NSATSTypesetterCategory = objccategory(NSATSTypesetter)
+    procedure willSetLineFragmentRect_forGlyphRange_usedRect_baselineOffset(lineRect: NSRectPtr; glyphRange: NSRange; usedRect: NSRectPtr; baselineOffset: CGFloatPtr); message 'willSetLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
     function shouldBreakLineByWordBeforeCharacterAtIndex(charIndex: NSUInteger): Boolean; message 'shouldBreakLineByWordBeforeCharacterAtIndex:';
     function shouldBreakLineByWordBeforeCharacterAtIndex(charIndex: NSUInteger): Boolean; message 'shouldBreakLineByWordBeforeCharacterAtIndex:';
     function shouldBreakLineByHyphenatingBeforeCharacterAtIndex(charIndex: NSUInteger): Boolean; message 'shouldBreakLineByHyphenatingBeforeCharacterAtIndex:';
     function shouldBreakLineByHyphenatingBeforeCharacterAtIndex(charIndex: NSUInteger): Boolean; message 'shouldBreakLineByHyphenatingBeforeCharacterAtIndex:';
     function hyphenationFactorForGlyphAtIndex(glyphIndex: NSUInteger): single; message 'hyphenationFactorForGlyphAtIndex:';
     function hyphenationFactorForGlyphAtIndex(glyphIndex: NSUInteger): single; message 'hyphenationFactorForGlyphAtIndex:';
     function hyphenCharacterForGlyphAtIndex(glyphIndex: NSUInteger): UTF32Char; message 'hyphenCharacterForGlyphAtIndex:';
     function hyphenCharacterForGlyphAtIndex(glyphIndex: NSUInteger): UTF32Char; message 'hyphenCharacterForGlyphAtIndex:';
     function boundingBoxForControlGlyphAtIndex_forTextContainer_proposedLineFragment_glyphPosition_characterIndex(glyphIndex: NSUInteger; textContainer: NSTextContainer; proposedRect: NSRect; glyphPosition: NSPoint; charIndex: NSUInteger): NSRect; message 'boundingBoxForControlGlyphAtIndex:forTextContainer:proposedLineFragment:glyphPosition:characterIndex:';
     function boundingBoxForControlGlyphAtIndex_forTextContainer_proposedLineFragment_glyphPosition_characterIndex(glyphIndex: NSUInteger; textContainer: NSTextContainer; proposedRect: NSRect; glyphPosition: NSPoint; charIndex: NSUInteger): NSRect; message 'boundingBoxForControlGlyphAtIndex:forTextContainer:proposedLineFragment:glyphPosition:characterIndex:';
+  end; external name 'NSLayoutPhaseInterface';
 
 
-    { Category: NSGlyphStorageInterface }
+{ NSGlyphStorageInterface_NSATSTypesetterCategory }
+  NSGlyphStorageInterface_NSATSTypesetterCategory = objccategory(NSATSTypesetter)
     function characterRangeForGlyphRange_actualGlyphRange(glyphRange: NSRange; actualGlyphRange: NSRangePointer): NSRange; message 'characterRangeForGlyphRange:actualGlyphRange:';
     function characterRangeForGlyphRange_actualGlyphRange(glyphRange: NSRange; actualGlyphRange: NSRangePointer): NSRange; message 'characterRangeForGlyphRange:actualGlyphRange:';
     function glyphRangeForCharacterRange_actualCharacterRange(charRange: NSRange; actualCharRange: NSRangePointer): NSRange; message 'glyphRangeForCharacterRange:actualCharacterRange:';
     function glyphRangeForCharacterRange_actualCharacterRange(charRange: NSRange; actualCharRange: NSRangePointer): NSRange; message 'glyphRangeForCharacterRange:actualCharacterRange:';
-    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphsRange: NSRange; glyphBuffer: NSGlyphPointer; charIndexBuffer: NSUIntegerPointer; inscribeBuffer: NSGlyphInscriptionPointer; elasticBuffer: pboolean): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphsRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pboolean): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
     procedure setLineFragmentRect_forGlyphRange_usedRect_baselineOffset(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect; baselineOffset: CGFloat); message 'setLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
     procedure setLineFragmentRect_forGlyphRange_usedRect_baselineOffset(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect; baselineOffset: CGFloat); message 'setLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
-    procedure substituteGlyphsInRange_withGlyphs(glyphRange: NSRange; glyphs: NSGlyphPointer); message 'substituteGlyphsInRange:withGlyphs:';
+    procedure substituteGlyphsInRange_withGlyphs(glyphRange: NSRange; glyphs: NSGlyphPtr); message 'substituteGlyphsInRange:withGlyphs:';
     procedure insertGlyph_atGlyphIndex_characterIndex(glyph: NSGlyph; glyphIndex: NSUInteger; characterIndex: NSUInteger); message 'insertGlyph:atGlyphIndex:characterIndex:';
     procedure insertGlyph_atGlyphIndex_characterIndex(glyph: NSGlyph; glyphIndex: NSUInteger; characterIndex: NSUInteger); message 'insertGlyph:atGlyphIndex:characterIndex:';
     procedure deleteGlyphsInRange(glyphRange: NSRange); message 'deleteGlyphsInRange:';
     procedure deleteGlyphsInRange(glyphRange: NSRange); message 'deleteGlyphsInRange:';
     procedure setNotShownAttribute_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setNotShownAttribute:forGlyphRange:';
     procedure setNotShownAttribute_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setNotShownAttribute:forGlyphRange:';
     procedure setDrawsOutsideLineFragment_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setDrawsOutsideLineFragment:forGlyphRange:';
     procedure setDrawsOutsideLineFragment_forGlyphRange(flag: Boolean; glyphRange: NSRange); message 'setDrawsOutsideLineFragment:forGlyphRange:';
-    procedure setLocation_withAdvancements_forStartOfGlyphRange(location: NSPoint; advancements: psingle; glyphRange: NSRange); message 'setLocation:withAdvancements:forStartOfGlyphRange:';
+    procedure setLocation_withAdvancements_forStartOfGlyphRange(location: NSPoint; advancements: CGFloatPtr; glyphRange: NSRange); message 'setLocation:withAdvancements:forStartOfGlyphRange:';
     procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
     procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
     procedure setBidiLevels_forGlyphRange(levels: pbyte; glyphRange: NSRange); message 'setBidiLevels:forGlyphRange:';
     procedure setBidiLevels_forGlyphRange(levels: pbyte; glyphRange: NSRange); message 'setBidiLevels:forGlyphRange:';
-  end; external;
+  end; external name 'NSGlyphStorageInterface';
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 329 - 195
packages/cocoaint/src/appkit/NSAccessibility.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSAccessibility.h }
 { Parsed from Appkit.framework NSAccessibility.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -21,15 +21,15 @@
 {$define NSACCESSIBILITY_PAS_F}
 {$define NSACCESSIBILITY_PAS_F}
 
 
 { Functions }
 { Functions }
-function NSAccessibilityRoleDescription(rolePointer: NSString; subrolePointer: NSString): NSString; cdecl; external name 'NSAccessibilityRoleDescription';
-function NSAccessibilityRoleDescriptionForUIElement(element: id): NSString; cdecl; external name 'NSAccessibilityRoleDescriptionForUIElement';
-function NSAccessibilityActionDescription(actionPointer: NSString): NSString; cdecl; external name 'NSAccessibilityActionDescription';
-procedure NSAccessibilityRaiseBadArgumentException(element: id; attributePointer: NSString; value: id); cdecl; external name 'NSAccessibilityRaiseBadArgumentException';
-function NSAccessibilityUnignoredAncestor(element: id): id; cdecl; external name 'NSAccessibilityUnignoredAncestor';
-function NSAccessibilityUnignoredDescendant(element: id): id; cdecl; external name 'NSAccessibilityUnignoredDescendant';
-function NSAccessibilityUnignoredChildren(originalChildrenPointer: NSArray): NSArray; cdecl; external name 'NSAccessibilityUnignoredChildren';
-function NSAccessibilityUnignoredChildrenForOnlyChild(originalChild: id): NSArray; cdecl; external name 'NSAccessibilityUnignoredChildrenForOnlyChild';
-procedure NSAccessibilityPostNotification(element: id; notificationPointer: NSString); cdecl; external name 'NSAccessibilityPostNotification';
+function NSAccessibilityRoleDescription(role: NSString; subrole: NSString): NSString; cdecl; external;
+function NSAccessibilityRoleDescriptionForUIElement(element: id): NSString; cdecl; external;
+function NSAccessibilityActionDescription(action: NSString): NSString; cdecl; external;
+procedure NSAccessibilityRaiseBadArgumentException(element: id; attribute: NSString; value: id); cdecl; external;
+function NSAccessibilityUnignoredAncestor(element: id): id; cdecl; external;
+function NSAccessibilityUnignoredDescendant(element: id): id; cdecl; external;
+function NSAccessibilityUnignoredChildren(originalChildren: NSArray): NSArray; cdecl; external;
+function NSAccessibilityUnignoredChildrenForOnlyChild(originalChild: id): NSArray; cdecl; external;
+procedure NSAccessibilityPostNotification(element: id; notification: NSString); cdecl; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -40,191 +40,325 @@ procedure NSAccessibilityPostNotification(element: id; notificationPointer: NSSt
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSAccessibilityErrorCodeExceptionInfo: NSString; external name '_NSAccessibilityErrorCodeExceptionInfo';
-  NSAccessibilityRoleAttribute: NSString; external name '_NSAccessibilityRoleAttribute';
-  NSAccessibilityRoleDescriptionAttribute: NSString; external name '_NSAccessibilityRoleDescriptionAttribute';
-  NSAccessibilitySubroleAttribute: NSString; external name '_NSAccessibilitySubroleAttribute';
-  NSAccessibilityHelpAttribute: NSString; external name '_NSAccessibilityHelpAttribute';
-  NSAccessibilityValueAttribute: NSString; external name '_NSAccessibilityValueAttribute';
-  NSAccessibilityMinValueAttribute: NSString; external name '_NSAccessibilityMinValueAttribute';
-  NSAccessibilityMaxValueAttribute: NSString; external name '_NSAccessibilityMaxValueAttribute';
-  NSAccessibilityEnabledAttribute: NSString; external name '_NSAccessibilityEnabledAttribute';
-  NSAccessibilityFocusedAttribute: NSString; external name '_NSAccessibilityFocusedAttribute';
-  NSAccessibilityParentAttribute: NSString; external name '_NSAccessibilityParentAttribute';
-  NSAccessibilityChildrenAttribute: NSString; external name '_NSAccessibilityChildrenAttribute';
-  NSAccessibilityWindowAttribute: NSString; external name '_NSAccessibilityWindowAttribute';
-  NSAccessibilitySelectedChildrenAttribute: NSString; external name '_NSAccessibilitySelectedChildrenAttribute';
-  NSAccessibilityVisibleChildrenAttribute: NSString; external name '_NSAccessibilityVisibleChildrenAttribute';
-  NSAccessibilityPositionAttribute: NSString; external name '_NSAccessibilityPositionAttribute';
-  NSAccessibilitySizeAttribute: NSString; external name '_NSAccessibilitySizeAttribute';
-  NSAccessibilityContentsAttribute: NSString; external name '_NSAccessibilityContentsAttribute';
-  NSAccessibilityTitleAttribute: NSString; external name '_NSAccessibilityTitleAttribute';
-  NSAccessibilityPreviousContentsAttribute: NSString; external name '_NSAccessibilityPreviousContentsAttribute';
-  NSAccessibilityNextContentsAttribute: NSString; external name '_NSAccessibilityNextContentsAttribute';
-  NSAccessibilityHeaderAttribute: NSString; external name '_NSAccessibilityHeaderAttribute';
-  NSAccessibilityEditedAttribute: NSString; external name '_NSAccessibilityEditedAttribute';
-  NSAccessibilityTabsAttribute: NSString; external name '_NSAccessibilityTabsAttribute';
-  NSAccessibilityHorizontalScrollBarAttribute: NSString; external name '_NSAccessibilityHorizontalScrollBarAttribute';
-  NSAccessibilityVerticalScrollBarAttribute: NSString; external name '_NSAccessibilityVerticalScrollBarAttribute';
-  NSAccessibilityOverflowButtonAttribute: NSString; external name '_NSAccessibilityOverflowButtonAttribute';
-  NSAccessibilityIncrementButtonAttribute: NSString; external name '_NSAccessibilityIncrementButtonAttribute';
-  NSAccessibilityDecrementButtonAttribute: NSString; external name '_NSAccessibilityDecrementButtonAttribute';
-  NSAccessibilityFilenameAttribute: NSString; external name '_NSAccessibilityFilenameAttribute';
-  NSAccessibilityExpandedAttribute: NSString; external name '_NSAccessibilityExpandedAttribute';
-  NSAccessibilitySelectedAttribute: NSString; external name '_NSAccessibilitySelectedAttribute';
-  NSAccessibilitySplittersAttribute: NSString; external name '_NSAccessibilitySplittersAttribute';
-  NSAccessibilityDocumentAttribute: NSString; external name '_NSAccessibilityDocumentAttribute';
-  NSAccessibilityTitleUIElementAttribute: NSString; external name '_NSAccessibilityTitleUIElementAttribute';
-  NSAccessibilitySelectedTextAttribute: NSString; external name '_NSAccessibilitySelectedTextAttribute';
-  NSAccessibilitySelectedTextRangeAttribute: NSString; external name '_NSAccessibilitySelectedTextRangeAttribute';
-  NSAccessibilityMainAttribute: NSString; external name '_NSAccessibilityMainAttribute';
-  NSAccessibilityMinimizedAttribute: NSString; external name '_NSAccessibilityMinimizedAttribute';
-  NSAccessibilityCloseButtonAttribute: NSString; external name '_NSAccessibilityCloseButtonAttribute';
-  NSAccessibilityZoomButtonAttribute: NSString; external name '_NSAccessibilityZoomButtonAttribute';
-  NSAccessibilityMinimizeButtonAttribute: NSString; external name '_NSAccessibilityMinimizeButtonAttribute';
-  NSAccessibilityToolbarButtonAttribute: NSString; external name '_NSAccessibilityToolbarButtonAttribute';
-  NSAccessibilityProxyAttribute: NSString; external name '_NSAccessibilityProxyAttribute';
-  NSAccessibilityGrowAreaAttribute: NSString; external name '_NSAccessibilityGrowAreaAttribute';
-  NSAccessibilityMenuBarAttribute: NSString; external name '_NSAccessibilityMenuBarAttribute';
-  NSAccessibilityWindowsAttribute: NSString; external name '_NSAccessibilityWindowsAttribute';
-  NSAccessibilityFrontmostAttribute: NSString; external name '_NSAccessibilityFrontmostAttribute';
-  NSAccessibilityHiddenAttribute: NSString; external name '_NSAccessibilityHiddenAttribute';
-  NSAccessibilityMainWindowAttribute: NSString; external name '_NSAccessibilityMainWindowAttribute';
-  NSAccessibilityFocusedWindowAttribute: NSString; external name '_NSAccessibilityFocusedWindowAttribute';
-  NSAccessibilityFocusedUIElementAttribute: NSString; external name '_NSAccessibilityFocusedUIElementAttribute';
-  NSAccessibilityOrientationAttribute: NSString; external name '_NSAccessibilityOrientationAttribute';
-  NSAccessibilityVerticalOrientationValue: NSString; external name '_NSAccessibilityVerticalOrientationValue';
-  NSAccessibilityHorizontalOrientationValue: NSString; external name '_NSAccessibilityHorizontalOrientationValue';
-  NSAccessibilityColumnTitlesAttribute: NSString; external name '_NSAccessibilityColumnTitlesAttribute';
-  NSAccessibilityRowsAttribute: NSString; external name '_NSAccessibilityRowsAttribute';
-  NSAccessibilityVisibleRowsAttribute: NSString; external name '_NSAccessibilityVisibleRowsAttribute';
-  NSAccessibilitySelectedRowsAttribute: NSString; external name '_NSAccessibilitySelectedRowsAttribute';
-  NSAccessibilityColumnsAttribute: NSString; external name '_NSAccessibilityColumnsAttribute';
-  NSAccessibilityVisibleColumnsAttribute: NSString; external name '_NSAccessibilityVisibleColumnsAttribute';
-  NSAccessibilitySelectedColumnsAttribute: NSString; external name '_NSAccessibilitySelectedColumnsAttribute';
-  NSAccessibilityAscendingSortDirectionValue: NSString; external name '_NSAccessibilityAscendingSortDirectionValue';
-  NSAccessibilityDescendingSortDirectionValue: NSString; external name '_NSAccessibilityDescendingSortDirectionValue';
-  NSAccessibilityUnknownSortDirectionValue: NSString; external name '_NSAccessibilityUnknownSortDirectionValue';
-  NSAccessibilityDisclosingAttribute: NSString; external name '_NSAccessibilityDisclosingAttribute';
-  NSAccessibilityDisclosedRowsAttribute: NSString; external name '_NSAccessibilityDisclosedRowsAttribute';
-  NSAccessibilityDisclosedByRowAttribute: NSString; external name '_NSAccessibilityDisclosedByRowAttribute';
-  NSAccessibilityLeftTabStopMarkerTypeValue: NSString; external name '_NSAccessibilityLeftTabStopMarkerTypeValue';
-  NSAccessibilityRightTabStopMarkerTypeValue: NSString; external name '_NSAccessibilityRightTabStopMarkerTypeValue';
-  NSAccessibilityCenterTabStopMarkerTypeValue: NSString; external name '_NSAccessibilityCenterTabStopMarkerTypeValue';
-  NSAccessibilityDecimalTabStopMarkerTypeValue: NSString; external name '_NSAccessibilityDecimalTabStopMarkerTypeValue';
-  NSAccessibilityHeadIndentMarkerTypeValue: NSString; external name '_NSAccessibilityHeadIndentMarkerTypeValue';
-  NSAccessibilityTailIndentMarkerTypeValue: NSString; external name '_NSAccessibilityTailIndentMarkerTypeValue';
-  NSAccessibilityFirstLineIndentMarkerTypeValue: NSString; external name '_NSAccessibilityFirstLineIndentMarkerTypeValue';
-  NSAccessibilityUnknownMarkerTypeValue: NSString; external name '_NSAccessibilityUnknownMarkerTypeValue';
-  NSAccessibilityInchesUnitValue: NSString; external name '_NSAccessibilityInchesUnitValue';
-  NSAccessibilityCentimetersUnitValue: NSString; external name '_NSAccessibilityCentimetersUnitValue';
-  NSAccessibilityPointsUnitValue: NSString; external name '_NSAccessibilityPointsUnitValue';
-  NSAccessibilityPicasUnitValue: NSString; external name '_NSAccessibilityPicasUnitValue';
-  NSAccessibilityUnknownUnitValue: NSString; external name '_NSAccessibilityUnknownUnitValue';
-  NSAccessibilityPressAction: NSString; external name '_NSAccessibilityPressAction';
-  NSAccessibilityIncrementAction: NSString; external name '_NSAccessibilityIncrementAction';
-  NSAccessibilityDecrementAction: NSString; external name '_NSAccessibilityDecrementAction';
-  NSAccessibilityConfirmAction: NSString; external name '_NSAccessibilityConfirmAction';
-  NSAccessibilityPickAction: NSString; external name '_NSAccessibilityPickAction';
-  NSAccessibilityCancelAction: NSString; external name '_NSAccessibilityCancelAction';
-  NSAccessibilityRaiseAction: NSString; external name '_NSAccessibilityRaiseAction';
-  NSAccessibilityShowMenuAction: NSString; external name '_NSAccessibilityShowMenuAction';
-  NSAccessibilityDeleteAction: NSString; external name '_NSAccessibilityDeleteAction';
-  NSAccessibilityMainWindowChangedNotification: NSString; external name '_NSAccessibilityMainWindowChangedNotification';
-  NSAccessibilityFocusedWindowChangedNotification: NSString; external name '_NSAccessibilityFocusedWindowChangedNotification';
-  NSAccessibilityFocusedUIElementChangedNotification: NSString; external name '_NSAccessibilityFocusedUIElementChangedNotification';
-  NSAccessibilityApplicationActivatedNotification: NSString; external name '_NSAccessibilityApplicationActivatedNotification';
-  NSAccessibilityApplicationDeactivatedNotification: NSString; external name '_NSAccessibilityApplicationDeactivatedNotification';
-  NSAccessibilityApplicationHiddenNotification: NSString; external name '_NSAccessibilityApplicationHiddenNotification';
-  NSAccessibilityApplicationShownNotification: NSString; external name '_NSAccessibilityApplicationShownNotification';
-  NSAccessibilityWindowCreatedNotification: NSString; external name '_NSAccessibilityWindowCreatedNotification';
-  NSAccessibilityWindowMovedNotification: NSString; external name '_NSAccessibilityWindowMovedNotification';
-  NSAccessibilityWindowResizedNotification: NSString; external name '_NSAccessibilityWindowResizedNotification';
-  NSAccessibilityWindowMiniaturizedNotification: NSString; external name '_NSAccessibilityWindowMiniaturizedNotification';
-  NSAccessibilityWindowDeminiaturizedNotification: NSString; external name '_NSAccessibilityWindowDeminiaturizedNotification';
-  NSAccessibilityDrawerCreatedNotification: NSString; external name '_NSAccessibilityDrawerCreatedNotification';
-  NSAccessibilitySheetCreatedNotification: NSString; external name '_NSAccessibilitySheetCreatedNotification';
-  NSAccessibilityUIElementDestroyedNotification: NSString; external name '_NSAccessibilityUIElementDestroyedNotification';
-  NSAccessibilityValueChangedNotification: NSString; external name '_NSAccessibilityValueChangedNotification';
-  NSAccessibilityTitleChangedNotification: NSString; external name '_NSAccessibilityTitleChangedNotification';
-  NSAccessibilityResizedNotification: NSString; external name '_NSAccessibilityResizedNotification';
-  NSAccessibilityMovedNotification: NSString; external name '_NSAccessibilityMovedNotification';
-  NSAccessibilityCreatedNotification: NSString; external name '_NSAccessibilityCreatedNotification';
-  NSAccessibilityHelpTagCreatedNotification: NSString; external name '_NSAccessibilityHelpTagCreatedNotification';
-  NSAccessibilitySelectedTextChangedNotification: NSString; external name '_NSAccessibilitySelectedTextChangedNotification';
-  NSAccessibilityRowCountChangedNotification: NSString; external name '_NSAccessibilityRowCountChangedNotification';
-  NSAccessibilitySelectedChildrenChangedNotification: NSString; external name '_NSAccessibilitySelectedChildrenChangedNotification';
-  NSAccessibilitySelectedRowsChangedNotification: NSString; external name '_NSAccessibilitySelectedRowsChangedNotification';
-  NSAccessibilitySelectedColumnsChangedNotification: NSString; external name '_NSAccessibilitySelectedColumnsChangedNotification';
-  NSAccessibilityUnknownRole: NSString; external name '_NSAccessibilityUnknownRole';
-  NSAccessibilityButtonRole: NSString; external name '_NSAccessibilityButtonRole';
-  NSAccessibilityRadioButtonRole: NSString; external name '_NSAccessibilityRadioButtonRole';
-  NSAccessibilityCheckBoxRole: NSString; external name '_NSAccessibilityCheckBoxRole';
-  NSAccessibilitySliderRole: NSString; external name '_NSAccessibilitySliderRole';
-  NSAccessibilityTabGroupRole: NSString; external name '_NSAccessibilityTabGroupRole';
-  NSAccessibilityTextFieldRole: NSString; external name '_NSAccessibilityTextFieldRole';
-  NSAccessibilityStaticTextRole: NSString; external name '_NSAccessibilityStaticTextRole';
-  NSAccessibilityTextAreaRole: NSString; external name '_NSAccessibilityTextAreaRole';
-  NSAccessibilityScrollAreaRole: NSString; external name '_NSAccessibilityScrollAreaRole';
-  NSAccessibilityPopUpButtonRole: NSString; external name '_NSAccessibilityPopUpButtonRole';
-  NSAccessibilityMenuButtonRole: NSString; external name '_NSAccessibilityMenuButtonRole';
-  NSAccessibilityTableRole: NSString; external name '_NSAccessibilityTableRole';
-  NSAccessibilityApplicationRole: NSString; external name '_NSAccessibilityApplicationRole';
-  NSAccessibilityGroupRole: NSString; external name '_NSAccessibilityGroupRole';
-  NSAccessibilityRadioGroupRole: NSString; external name '_NSAccessibilityRadioGroupRole';
-  NSAccessibilityListRole: NSString; external name '_NSAccessibilityListRole';
-  NSAccessibilityScrollBarRole: NSString; external name '_NSAccessibilityScrollBarRole';
-  NSAccessibilityValueIndicatorRole: NSString; external name '_NSAccessibilityValueIndicatorRole';
-  NSAccessibilityImageRole: NSString; external name '_NSAccessibilityImageRole';
-  NSAccessibilityMenuBarRole: NSString; external name '_NSAccessibilityMenuBarRole';
-  NSAccessibilityMenuRole: NSString; external name '_NSAccessibilityMenuRole';
-  NSAccessibilityMenuItemRole: NSString; external name '_NSAccessibilityMenuItemRole';
-  NSAccessibilityColumnRole: NSString; external name '_NSAccessibilityColumnRole';
-  NSAccessibilityRowRole: NSString; external name '_NSAccessibilityRowRole';
-  NSAccessibilityToolbarRole: NSString; external name '_NSAccessibilityToolbarRole';
-  NSAccessibilityBusyIndicatorRole: NSString; external name '_NSAccessibilityBusyIndicatorRole';
-  NSAccessibilityProgressIndicatorRole: NSString; external name '_NSAccessibilityProgressIndicatorRole';
-  NSAccessibilityWindowRole: NSString; external name '_NSAccessibilityWindowRole';
-  NSAccessibilityDrawerRole: NSString; external name '_NSAccessibilityDrawerRole';
-  NSAccessibilitySystemWideRole: NSString; external name '_NSAccessibilitySystemWideRole';
-  NSAccessibilityOutlineRole: NSString; external name '_NSAccessibilityOutlineRole';
-  NSAccessibilityIncrementorRole: NSString; external name '_NSAccessibilityIncrementorRole';
-  NSAccessibilityBrowserRole: NSString; external name '_NSAccessibilityBrowserRole';
-  NSAccessibilityComboBoxRole: NSString; external name '_NSAccessibilityComboBoxRole';
-  NSAccessibilitySplitGroupRole: NSString; external name '_NSAccessibilitySplitGroupRole';
-  NSAccessibilitySplitterRole: NSString; external name '_NSAccessibilitySplitterRole';
-  NSAccessibilityColorWellRole: NSString; external name '_NSAccessibilityColorWellRole';
-  NSAccessibilityGrowAreaRole: NSString; external name '_NSAccessibilityGrowAreaRole';
-  NSAccessibilitySheetRole: NSString; external name '_NSAccessibilitySheetRole';
-  NSAccessibilityHelpTagRole: NSString; external name '_NSAccessibilityHelpTagRole';
-  NSAccessibilityMatteRole: NSString; external name '_NSAccessibilityMatteRole';
-  NSAccessibilityRulerRole: NSString; external name '_NSAccessibilityRulerRole';
-  NSAccessibilityRulerMarkerRole: NSString; external name '_NSAccessibilityRulerMarkerRole';
-  NSAccessibilitySortButtonRole: NSString; external name '_NSAccessibilitySortButtonRole';
-  NSAccessibilityLinkRole: NSString; external name '_NSAccessibilityLinkRole';
-  NSAccessibilityDisclosureTriangleRole: NSString; external name '_NSAccessibilityDisclosureTriangleRole';
-  NSAccessibilityGridRole: NSString; external name '_NSAccessibilityGridRole';
-  NSAccessibilityUnknownSubrole: NSString; external name '_NSAccessibilityUnknownSubrole';
-  NSAccessibilityCloseButtonSubrole: NSString; external name '_NSAccessibilityCloseButtonSubrole';
-  NSAccessibilityZoomButtonSubrole: NSString; external name '_NSAccessibilityZoomButtonSubrole';
-  NSAccessibilityMinimizeButtonSubrole: NSString; external name '_NSAccessibilityMinimizeButtonSubrole';
-  NSAccessibilityToolbarButtonSubrole: NSString; external name '_NSAccessibilityToolbarButtonSubrole';
-  NSAccessibilityTableRowSubrole: NSString; external name '_NSAccessibilityTableRowSubrole';
-  NSAccessibilityOutlineRowSubrole: NSString; external name '_NSAccessibilityOutlineRowSubrole';
-  NSAccessibilitySecureTextFieldSubrole: NSString; external name '_NSAccessibilitySecureTextFieldSubrole';
-  NSAccessibilityStandardWindowSubrole: NSString; external name '_NSAccessibilityStandardWindowSubrole';
-  NSAccessibilityDialogSubrole: NSString; external name '_NSAccessibilityDialogSubrole';
-  NSAccessibilitySystemDialogSubrole: NSString; external name '_NSAccessibilitySystemDialogSubrole';
-  NSAccessibilityFloatingWindowSubrole: NSString; external name '_NSAccessibilityFloatingWindowSubrole';
-  NSAccessibilitySystemFloatingWindowSubrole: NSString; external name '_NSAccessibilitySystemFloatingWindowSubrole';
-  NSAccessibilityIncrementArrowSubrole: NSString; external name '_NSAccessibilityIncrementArrowSubrole';
-  NSAccessibilityDecrementArrowSubrole: NSString; external name '_NSAccessibilityDecrementArrowSubrole';
-  NSAccessibilityIncrementPageSubrole: NSString; external name '_NSAccessibilityIncrementPageSubrole';
-  NSAccessibilityDecrementPageSubrole: NSString; external name '_NSAccessibilityDecrementPageSubrole';
-  NSAccessibilitySearchFieldSubrole: NSString; external name '_NSAccessibilitySearchFieldSubrole';
-  NSAccessibilityTextAttachmentSubrole: NSString; external name '_NSAccessibilityTextAttachmentSubrole';
-  NSAccessibilityTextLinkSubrole: NSString; external name '_NSAccessibilityTextLinkSubrole';
-  NSAccessibilityTimelineSubrole: NSString; external name '_NSAccessibilityTimelineSubrole';
+  NSAccessibilityErrorCodeExceptionInfo: NSString; cvar; external;
+  NSAccessibilityRoleAttribute: NSString; cvar; external;
+  NSAccessibilityRoleDescriptionAttribute: NSString; cvar; external;
+  NSAccessibilitySubroleAttribute: NSString; cvar; external;
+  NSAccessibilityHelpAttribute: NSString; cvar; external;
+  NSAccessibilityValueAttribute: NSString; cvar; external;
+  NSAccessibilityMinValueAttribute: NSString; cvar; external;
+  NSAccessibilityMaxValueAttribute: NSString; cvar; external;
+  NSAccessibilityEnabledAttribute: NSString; cvar; external;
+  NSAccessibilityFocusedAttribute: NSString; cvar; external;
+  NSAccessibilityParentAttribute: NSString; cvar; external;
+  NSAccessibilityChildrenAttribute: NSString; cvar; external;
+  NSAccessibilityWindowAttribute: NSString; cvar; external;
+  NSAccessibilityTopLevelUIElementAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedChildrenAttribute: NSString; cvar; external;
+  NSAccessibilityVisibleChildrenAttribute: NSString; cvar; external;
+  NSAccessibilityPositionAttribute: NSString; cvar; external;
+  NSAccessibilitySizeAttribute: NSString; cvar; external;
+  NSAccessibilityContentsAttribute: NSString; cvar; external;
+  NSAccessibilityTitleAttribute: NSString; cvar; external;
+  NSAccessibilityDescriptionAttribute: NSString; cvar; external;
+  NSAccessibilityShownMenuAttribute: NSString; cvar; external;
+  NSAccessibilityValueDescriptionAttribute: NSString; cvar; external;
+  NSAccessibilityPreviousContentsAttribute: NSString; cvar; external;
+  NSAccessibilityNextContentsAttribute: NSString; cvar; external;
+  NSAccessibilityHeaderAttribute: NSString; cvar; external;
+  NSAccessibilityEditedAttribute: NSString; cvar; external;
+  NSAccessibilityTabsAttribute: NSString; cvar; external;
+  NSAccessibilityHorizontalScrollBarAttribute: NSString; cvar; external;
+  NSAccessibilityVerticalScrollBarAttribute: NSString; cvar; external;
+  NSAccessibilityOverflowButtonAttribute: NSString; cvar; external;
+  NSAccessibilityIncrementButtonAttribute: NSString; cvar; external;
+  NSAccessibilityDecrementButtonAttribute: NSString; cvar; external;
+  NSAccessibilityFilenameAttribute: NSString; cvar; external;
+  NSAccessibilityExpandedAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedAttribute: NSString; cvar; external;
+  NSAccessibilitySplittersAttribute: NSString; cvar; external;
+  NSAccessibilityDocumentAttribute: NSString; cvar; external;
+  NSAccessibilityURLAttribute: NSString; cvar; external;
+  NSAccessibilityIndexAttribute: NSString; cvar; external;
+  NSAccessibilityRowCountAttribute: NSString; cvar; external;
+  NSAccessibilityColumnCountAttribute: NSString; cvar; external;
+  NSAccessibilityOrderedByRowAttribute: NSString; cvar; external;
+  NSAccessibilityWarningValueAttribute: NSString; cvar; external;
+  NSAccessibilityCriticalValueAttribute: NSString; cvar; external;
+  NSAccessibilityPlaceholderValueAttribute: NSString; cvar; external;
+  NSAccessibilityTitleUIElementAttribute: NSString; cvar; external;
+  NSAccessibilityServesAsTitleForUIElementsAttribute: NSString; cvar; external;
+  NSAccessibilityLinkedUIElementsAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedTextAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedTextRangeAttribute: NSString; cvar; external;
+  NSAccessibilityNumberOfCharactersAttribute: NSString; cvar; external;
+  NSAccessibilityVisibleCharacterRangeAttribute: NSString; cvar; external;
+  NSAccessibilitySharedTextUIElementsAttribute: NSString; cvar; external;
+  NSAccessibilitySharedCharacterRangeAttribute: NSString; cvar; external;
+  NSAccessibilityInsertionPointLineNumberAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedTextRangesAttribute: NSString; cvar; external;
+  NSAccessibilityLineForIndexParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityRangeForLineParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityStringForRangeParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityRangeForPositionParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityRangeForIndexParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityBoundsForRangeParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityRTFForRangeParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityStyleRangeForIndexParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityAttributedStringForRangeParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityFontTextAttribute: NSString; cvar; external;
+  NSAccessibilityForegroundColorTextAttribute: NSString; cvar; external;
+  NSAccessibilityBackgroundColorTextAttribute: NSString; cvar; external;
+  NSAccessibilityUnderlineColorTextAttribute: NSString; cvar; external;
+  NSAccessibilityStrikethroughColorTextAttribute: NSString; cvar; external;
+  NSAccessibilityUnderlineTextAttribute: NSString; cvar; external;
+  NSAccessibilitySuperscriptTextAttribute: NSString; cvar; external;
+  NSAccessibilityStrikethroughTextAttribute: NSString; cvar; external;
+  NSAccessibilityShadowTextAttribute: NSString; cvar; external;
+  NSAccessibilityAttachmentTextAttribute: NSString; cvar; external;
+  NSAccessibilityLinkTextAttribute: NSString; cvar; external;
+  NSAccessibilityMisspelledTextAttribute: NSString; cvar; external;
+  NSAccessibilityFontNameKey: NSString; cvar; external;
+  NSAccessibilityFontFamilyKey: NSString; cvar; external;
+  NSAccessibilityVisibleNameKey: NSString; cvar; external;
+  NSAccessibilityFontSizeKey: NSString; cvar; external;
+  NSAccessibilityMainAttribute: NSString; cvar; external;
+  NSAccessibilityMinimizedAttribute: NSString; cvar; external;
+  NSAccessibilityCloseButtonAttribute: NSString; cvar; external;
+  NSAccessibilityZoomButtonAttribute: NSString; cvar; external;
+  NSAccessibilityMinimizeButtonAttribute: NSString; cvar; external;
+  NSAccessibilityToolbarButtonAttribute: NSString; cvar; external;
+  NSAccessibilityProxyAttribute: NSString; cvar; external;
+  NSAccessibilityGrowAreaAttribute: NSString; cvar; external;
+  NSAccessibilityModalAttribute: NSString; cvar; external;
+  NSAccessibilityDefaultButtonAttribute: NSString; cvar; external;
+  NSAccessibilityCancelButtonAttribute: NSString; cvar; external;
+  NSAccessibilityMenuBarAttribute: NSString; cvar; external;
+  NSAccessibilityWindowsAttribute: NSString; cvar; external;
+  NSAccessibilityFrontmostAttribute: NSString; cvar; external;
+  NSAccessibilityHiddenAttribute: NSString; cvar; external;
+  NSAccessibilityMainWindowAttribute: NSString; cvar; external;
+  NSAccessibilityFocusedWindowAttribute: NSString; cvar; external;
+  NSAccessibilityFocusedUIElementAttribute: NSString; cvar; external;
+  NSAccessibilityOrientationAttribute: NSString; cvar; external;
+  NSAccessibilityVerticalOrientationValue: NSString; cvar; external;
+  NSAccessibilityHorizontalOrientationValue: NSString; cvar; external;
+  NSAccessibilityUnknownOrientationValue: NSString; cvar; external;
+  NSAccessibilityColumnTitlesAttribute: NSString; cvar; external;
+  NSAccessibilitySearchButtonAttribute: NSString; cvar; external;
+  NSAccessibilitySearchMenuAttribute: NSString; cvar; external;
+  NSAccessibilityClearButtonAttribute: NSString; cvar; external;
+  NSAccessibilityRowsAttribute: NSString; cvar; external;
+  NSAccessibilityVisibleRowsAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedRowsAttribute: NSString; cvar; external;
+  NSAccessibilityColumnsAttribute: NSString; cvar; external;
+  NSAccessibilityVisibleColumnsAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedColumnsAttribute: NSString; cvar; external;
+  NSAccessibilitySortDirectionAttribute: NSString; cvar; external;
+  NSAccessibilitySelectedCellsAttribute: NSString; cvar; external;
+  NSAccessibilityVisibleCellsAttribute: NSString; cvar; external;
+  NSAccessibilityRowHeaderUIElementsAttribute: NSString; cvar; external;
+  NSAccessibilityColumnHeaderUIElementsAttribute: NSString; cvar; external;
+  NSAccessibilityCellForColumnAndRowParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityRowIndexRangeAttribute: NSString; cvar; external;
+  NSAccessibilityColumnIndexRangeAttribute: NSString; cvar; external;
+  NSAccessibilityHorizontalUnitsAttribute: NSString; cvar; external;
+  NSAccessibilityVerticalUnitsAttribute: NSString; cvar; external;
+  NSAccessibilityHorizontalUnitDescriptionAttribute: NSString; cvar; external;
+  NSAccessibilityVerticalUnitDescriptionAttribute: NSString; cvar; external;
+  NSAccessibilityLayoutPointForScreenPointParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityLayoutSizeForScreenSizeParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityScreenPointForLayoutPointParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityScreenSizeForLayoutSizeParameterizedAttribute: NSString; cvar; external;
+  NSAccessibilityHandlesAttribute: NSString; cvar; external;
+  NSAccessibilityAscendingSortDirectionValue: NSString; cvar; external;
+  NSAccessibilityDescendingSortDirectionValue: NSString; cvar; external;
+  NSAccessibilityUnknownSortDirectionValue: NSString; cvar; external;
+  NSAccessibilityDisclosingAttribute: NSString; cvar; external;
+  NSAccessibilityDisclosedRowsAttribute: NSString; cvar; external;
+  NSAccessibilityDisclosedByRowAttribute: NSString; cvar; external;
+  NSAccessibilityDisclosureLevelAttribute: NSString; cvar; external;
+  NSAccessibilityAllowedValuesAttribute: NSString; cvar; external;
+  NSAccessibilityLabelUIElementsAttribute: NSString; cvar; external;
+  NSAccessibilityLabelValueAttribute: NSString; cvar; external;
+  NSAccessibilityMatteHoleAttribute: NSString; cvar; external;
+  NSAccessibilityMatteContentUIElementAttribute: NSString; cvar; external;
+  NSAccessibilityMarkerUIElementsAttribute: NSString; cvar; external;
+  NSAccessibilityMarkerValuesAttribute: NSString; cvar; external;
+  NSAccessibilityMarkerGroupUIElementAttribute: NSString; cvar; external;
+  NSAccessibilityUnitsAttribute: NSString; cvar; external;
+  NSAccessibilityUnitDescriptionAttribute: NSString; cvar; external;
+  NSAccessibilityMarkerTypeAttribute: NSString; cvar; external;
+  NSAccessibilityMarkerTypeDescriptionAttribute: NSString; cvar; external;
+  NSAccessibilityLeftTabStopMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityRightTabStopMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityCenterTabStopMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityDecimalTabStopMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityHeadIndentMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityTailIndentMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityFirstLineIndentMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityUnknownMarkerTypeValue: NSString; cvar; external;
+  NSAccessibilityInchesUnitValue: NSString; cvar; external;
+  NSAccessibilityCentimetersUnitValue: NSString; cvar; external;
+  NSAccessibilityPointsUnitValue: NSString; cvar; external;
+  NSAccessibilityPicasUnitValue: NSString; cvar; external;
+  NSAccessibilityUnknownUnitValue: NSString; cvar; external;
+  NSAccessibilityPressAction: NSString; cvar; external;
+  NSAccessibilityIncrementAction: NSString; cvar; external;
+  NSAccessibilityDecrementAction: NSString; cvar; external;
+  NSAccessibilityConfirmAction: NSString; cvar; external;
+  NSAccessibilityPickAction: NSString; cvar; external;
+  NSAccessibilityCancelAction: NSString; cvar; external;
+  NSAccessibilityRaiseAction: NSString; cvar; external;
+  NSAccessibilityShowMenuAction: NSString; cvar; external;
+  NSAccessibilityDeleteAction: NSString; cvar; external;
+  NSAccessibilityMainWindowChangedNotification: NSString; cvar; external;
+  NSAccessibilityFocusedWindowChangedNotification: NSString; cvar; external;
+  NSAccessibilityFocusedUIElementChangedNotification: NSString; cvar; external;
+  NSAccessibilityApplicationActivatedNotification: NSString; cvar; external;
+  NSAccessibilityApplicationDeactivatedNotification: NSString; cvar; external;
+  NSAccessibilityApplicationHiddenNotification: NSString; cvar; external;
+  NSAccessibilityApplicationShownNotification: NSString; cvar; external;
+  NSAccessibilityWindowCreatedNotification: NSString; cvar; external;
+  NSAccessibilityWindowMovedNotification: NSString; cvar; external;
+  NSAccessibilityWindowResizedNotification: NSString; cvar; external;
+  NSAccessibilityWindowMiniaturizedNotification: NSString; cvar; external;
+  NSAccessibilityWindowDeminiaturizedNotification: NSString; cvar; external;
+  NSAccessibilityDrawerCreatedNotification: NSString; cvar; external;
+  NSAccessibilitySheetCreatedNotification: NSString; cvar; external;
+  NSAccessibilityUIElementDestroyedNotification: NSString; cvar; external;
+  NSAccessibilityValueChangedNotification: NSString; cvar; external;
+  NSAccessibilityTitleChangedNotification: NSString; cvar; external;
+  NSAccessibilityResizedNotification: NSString; cvar; external;
+  NSAccessibilityMovedNotification: NSString; cvar; external;
+  NSAccessibilityCreatedNotification: NSString; cvar; external;
+  NSAccessibilityHelpTagCreatedNotification: NSString; cvar; external;
+  NSAccessibilitySelectedTextChangedNotification: NSString; cvar; external;
+  NSAccessibilityRowCountChangedNotification: NSString; cvar; external;
+  NSAccessibilitySelectedChildrenChangedNotification: NSString; cvar; external;
+  NSAccessibilitySelectedRowsChangedNotification: NSString; cvar; external;
+  NSAccessibilitySelectedColumnsChangedNotification: NSString; cvar; external;
+  NSAccessibilityRowExpandedNotification: NSString; cvar; external;
+  NSAccessibilityRowCollapsedNotification: NSString; cvar; external;
+  NSAccessibilitySelectedCellsChangedNotification: NSString; cvar; external;
+  NSAccessibilityUnitsChangedNotification: NSString; cvar; external;
+  NSAccessibilitySelectedChildrenMovedNotification: NSString; cvar; external;
+  NSAccessibilityUnknownRole: NSString; cvar; external;
+  NSAccessibilityButtonRole: NSString; cvar; external;
+  NSAccessibilityRadioButtonRole: NSString; cvar; external;
+  NSAccessibilityCheckBoxRole: NSString; cvar; external;
+  NSAccessibilitySliderRole: NSString; cvar; external;
+  NSAccessibilityTabGroupRole: NSString; cvar; external;
+  NSAccessibilityTextFieldRole: NSString; cvar; external;
+  NSAccessibilityStaticTextRole: NSString; cvar; external;
+  NSAccessibilityTextAreaRole: NSString; cvar; external;
+  NSAccessibilityScrollAreaRole: NSString; cvar; external;
+  NSAccessibilityPopUpButtonRole: NSString; cvar; external;
+  NSAccessibilityMenuButtonRole: NSString; cvar; external;
+  NSAccessibilityTableRole: NSString; cvar; external;
+  NSAccessibilityApplicationRole: NSString; cvar; external;
+  NSAccessibilityGroupRole: NSString; cvar; external;
+  NSAccessibilityRadioGroupRole: NSString; cvar; external;
+  NSAccessibilityListRole: NSString; cvar; external;
+  NSAccessibilityScrollBarRole: NSString; cvar; external;
+  NSAccessibilityValueIndicatorRole: NSString; cvar; external;
+  NSAccessibilityImageRole: NSString; cvar; external;
+  NSAccessibilityMenuBarRole: NSString; cvar; external;
+  NSAccessibilityMenuRole: NSString; cvar; external;
+  NSAccessibilityMenuItemRole: NSString; cvar; external;
+  NSAccessibilityColumnRole: NSString; cvar; external;
+  NSAccessibilityRowRole: NSString; cvar; external;
+  NSAccessibilityToolbarRole: NSString; cvar; external;
+  NSAccessibilityBusyIndicatorRole: NSString; cvar; external;
+  NSAccessibilityProgressIndicatorRole: NSString; cvar; external;
+  NSAccessibilityWindowRole: NSString; cvar; external;
+  NSAccessibilityDrawerRole: NSString; cvar; external;
+  NSAccessibilitySystemWideRole: NSString; cvar; external;
+  NSAccessibilityOutlineRole: NSString; cvar; external;
+  NSAccessibilityIncrementorRole: NSString; cvar; external;
+  NSAccessibilityBrowserRole: NSString; cvar; external;
+  NSAccessibilityComboBoxRole: NSString; cvar; external;
+  NSAccessibilitySplitGroupRole: NSString; cvar; external;
+  NSAccessibilitySplitterRole: NSString; cvar; external;
+  NSAccessibilityColorWellRole: NSString; cvar; external;
+  NSAccessibilityGrowAreaRole: NSString; cvar; external;
+  NSAccessibilitySheetRole: NSString; cvar; external;
+  NSAccessibilityHelpTagRole: NSString; cvar; external;
+  NSAccessibilityMatteRole: NSString; cvar; external;
+  NSAccessibilityRulerRole: NSString; cvar; external;
+  NSAccessibilityRulerMarkerRole: NSString; cvar; external;
+  NSAccessibilityLinkRole: NSString; cvar; external;
+  NSAccessibilityDisclosureTriangleRole: NSString; cvar; external;
+  NSAccessibilityGridRole: NSString; cvar; external;
+  NSAccessibilityRelevanceIndicatorRole: NSString; cvar; external;
+  NSAccessibilityLevelIndicatorRole: NSString; cvar; external;
+  NSAccessibilityCellRole: NSString; cvar; external;
+  NSAccessibilityLayoutAreaRole: NSString; cvar; external;
+  NSAccessibilityLayoutItemRole: NSString; cvar; external;
+  NSAccessibilityHandleRole: NSString; cvar; external;
+  NSAccessibilityUnknownSubrole: NSString; cvar; external;
+  NSAccessibilityCloseButtonSubrole: NSString; cvar; external;
+  NSAccessibilityZoomButtonSubrole: NSString; cvar; external;
+  NSAccessibilityMinimizeButtonSubrole: NSString; cvar; external;
+  NSAccessibilityToolbarButtonSubrole: NSString; cvar; external;
+  NSAccessibilityTableRowSubrole: NSString; cvar; external;
+  NSAccessibilityOutlineRowSubrole: NSString; cvar; external;
+  NSAccessibilitySecureTextFieldSubrole: NSString; cvar; external;
+  NSAccessibilityStandardWindowSubrole: NSString; cvar; external;
+  NSAccessibilityDialogSubrole: NSString; cvar; external;
+  NSAccessibilitySystemDialogSubrole: NSString; cvar; external;
+  NSAccessibilityFloatingWindowSubrole: NSString; cvar; external;
+  NSAccessibilitySystemFloatingWindowSubrole: NSString; cvar; external;
+  NSAccessibilityIncrementArrowSubrole: NSString; cvar; external;
+  NSAccessibilityDecrementArrowSubrole: NSString; cvar; external;
+  NSAccessibilityIncrementPageSubrole: NSString; cvar; external;
+  NSAccessibilityDecrementPageSubrole: NSString; cvar; external;
+  NSAccessibilitySearchFieldSubrole: NSString; cvar; external;
+  NSAccessibilityTextAttachmentSubrole: NSString; cvar; external;
+  NSAccessibilityTextLinkSubrole: NSString; cvar; external;
+  NSAccessibilityTimelineSubrole: NSString; cvar; external;
+  NSAccessibilitySortButtonSubrole: NSString; cvar; external;
+  NSAccessibilityRatingIndicatorSubrole: NSString; cvar; external;
+  NSAccessibilityContentListSubrole: NSString; cvar; external;
+  NSAccessibilityDefinitionListSubrole: NSString; cvar; external;
+  NSAccessibilitySortButtonRole: NSString; cvar; external;
+  NSAccessibilityHorizontialUnitsAttribute_BUT_DEPRECATED: NSString; cvar; external;
+  NSAccessibilityHorizontialUnitDescriptionAttribute_BUT_DEPRECATED: NSString; cvar; external;
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSACCESSIBILITY_PAS_C}
+{$define NSACCESSIBILITY_PAS_C}
+
+{ NSAccessibilityCategory }
+  NSAccessibilityCategory = objccategory(NSObject)
+    function accessibilityAttributeNames: NSArray; message 'accessibilityAttributeNames';
+    function accessibilityAttributeValue(attribute: NSString): id; message 'accessibilityAttributeValue:';
+    function accessibilityIsAttributeSettable(attribute: NSString): Boolean; message 'accessibilityIsAttributeSettable:';
+    procedure accessibilitySetValue_forAttribute(value: id; attribute: NSString); message 'accessibilitySetValue:forAttribute:';
+    function accessibilityParameterizedAttributeNames: NSArray; message 'accessibilityParameterizedAttributeNames';
+    function accessibilityAttributeValue_forParameter(attribute: NSString; parameter: id): id; message 'accessibilityAttributeValue:forParameter:';
+    function accessibilityActionNames: NSArray; message 'accessibilityActionNames';
+    function accessibilityActionDescription(action: NSString): NSString; message 'accessibilityActionDescription:';
+    procedure accessibilityPerformAction(action: NSString); message 'accessibilityPerformAction:';
+    function accessibilityIsIgnored: Boolean; message 'accessibilityIsIgnored';
+    function accessibilityHitTest(point: NSPoint): id; message 'accessibilityHitTest:';
+    function accessibilityFocusedUIElement: id; message 'accessibilityFocusedUIElement';
+    function accessibilityIndexOfChild(child: id): NSUInteger; message 'accessibilityIndexOfChild:';
+    function accessibilityArrayAttributeCount(attribute: NSString): NSUInteger; message 'accessibilityArrayAttributeCount:';
+    function accessibilityArrayAttributeValues_index_maxCount(attribute: NSString; index: NSUInteger; maxCount: NSUInteger): NSArray; message 'accessibilityArrayAttributeValues:index:maxCount:';
+  end; external;
+
+{ NSAccessibilityAdditionsCategory }
+  NSAccessibilityAdditionsCategory = objccategory(NSObject)
+    function accessibilitySetOverrideValue_forAttribute(value: id; attribute: NSString): Boolean; message 'accessibilitySetOverrideValue:forAttribute:';
+  end; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 6 - 20
packages/cocoaint/src/appkit/NSActionCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSActionCell.h }
 { Parsed from Appkit.framework NSActionCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSActionCell = objcclass;
   NSActionCell = objcclass;
   NSActionCellPointer = ^NSActionCell;
   NSActionCellPointer = ^NSActionCell;
+  NSActionCellPtr = NSActionCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,35 +44,20 @@
 { NSActionCell }
 { NSActionCell }
   NSActionCell = objcclass(NSCell)
   NSActionCell = objcclass(NSCell)
   private
   private
-    __tag: NSInteger;
-    __target: id;
-    __action: SEL;
-    __controlView: id;
+    _tag: NSInteger;
+    _target: id;
+    _action: SEL;
+    _controlView: id;
     
     
   public
   public
     class function alloc: NSActionCell; message 'alloc';
     class function alloc: NSActionCell; message 'alloc';
 
 
-    function controlView: NSView; message 'controlView';
-    procedure setControlView(view: NSView); message 'setControlView:';
-    procedure setFont(fontObj: NSFont); message 'setFont:';
-    procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
-    procedure setBordered(flag: Boolean); message 'setBordered:';
-    procedure setBezeled(flag: Boolean); message 'setBezeled:';
-    procedure setEnabled(flag: Boolean); message 'setEnabled:';
-    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:';
-    procedure setImage(image_: NSImage); message 'setImage:';
     function target: id; message 'target';
     function target: id; message 'target';
     procedure setTarget(anObject: id); message 'setTarget:';
     procedure setTarget(anObject: id); message 'setTarget:';
     function action: SEL; message 'action';
     function action: SEL; message 'action';
     procedure setAction(aSelector: SEL); message 'setAction:';
     procedure setAction(aSelector: SEL); message 'setAction:';
     function tag: NSInteger; message 'tag';
     function tag: NSInteger; message 'tag';
     procedure setTag(anInt: NSInteger); message 'setTag:';
     procedure setTag(anInt: NSInteger); message 'setTag:';
-    function stringValue: NSString; message 'stringValue';
-    function intValue: cint; message 'intValue';
-    function floatValue: single; message 'floatValue';
-    function doubleValue: double; message 'doubleValue';
-    procedure setObjectValue(obj: id); message 'setObjectValue:';
-    function integerValue: NSInteger; message 'integerValue';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 12 - 3
packages/cocoaint/src/appkit/NSAffineTransform.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSAffineTransform.h }
 { Parsed from Appkit.framework NSAffineTransform.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:06 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -19,6 +19,7 @@ type
     m11, m12, m21, m22: CGFloat;
     m11, m12, m21, m22: CGFloat;
     tX, tY: CGFloat;
     tX, tY: CGFloat;
   end;
   end;
+NSAffineTransformStructPtr = ^NSAffineTransformStruct;
 
 
 
 
 {$endif}
 {$endif}
@@ -41,6 +42,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSAffineTransform = objcclass;
   NSAffineTransform = objcclass;
   NSAffineTransformPointer = ^NSAffineTransform;
   NSAffineTransformPointer = ^NSAffineTransform;
+  NSAffineTransformPtr = NSAffineTransformPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -51,7 +53,7 @@ type
 { NSAffineTransform }
 { NSAffineTransform }
   NSAffineTransform = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSAffineTransform = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __transformStruct: NSAffineTransformStruct;
+    _transformStruct: NSAffineTransformStruct;
     
     
   public
   public
     class function alloc: NSAffineTransform; message 'alloc';
     class function alloc: NSAffineTransform; message 'alloc';
@@ -71,7 +73,14 @@ type
     function transformStruct: NSAffineTransformStruct; message 'transformStruct';
     function transformStruct: NSAffineTransformStruct; message 'transformStruct';
     procedure setTransformStruct(transformStruct_: NSAffineTransformStruct); message 'setTransformStruct:';
     procedure setTransformStruct(transformStruct_: NSAffineTransformStruct); message 'setTransformStruct:';
 
 
-    { Category: NSAppKitAdditons }
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSAppKitAdditonsCategory }
+  NSAppKitAdditonsCategory = objccategory(NSAffineTransform)
     function transformBezierPath(aPath: NSBezierPath): NSBezierPath; message 'transformBezierPath:';
     function transformBezierPath(aPath: NSBezierPath): NSBezierPath; message 'transformBezierPath:';
     procedure set_; message 'set';
     procedure set_; message 'set';
     procedure concat; message 'concat';
     procedure concat; message 'concat';

+ 46 - 32
packages/cocoaint/src/appkit/NSAlert.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSAlert.h }
 { Parsed from Appkit.framework NSAlert.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -21,6 +21,7 @@ const
 { Types }
 { Types }
 type
 type
   NSAlertStyle = NSUInteger;
   NSAlertStyle = NSUInteger;
+  NSAlertStylePtr = ^NSAlertStyle;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -47,8 +48,10 @@ type
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSAlertDelegateProtocol = objcprotocol;
   NSAlert = objcclass;
   NSAlert = objcclass;
   NSAlertPointer = ^NSAlert;
   NSAlertPointer = ^NSAlert;
+  NSAlertPtr = NSAlertPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -59,42 +62,42 @@ type
 { NSAlert }
 { NSAlert }
   NSAlert = objcclass(NSObject)
   NSAlert = objcclass(NSObject)
   private
   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;
+    _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
   public
     class function alloc: NSAlert; message 'alloc';
     class function alloc: NSAlert; message 'alloc';
 
 
     class function alertWithError(error: NSError): NSAlert; message 'alertWithError:';
     class function alertWithError(error: NSError): NSAlert; message 'alertWithError:';
-    class function alertWithMessageText_defaultButton_alternateButton_otherButton_informativeTextWithFormat(message: NSString; defaultButton: NSString; alternateButton: NSString; otherButton: NSString; format: NSString): NSAlert; varargs; message 'alertWithMessageText:defaultButton:alternateButton:otherButton:informativeTextWithFormat:';
+    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 setMessageText(messageText_: NSString); message 'setMessageText:';
     procedure setInformativeText(informativeText_: NSString); message 'setInformativeText:';
     procedure setInformativeText(informativeText_: NSString); message 'setInformativeText:';
     function messageText: NSString; message 'messageText';
     function messageText: NSString; message 'messageText';
@@ -118,9 +121,20 @@ type
     function accessoryView: NSView; message 'accessoryView';
     function accessoryView: NSView; message 'accessoryView';
     procedure layout; message 'layout';
     procedure layout; message 'layout';
     function runModal: NSInteger; message 'runModal';
     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:';
     procedure beginSheetModalForWindow_modalDelegate_didEndSelector_contextInfo(window_: NSWindow; delegate_: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheetModalForWindow:modalDelegate:didEndSelector:contextInfo:';
     function window: id; message 'window';
     function window: id; message 'window';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSALERT_PAS_P}
+{$define NSALERT_PAS_P}
+  
+{ NSAlertDelegate Protocol }
+  NSAlertDelegateProtocol = objcprotocol
+    function alertShowHelp(alert: NSAlert): Boolean; message 'alertShowHelp:';
+  end; external name 'NSAlertDelegate';
+{$endif}
+{$endif}

+ 69 - 29
packages/cocoaint/src/appkit/NSAnimation.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSAnimation.h }
 { Parsed from Appkit.framework NSAnimation.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:08 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:07 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -22,8 +22,11 @@ const
 { Types }
 { Types }
 type
 type
   NSAnimationCurve = NSUInteger;
   NSAnimationCurve = NSUInteger;
+  NSAnimationCurvePtr = ^NSAnimationCurve;
   NSAnimationBlockingMode = NSUInteger;
   NSAnimationBlockingMode = NSUInteger;
+  NSAnimationBlockingModePtr = ^NSAnimationBlockingMode;
   NSAnimationProgress = single;
   NSAnimationProgress = single;
+  NSAnimationProgressPtr = ^NSAnimationProgress;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -48,18 +51,29 @@ type
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSAnimationTriggerOrderIn: NSString; external name '_NSAnimationTriggerOrderIn';
-  NSAnimationTriggerOrderOut: NSString; external name '_NSAnimationTriggerOrderOut';
+  NSAnimationProgressMarkNotification: NSString; cvar; external;
+  NSAnimationProgressMark: NSString; cvar; external;
+  NSViewAnimationTargetKey: NSString; cvar; external;
+  NSViewAnimationStartFrameKey: NSString; cvar; external;
+  NSViewAnimationEndFrameKey: NSString; cvar; external;
+  NSViewAnimationEffectKey: NSString; cvar; external;
+  NSViewAnimationFadeInEffect: NSString; cvar; external;
+  NSViewAnimationFadeOutEffect: NSString; cvar; external;
+  NSAnimationTriggerOrderIn: NSString; cvar; external;
+  NSAnimationTriggerOrderOut: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSAnimationDelegateProtocol = objcprotocol;
   NSAnimatablePropertyContainerProtocol = objcprotocol;
   NSAnimatablePropertyContainerProtocol = objcprotocol;
   NSAnimation = objcclass;
   NSAnimation = objcclass;
   NSAnimationPointer = ^NSAnimation;
   NSAnimationPointer = ^NSAnimation;
+  NSAnimationPtr = NSAnimationPointer;
   NSViewAnimation = objcclass;
   NSViewAnimation = objcclass;
   NSViewAnimationPointer = ^NSViewAnimation;
   NSViewAnimationPointer = ^NSViewAnimation;
+  NSViewAnimationPtr = NSViewAnimationPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -70,17 +84,20 @@ var
 { NSAnimation }
 { NSAnimation }
   NSAnimation = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSAnimation = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __duration: NSTimeInterval;
-    __currentProgress: NSAnimationProgress;
-    __framesPerSecond: single;
-    __delegate: id;
-    __timer: NSTimer;
-    __startTime: NSTimeInterval;
-    __progressMarks: NSMutableArray;
-    __startAnimation: NSAnimation;
-    __stopAnimation: NSAnimation;
-    __nextProgressMark: cint;
+    _duration: NSTimeInterval;
+    _currentProgress: NSAnimationProgress;
+    _framesPerSecond: single;
+    _delegate: id;
+    _timer: NSTimer;
+    _startTime: NSTimeInterval;
+    _progressMarks: NSMutableArray;
+    _startAnimation: NSAnimation;
+    _stopAnimation: NSAnimation;
+    _nextProgressMark: cint;
     __aFlags: bitpacked record
     __aFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSAnimation0: cuint);
+       1: (
         delegateAnimationShouldStart: 0..1;
         delegateAnimationShouldStart: 0..1;
         delegateAnimationDidStop: 0..1;
         delegateAnimationDidStop: 0..1;
         delegateAnimationDidEnd: 0..1;
         delegateAnimationDidEnd: 0..1;
@@ -89,16 +106,21 @@ var
         animating: 0..1;
         animating: 0..1;
         blocking: 0..1;
         blocking: 0..1;
         reserved: 0..((1 shl 25)-1);
         reserved: 0..((1 shl 25)-1);
+      );
       end;
       end;
     __aSettings: bitpacked record
     __aSettings: bitpacked record
-        animationCurve: 0..((1 shl 8)-1);
-        animationBlockingMode: 0..((1 shl 2)-1);
+      case byte of
+       0: (_anonbitfield_NSAnimation1: cuint);
+       1: (
+        _animationCurve: 0..((1 shl 8)-1);
+        _animationBlockingMode: 0..((1 shl 2)-1);
         reserved: 0..((1 shl 22)-1);
         reserved: 0..((1 shl 22)-1);
+      );
       end;
       end;
-    __reserved1: NSInteger;
-    __reserved2: NSInteger;
-    __reserved3: NSInteger;
-    __reserved4: NSInteger;
+    _scheduledRunLoop: NSRunLoop;
+    _reserved2: NSInteger;
+    _reserved3: NSInteger;
+    _reserved4: NSInteger;
     
     
   public
   public
     class function alloc: NSAnimation; message 'alloc';
     class function alloc: NSAnimation; message 'alloc';
@@ -129,24 +151,33 @@ var
     procedure clearStartAnimation; message 'clearStartAnimation';
     procedure clearStartAnimation; message 'clearStartAnimation';
     procedure clearStopAnimation; message 'clearStopAnimation';
     procedure clearStopAnimation; message 'clearStopAnimation';
     function runLoopModesForAnimating: NSArray; message 'runLoopModesForAnimating';
     function runLoopModesForAnimating: NSArray; message 'runLoopModesForAnimating';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 { NSViewAnimation }
 { NSViewAnimation }
   NSViewAnimation = objcclass(NSAnimation)
   NSViewAnimation = objcclass(NSAnimation)
   private
   private
-    __viewAnimations: NSArray;
-    __viewAnimationInfo: CFMutableDictionaryRef;
-    __windowAnimationInfo: CFMutableDictionaryRef;
-    __reserved4a: NSUInteger;
-    __reserved4b: NSUInteger;
-    __reserved4c: NSUInteger;
+    _viewAnimations: NSArray;
+    _viewAnimationInfo: CFMutableDictionaryRef;
+    _windowAnimationInfo: CFMutableDictionaryRef;
+    _reserved4a: NSUInteger;
+    _reserved4b: NSUInteger;
+    _reserved4c: NSUInteger;
     __vaFlags: bitpacked record
     __vaFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSAnimation2: cuint);
+       1: (
         reserved: 0..((1 shl 32)-1);
         reserved: 0..((1 shl 32)-1);
+      );
       end;
       end;
-    __reserved5: NSUInteger;
-    __reserved6: NSUInteger;
-    __reserved7: NSUInteger;
-    __reserved8: NSUInteger;
+    _reserved5: NSUInteger;
+    _reserved6: NSUInteger;
+    _reserved7: NSUInteger;
+    _reserved8: NSUInteger;
     
     
   public
   public
     class function alloc: NSViewAnimation; message 'alloc';
     class function alloc: NSViewAnimation; message 'alloc';
@@ -162,6 +193,15 @@ var
 {$ifndef NSANIMATION_PAS_P}
 {$ifndef NSANIMATION_PAS_P}
 {$define NSANIMATION_PAS_P}
 {$define NSANIMATION_PAS_P}
   
   
+{ NSAnimationDelegate Protocol }
+  NSAnimationDelegateProtocol = objcprotocol
+    function animationShouldStart(animation: NSAnimation): Boolean; message 'animationShouldStart:';
+    procedure animationDidStop(animation: NSAnimation); message 'animationDidStop:';
+    procedure animationDidEnd(animation: NSAnimation); message 'animationDidEnd:';
+    function animation_valueForProgress(animation: NSAnimation; progress: NSAnimationProgress): single; message 'animation:valueForProgress:';
+    procedure animation_didReachProgressMark(animation: NSAnimation; progress: NSAnimationProgress); message 'animation:didReachProgressMark:';
+  end; external name 'NSAnimationDelegate';
+  
 { NSAnimatablePropertyContainer Protocol }
 { NSAnimatablePropertyContainer Protocol }
   NSAnimatablePropertyContainerProtocol = objcprotocol
   NSAnimatablePropertyContainerProtocol = objcprotocol
     function animator: id; message 'animator';
     function animator: id; message 'animator';

+ 3 - 2
packages/cocoaint/src/appkit/NSAnimationContext.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSAnimationContext.h }
 { Parsed from Appkit.framework NSAnimationContext.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSAnimationContext = objcclass;
   NSAnimationContext = objcclass;
   NSAnimationContextPointer = ^NSAnimationContext;
   NSAnimationContextPointer = ^NSAnimationContext;
+  NSAnimationContextPtr = NSAnimationContextPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,7 +44,7 @@
 { NSAnimationContext }
 { NSAnimationContext }
   NSAnimationContext = objcclass(NSObject)
   NSAnimationContext = objcclass(NSObject)
   private
   private
-    __duration: NSTimeInterval;
+    _duration: NSTimeInterval;
         _reserved: array[0..4] of id;
         _reserved: array[0..4] of id;
     
     
   public
   public

+ 17 - 1
packages/cocoaint/src/appkit/NSAppleScriptExtensions.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSAppleScriptExtensions.h }
 { Parsed from Appkit.framework NSAppleScriptExtensions.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,3 +29,19 @@
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+
+{$ifdef FORWARD}
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAPPLESCRIPTEXTENSIONS_PAS_C}
+{$define NSAPPLESCRIPTEXTENSIONS_PAS_C}
+
+{ NSExtensionsCategory }
+  NSExtensionsCategory = objccategory(NSAppleScript)
+    function richTextSource: NSAttributedString; message 'richTextSource';
+  end; external;
+
+{$endif}
+{$endif}

+ 173 - 65
packages/cocoaint/src/appkit/NSApplication.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSApplication.h }
 { Parsed from Appkit.framework NSApplication.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -19,12 +19,37 @@ const
   NSAppKitVersionNumber10_3_7 = 743.33;
   NSAppKitVersionNumber10_3_7 = 743.33;
   NSAppKitVersionNumber10_3_9 = 743.36;
   NSAppKitVersionNumber10_3_9 = 743.36;
   NSAppKitVersionNumber10_4 = 824;
   NSAppKitVersionNumber10_4 = 824;
+  NSAppKitVersionNumber10_4_1 = 824.1;
+  NSAppKitVersionNumber10_4_3 = 824.23;
+  NSAppKitVersionNumber10_4_4 = 824.33;
+  NSAppKitVersionNumber10_4_7 = 824.41;
+  NSAppKitVersionNumber10_5 = 949;
+  NSAppKitVersionNumber10_5_2 = 949.27;
+  NSAppKitVersionNumber10_5_3 = 949.33;
 
 
 { Constants }
 { Constants }
 
 
+const
+  NSRunStoppedResponse = -1000;
+  NSRunAbortedResponse = -1001;
+  NSRunContinuesResponse = -1002;
+
 const
 const
   NSUpdateWindowsRunLoopOrdering = 500000;
   NSUpdateWindowsRunLoopOrdering = 500000;
 
 
+const
+  NSApplicationPresentationDefault = 0;
+  NSApplicationPresentationAutoHideDock = 1 shl  0;
+  NSApplicationPresentationHideDock = 1 shl  1;
+  NSApplicationPresentationAutoHideMenuBar = 1 shl  2;
+  NSApplicationPresentationHideMenuBar = 1 shl  3;
+  NSApplicationPresentationDisableAppleMenu = 1 shl  4;
+  NSApplicationPresentationDisableProcessSwitching = 1 shl  5;
+  NSApplicationPresentationDisableForceQuit = 1 shl  6;
+  NSApplicationPresentationDisableSessionTermination = 1 shl  7;
+  NSApplicationPresentationDisableHideApplication = 1 shl  8;
+  NSApplicationPresentationDisableMenuBarTransparency = 1 shl  9;
+
 const
 const
   NSCriticalRequest = 0;
   NSCriticalRequest = 0;
   NSInformationalRequest = 10;
   NSInformationalRequest = 10;
@@ -45,15 +70,29 @@ const
   NSPrintingFailure = 3;
   NSPrintingFailure = 3;
   NSPrintingReplyLater = 2;
   NSPrintingReplyLater = 2;
 
 
+const
+  NSUserInterfaceLayoutDirectionLeftToRight = 0;
+  NSUserInterfaceLayoutDirectionRightToLeft = 1;
+
 { Types }
 { Types }
 type
 type
+  NSApplicationPresentationOptions = NSUInteger;
+  NSApplicationPresentationOptionsPtr = ^NSApplicationPresentationOptions;
   NSModalSession = Pointer;
   NSModalSession = Pointer;
-  NSThreadPrivate = Pointer;
+  NSModalSessionPtr = ^NSModalSession;
+  NSThreadPrivate = record end;
   _NSThreadPrivate = NSThreadPrivate;
   _NSThreadPrivate = NSThreadPrivate;
+  _NSThreadPrivatePtr = ^_NSThreadPrivate;
   NSRequestUserAttentionType = NSUInteger;
   NSRequestUserAttentionType = NSUInteger;
+  NSRequestUserAttentionTypePtr = ^NSRequestUserAttentionType;
   NSApplicationDelegateReply = NSUInteger;
   NSApplicationDelegateReply = NSUInteger;
+  NSApplicationDelegateReplyPtr = ^NSApplicationDelegateReply;
   NSApplicationTerminateReply = NSUInteger;
   NSApplicationTerminateReply = NSUInteger;
+  NSApplicationTerminateReplyPtr = ^NSApplicationTerminateReply;
   NSApplicationPrintReply = NSUInteger;
   NSApplicationPrintReply = NSUInteger;
+  NSApplicationPrintReplyPtr = ^NSApplicationPrintReply;
+  NSUserInterfaceLayoutDirection = NSInteger;
+  NSUserInterfaceLayoutDirectionPtr = ^NSUserInterfaceLayoutDirection;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -70,14 +109,14 @@ type
 {$define NSAPPLICATION_PAS_F}
 {$define NSAPPLICATION_PAS_F}
 
 
 { Functions }
 { Functions }
-function NSApplicationMain(argc: cint; argvPointer: Pointer {array of char}): cint; cdecl; external name 'NSApplicationMain';
-function NSApplicationLoad: Boolean; cdecl; external name 'NSApplicationLoad';
-function NSShowsServicesMenuItem(Pointer_: NSString): Boolean; cdecl; external name 'NSShowsServicesMenuItem';
-function NSSetShowsServicesMenuItem(Pointer_: NSString; enabled: Boolean): NSInteger; cdecl; external name 'NSSetShowsServicesMenuItem';
-procedure NSUpdateDynamicServices; cdecl; external name 'NSUpdateDynamicServices';
-function NSPerformService(itemNamePointer: NSString; pboardPointer: NSPasteboard): Boolean; cdecl; external name 'NSPerformService';
-procedure NSRegisterServicesProvider(provider: id; namePointer: NSString); cdecl; external name 'NSRegisterServicesProvider';
-procedure NSUnregisterServicesProvider(namePointer: NSString); cdecl; external name 'NSUnregisterServicesProvider';
+function NSApplicationMain(argc: cint; argv: PPChar {array of PChar}): cint; cdecl; external;
+function NSApplicationLoad: Boolean; cdecl; external;
+function NSShowsServicesMenuItem(itemName: NSString): Boolean; cdecl; external;
+function NSSetShowsServicesMenuItem(itemName: NSString; enabled: Boolean): NSInteger; cdecl; external;
+procedure NSUpdateDynamicServices; cdecl; external;
+function NSPerformService(itemName: NSString; pboard: NSPasteboard): Boolean; cdecl; external;
+procedure NSRegisterServicesProvider(provider: id; name: NSString); cdecl; external;
+procedure NSUnregisterServicesProvider(name: NSString); cdecl; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -88,34 +127,36 @@ procedure NSUnregisterServicesProvider(namePointer: NSString); cdecl; external n
 
 
 { External symbols }
 { External symbols }
 var
 var
-  NSAppKitVersionNumber: double; external name '_NSAppKitVersionNumber';
-  NSApp: id; external name '_NSApp';
+  NSAppKitVersionNumber: double; cvar; external;
+  NSApp: id; cvar; external;
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSModalPanelRunLoopMode: NSString; external name '_NSModalPanelRunLoopMode';
-  NSEventTrackingRunLoopMode: NSString; external name '_NSEventTrackingRunLoopMode';
-  NSApplicationDidBecomeActiveNotification: NSString; external name '_NSApplicationDidBecomeActiveNotification';
-  NSApplicationDidHideNotification: NSString; external name '_NSApplicationDidHideNotification';
-  NSApplicationDidFinishLaunchingNotification: NSString; external name '_NSApplicationDidFinishLaunchingNotification';
-  NSApplicationDidResignActiveNotification: NSString; external name '_NSApplicationDidResignActiveNotification';
-  NSApplicationDidUnhideNotification: NSString; external name '_NSApplicationDidUnhideNotification';
-  NSApplicationDidUpdateNotification: NSString; external name '_NSApplicationDidUpdateNotification';
-  NSApplicationWillBecomeActiveNotification: NSString; external name '_NSApplicationWillBecomeActiveNotification';
-  NSApplicationWillHideNotification: NSString; external name '_NSApplicationWillHideNotification';
-  NSApplicationWillFinishLaunchingNotification: NSString; external name '_NSApplicationWillFinishLaunchingNotification';
-  NSApplicationWillResignActiveNotification: NSString; external name '_NSApplicationWillResignActiveNotification';
-  NSApplicationWillUnhideNotification: NSString; external name '_NSApplicationWillUnhideNotification';
-  NSApplicationWillUpdateNotification: NSString; external name '_NSApplicationWillUpdateNotification';
-  NSApplicationWillTerminateNotification: NSString; external name '_NSApplicationWillTerminateNotification';
-  NSApplicationDidChangeScreenParametersNotification: NSString; external name '_NSApplicationDidChangeScreenParametersNotification';
+  NSModalPanelRunLoopMode: NSString; cvar; external;
+  NSEventTrackingRunLoopMode: NSString; cvar; external;
+  NSApplicationDidBecomeActiveNotification: NSString; cvar; external;
+  NSApplicationDidHideNotification: NSString; cvar; external;
+  NSApplicationDidFinishLaunchingNotification: NSString; cvar; external;
+  NSApplicationDidResignActiveNotification: NSString; cvar; external;
+  NSApplicationDidUnhideNotification: NSString; cvar; external;
+  NSApplicationDidUpdateNotification: NSString; cvar; external;
+  NSApplicationWillBecomeActiveNotification: NSString; cvar; external;
+  NSApplicationWillHideNotification: NSString; cvar; external;
+  NSApplicationWillFinishLaunchingNotification: NSString; cvar; external;
+  NSApplicationWillResignActiveNotification: NSString; cvar; external;
+  NSApplicationWillUnhideNotification: NSString; cvar; external;
+  NSApplicationWillUpdateNotification: NSString; cvar; external;
+  NSApplicationWillTerminateNotification: NSString; cvar; external;
+  NSApplicationDidChangeScreenParametersNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSApplicationDelegateProtocol = objcprotocol;
   NSApplication = objcclass;
   NSApplication = objcclass;
   NSApplicationPointer = ^NSApplication;
   NSApplicationPointer = ^NSApplication;
+  NSApplicationPtr = NSApplicationPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -126,19 +167,22 @@ var
 { NSApplication }
 { NSApplication }
   NSApplication = objcclass(NSResponder, NSUserInterfaceValidationsProtocol)
   NSApplication = objcclass(NSResponder, NSUserInterfaceValidationsProtocol)
   private
   private
-    __currentEvent: NSEvent;
-    __windowList: id;
-    __keyWindow: id;
-    __mainWindow: id;
-    __delegate: id;
-    __hiddenList: id;
-    __hiddenCount: cint;
-    __context: NSInteger;
-    __appleEventSuspensionID: Pointer;
-    __previousKeyWindow: id; {garbage collector: __weak }
-    __unusedApp: cshort;
-    __running: cshort;
+    _currentEvent: NSEvent;
+    _windowList: id;
+    _keyWindow: id;
+    _mainWindow: id;
+    _delegate: id;
+    _hiddenList: idPtr;
+    _hiddenCount: cint;
+    _context: NSInteger;
+    _appleEventSuspensionID: Pointer;
+    _previousKeyWindow: id; {garbage collector: __weak }
+    _unusedApp: cshort;
+    _running: cshort;
     __appFlags: bitpacked record
     __appFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSApplication0: cuint);
+       1: (
         _hidden: 0..1;
         _hidden: 0..1;
         _RESERVED1: 0..1;
         _RESERVED1: 0..1;
         _active: 0..1;
         _active: 0..1;
@@ -164,13 +208,16 @@ var
         _hiddenOnLaunch: 0..1;
         _hiddenOnLaunch: 0..1;
         _openStatus: 0..((1 shl 2)-1);
         _openStatus: 0..((1 shl 2)-1);
         _batchOrdering: 0..1;
         _batchOrdering: 0..1;
-        _reserved: 0..((1 shl 6)-1);
+        _waitingForTerminationReply: 0..1;
+        _windowMoveDisabled: 0..1;
+        _reserved: 0..((1 shl 4)-1);
+      );
       end;
       end;
-    __mainMenu: id;
-    __appIcon: id;
-    __nameTable: id;
-    __eventDelegate: id;
-    __threadingSupport: _NSThreadPrivate;
+    _mainMenu: id;
+    _appIcon: id;
+    _nameTable: id;
+    _eventDelegate: id;
+    _threadingSupport: _NSThreadPrivatePtr;
     
     
   public
   public
     class function alloc: NSApplication; message 'alloc';
     class function alloc: NSApplication; message 'alloc';
@@ -209,8 +256,6 @@ var
     procedure beginSheet_modalForWindow_modalDelegate_didEndSelector_contextInfo(sheet: NSWindow; docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheet:modalForWindow:modalDelegate:didEndSelector:contextInfo:';
     procedure beginSheet_modalForWindow_modalDelegate_didEndSelector_contextInfo(sheet: NSWindow; docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheet:modalForWindow:modalDelegate:didEndSelector:contextInfo:';
     procedure endSheet(sheet: NSWindow); message 'endSheet:';
     procedure endSheet(sheet: NSWindow); message 'endSheet:';
     procedure endSheet_returnCode(sheet: NSWindow; returnCode: NSInteger); message 'endSheet:returnCode:';
     procedure endSheet_returnCode(sheet: NSWindow; returnCode: NSInteger); message 'endSheet:returnCode:';
-    function runModalForWindow_relativeToWindow(theWindow: NSWindow; docWindow: NSWindow): NSInteger; message 'runModalForWindow:relativeToWindow:';
-    function beginModalSessionForWindow_relativeToWindow(theWindow: NSWindow; docWindow: NSWindow): NSModalSession; message 'beginModalSessionForWindow:relativeToWindow:';
     function nextEventMatchingMask_untilDate_inMode_dequeue(mask: NSUInteger; expiration: NSDate; mode: NSString; deqFlag: Boolean): NSEvent; message 'nextEventMatchingMask:untilDate:inMode:dequeue:';
     function nextEventMatchingMask_untilDate_inMode_dequeue(mask: NSUInteger; expiration: NSDate; mode: NSString; deqFlag: Boolean): NSEvent; message 'nextEventMatchingMask:untilDate:inMode:dequeue:';
     procedure discardEventsMatchingMask_beforeEvent(mask: NSUInteger; lastEvent: NSEvent); message 'discardEventsMatchingMask:beforeEvent:';
     procedure discardEventsMatchingMask_beforeEvent(mask: NSUInteger; lastEvent: NSEvent); message 'discardEventsMatchingMask:beforeEvent:';
     procedure postEvent_atStart(event: NSEvent; flag: Boolean); message 'postEvent:atStart:';
     procedure postEvent_atStart(event: NSEvent; flag: Boolean); message 'postEvent:atStart:';
@@ -223,8 +268,12 @@ var
     procedure updateWindows; message 'updateWindows';
     procedure updateWindows; message 'updateWindows';
     procedure setMainMenu(aMenu: NSMenu); message 'setMainMenu:';
     procedure setMainMenu(aMenu: NSMenu); message 'setMainMenu:';
     function mainMenu: NSMenu; message 'mainMenu';
     function mainMenu: NSMenu; message 'mainMenu';
+    procedure setHelpMenu(helpMenu: NSMenu); message 'setHelpMenu:';
+    function helpMenu: NSMenu; message 'helpMenu';
     procedure setApplicationIconImage(image: NSImage); message 'setApplicationIconImage:';
     procedure setApplicationIconImage(image: NSImage); message 'setApplicationIconImage:';
     function applicationIconImage: NSImage; message 'applicationIconImage';
     function applicationIconImage: NSImage; message 'applicationIconImage';
+    function activationPolicy: NSApplicationActivationPolicy; message 'activationPolicy';
+    function setActivationPolicy(activationPolicy_: NSApplicationActivationPolicy): Boolean; message 'setActivationPolicy:';
     function dockTile: NSDockTile; message 'dockTile';
     function dockTile: NSDockTile; message 'dockTile';
     function sendAction_to_from(theAction: SEL; theTarget: id; sender: id): Boolean; message 'sendAction:to:from:';
     function sendAction_to_from(theAction: SEL; theTarget: id; sender: id): Boolean; message 'sendAction:to:from:';
     function targetForAction(theAction: SEL): id; message 'targetForAction:';
     function targetForAction(theAction: SEL): id; message 'targetForAction:';
@@ -236,8 +285,16 @@ var
     procedure replyToApplicationShouldTerminate(shouldTerminate: Boolean); message 'replyToApplicationShouldTerminate:';
     procedure replyToApplicationShouldTerminate(shouldTerminate: Boolean); message 'replyToApplicationShouldTerminate:';
     procedure replyToOpenOrPrint(reply: NSApplicationDelegateReply); message 'replyToOpenOrPrint:';
     procedure replyToOpenOrPrint(reply: NSApplicationDelegateReply); message 'replyToOpenOrPrint:';
     procedure orderFrontCharacterPalette(sender: id); message 'orderFrontCharacterPalette:';
     procedure orderFrontCharacterPalette(sender: id); message 'orderFrontCharacterPalette:';
+    function presentationOptions: NSApplicationPresentationOptions; message 'presentationOptions';
+    procedure setPresentationOptions(newOptions: NSApplicationPresentationOptions); message 'setPresentationOptions:';
+    function currentSystemPresentationOptions: NSApplicationPresentationOptions; message 'currentSystemPresentationOptions';
 
 
-    { Category: NSWindowsMenu }
+    { Adopted Protocols }
+    function validateUserInterfaceItem(anItem: id): Boolean;
+  end; external;
+
+{ NSWindowsMenuCategory }
+  NSWindowsMenuCategory = objccategory(NSApplication)
     procedure setWindowsMenu(aMenu: NSMenu); message 'setWindowsMenu:';
     procedure setWindowsMenu(aMenu: NSMenu); message 'setWindowsMenu:';
     function windowsMenu: NSMenu; message 'windowsMenu';
     function windowsMenu: NSMenu; message 'windowsMenu';
     procedure arrangeInFront(sender: id); message 'arrangeInFront:';
     procedure arrangeInFront(sender: id); message 'arrangeInFront:';
@@ -246,34 +303,85 @@ var
     procedure changeWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: Boolean); message 'changeWindowsItem:title:filename:';
     procedure changeWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: Boolean); message 'changeWindowsItem:title:filename:';
     procedure updateWindowsItem(win: NSWindow); message 'updateWindowsItem:';
     procedure updateWindowsItem(win: NSWindow); message 'updateWindowsItem:';
     procedure miniaturizeAll(sender: id); message 'miniaturizeAll:';
     procedure miniaturizeAll(sender: id); message 'miniaturizeAll:';
+  end; external;
+
+{ NSFullKeyboardAccessCategory }
+  NSFullKeyboardAccessCategory = objccategory(NSApplication)
+    function isFullKeyboardAccessEnabled: Boolean; message 'isFullKeyboardAccessEnabled';
+  end; external;
 
 
-    { Category: NSServicesMenu }
+{ NSServicesMenuCategory }
+  NSServicesMenuCategory = objccategory(NSApplication)
     procedure setServicesMenu(aMenu: NSMenu); message 'setServicesMenu:';
     procedure setServicesMenu(aMenu: NSMenu); message 'setServicesMenu:';
     function servicesMenu: NSMenu; message 'servicesMenu';
     function servicesMenu: NSMenu; message 'servicesMenu';
     procedure registerServicesMenuSendTypes_returnTypes(sendTypes: NSArray; returnTypes: NSArray); message 'registerServicesMenuSendTypes:returnTypes:';
     procedure registerServicesMenuSendTypes_returnTypes(sendTypes: NSArray; returnTypes: NSArray); message 'registerServicesMenuSendTypes:returnTypes:';
+  end; external;
+
+{ NSServicesRequestsCategory }
+  NSServicesRequestsCategory = objccategory(NSObject)
+    function writeSelectionToPasteboard_types(pboard: NSPasteboard; types: NSArray): Boolean; message 'writeSelectionToPasteboard:types:';
+    function readSelectionFromPasteboard(pboard: NSPasteboard): Boolean; message 'readSelectionFromPasteboard:';
+  end; external;
 
 
-    { Category: NSServicesHandling }
+{ NSServicesHandlingCategory }
+  NSServicesHandlingCategory = objccategory(NSApplication)
     procedure setServicesProvider(provider: id); message 'setServicesProvider:';
     procedure setServicesProvider(provider: id); message 'setServicesProvider:';
     function servicesProvider: id; message 'servicesProvider';
     function servicesProvider: id; message 'servicesProvider';
+  end; external;
 
 
-    { Category: NSStandardAboutPanel }
+{ NSStandardAboutPanelCategory }
+  NSStandardAboutPanelCategory = objccategory(NSApplication)
     procedure orderFrontStandardAboutPanel(sender: id); message 'orderFrontStandardAboutPanel:';
     procedure orderFrontStandardAboutPanel(sender: id); message 'orderFrontStandardAboutPanel:';
     procedure orderFrontStandardAboutPanelWithOptions(optionsDictionary: NSDictionary); message 'orderFrontStandardAboutPanelWithOptions:';
     procedure orderFrontStandardAboutPanelWithOptions(optionsDictionary: NSDictionary); message 'orderFrontStandardAboutPanelWithOptions:';
+  end; external;
 
 
-    { Category: NSApplicationHelpExtension }
-    procedure activateContextHelpMode(sender: id); message 'activateContextHelpMode:';
-    procedure showHelp(sender: id); message 'showHelp:';
-
-    { Category: NSPageLayoutPanel }
-    procedure runPageLayout(sender: id); message 'runPageLayout:';
-
-    { Category: NSColorPanel }
-    procedure orderFrontColorPanel(sender: id); message 'orderFrontColorPanel:';
-
-    { Category: NSScripting }
-    function orderedDocuments: NSArray; message 'orderedDocuments';
-    function orderedWindows: NSArray; message 'orderedWindows';
+{ NSApplicationLayoutDirectionCategory }
+  NSApplicationLayoutDirectionCategory = objccategory(NSApplication)
+    function userInterfaceLayoutDirection: NSUserInterfaceLayoutDirection; message 'userInterfaceLayoutDirection';
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSApplicationCategory }
+  NSDeprecated_NSApplicationCategory = objccategory(NSApplication)
+    function runModalForWindow_relativeToWindow(theWindow: NSWindow; docWindow: NSWindow): NSInteger; message 'runModalForWindow:relativeToWindow:'; deprecated 'in Mac OS X 10 and later';
+    function beginModalSessionForWindow_relativeToWindow(theWindow: NSWindow; docWindow: NSWindow): NSModalSession; message 'beginModalSessionForWindow:relativeToWindow:'; deprecated 'in Mac OS X 10 and later';
+    procedure application_printFiles(sender: NSApplication; filenames: NSArray); message 'application:printFiles:';
+  end; external name 'NSDeprecated';
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSAPPLICATION_PAS_P}
+{$define NSAPPLICATION_PAS_P}
+  
+{ NSApplicationDelegate Protocol }
+  NSApplicationDelegateProtocol = objcprotocol
+    function applicationShouldTerminate(sender: NSApplication): NSApplicationTerminateReply; message 'applicationShouldTerminate:';
+    function application_openFile(sender: NSApplication; filename: NSString): Boolean; message 'application:openFile:';
+    procedure application_openFiles(sender: NSApplication; filenames: NSArray); message 'application:openFiles:';
+    function application_openTempFile(sender: NSApplication; filename: NSString): Boolean; message 'application:openTempFile:';
+    function applicationShouldOpenUntitledFile(sender: NSApplication): Boolean; message 'applicationShouldOpenUntitledFile:';
+    function applicationOpenUntitledFile(sender: NSApplication): Boolean; message 'applicationOpenUntitledFile:';
+    function application_openFileWithoutUI(sender: id; filename: NSString): Boolean; message 'application:openFileWithoutUI:';
+    function application_printFile(sender: NSApplication; filename: NSString): Boolean; message 'application:printFile:';
+    function application_printFiles_withSettings_showPrintPanels(application: NSApplication; fileNames: NSArray; printSettings: NSDictionary; showPrintPanels: Boolean): NSApplicationPrintReply; message 'application:printFiles:withSettings:showPrintPanels:';
+    function applicationShouldTerminateAfterLastWindowClosed(sender: NSApplication): Boolean; message 'applicationShouldTerminateAfterLastWindowClosed:';
+    function applicationShouldHandleReopen_hasVisibleWindows(sender: NSApplication; flag: Boolean): Boolean; message 'applicationShouldHandleReopen:hasVisibleWindows:';
+    function applicationDockMenu(sender: NSApplication): NSMenu; message 'applicationDockMenu:';
+    function application_willPresentError(application: NSApplication; error: NSError): NSError; message 'application:willPresentError:';
+    procedure applicationWillFinishLaunching(notification: NSNotification); message 'applicationWillFinishLaunching:';
+    procedure applicationDidFinishLaunching(notification: NSNotification); message 'applicationDidFinishLaunching:';
+    procedure applicationWillHide(notification: NSNotification); message 'applicationWillHide:';
+    procedure applicationDidHide(notification: NSNotification); message 'applicationDidHide:';
+    procedure applicationWillUnhide(notification: NSNotification); message 'applicationWillUnhide:';
+    procedure applicationDidUnhide(notification: NSNotification); message 'applicationDidUnhide:';
+    procedure applicationWillBecomeActive(notification: NSNotification); message 'applicationWillBecomeActive:';
+    procedure applicationDidBecomeActive(notification: NSNotification); message 'applicationDidBecomeActive:';
+    procedure applicationWillResignActive(notification: NSNotification); message 'applicationWillResignActive:';
+    procedure applicationDidResignActive(notification: NSNotification); message 'applicationDidResignActive:';
+    procedure applicationWillUpdate(notification: NSNotification); message 'applicationWillUpdate:';
+    procedure applicationDidUpdate(notification: NSNotification); message 'applicationDidUpdate:';
+    procedure applicationWillTerminate(notification: NSNotification); message 'applicationWillTerminate:';
+    procedure applicationDidChangeScreenParameters(notification: NSNotification); message 'applicationDidChangeScreenParameters:';
+  end; external name 'NSApplicationDelegate';
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 23 - 1
packages/cocoaint/src/appkit/NSApplicationScripting.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSApplicationScripting.h }
 { Parsed from Appkit.framework NSApplicationScripting.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,3 +29,25 @@
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+
+{$ifdef FORWARD}
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSAPPLICATIONSCRIPTING_PAS_C}
+{$define NSAPPLICATIONSCRIPTING_PAS_C}
+
+{ NSScripting_NSApplicationCategory }
+  NSScripting_NSApplicationCategory = objccategory(NSApplication)
+    function orderedDocuments: NSArray; message 'orderedDocuments';
+    function orderedWindows: NSArray; message 'orderedWindows';
+  end; external name 'NSScripting';
+
+{ NSApplicationScriptingDelegationCategory }
+  NSApplicationScriptingDelegationCategory = objccategory(NSObject)
+    function application_delegateHandlesKey(sender: NSApplication; key: NSString): Boolean; message 'application:delegateHandlesKey:';
+  end; external;
+
+{$endif}
+{$endif}

+ 15 - 10
packages/cocoaint/src/appkit/NSArrayController.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSArrayController.h }
 { Parsed from Appkit.framework NSArrayController.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSArrayController = objcclass;
   NSArrayController = objcclass;
   NSArrayControllerPointer = ^NSArrayController;
   NSArrayControllerPointer = ^NSArrayController;
+  NSArrayControllerPtr = NSArrayControllerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,10 +44,13 @@
 { NSArrayController }
 { NSArrayController }
   NSArrayController = objcclass(NSObjectController)
   NSArrayController = objcclass(NSObjectController)
   private
   private
-    __reserved4: Pointer;
-    __rearrangementExtensions: id;
-    __temporaryWorkObjects: NSMutableArray;
+    _reserved4: Pointer;
+    _rearrangementExtensions: id;
+    _temporaryWorkObjects: NSMutableArray;
     __arrayControllerFlags: bitpacked record
     __arrayControllerFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSArrayController0: cuint);
+       1: (
         _avoidsEmptySelection: 0..1;
         _avoidsEmptySelection: 0..1;
         _preservesSelection: 0..1;
         _preservesSelection: 0..1;
         _selectsInsertedObjects: 0..1;
         _selectsInsertedObjects: 0..1;
@@ -63,13 +67,14 @@
         _skipSortingAfterFetch: 0..1;
         _skipSortingAfterFetch: 0..1;
         _automaticallyRearrangesObjects: 0..1;
         _automaticallyRearrangesObjects: 0..1;
         _reservedArrayController: 0..((1 shl 17)-1);
         _reservedArrayController: 0..((1 shl 17)-1);
+      );
       end;
       end;
-    __observedIndexHint: NSUInteger;
-    __selectionIndexes: NSMutableIndexSet;
-    __objects: NSMutableArray;
-    __cachedSelectedIndexes: NSIndexSet;
-    __cachedSelectedObjects: NSArray;
-    __arrangedObjects: NSArray;
+    _observedIndexHint: NSUInteger;
+    _selectionIndexes: NSMutableIndexSet;
+    _objects: NSMutableArray;
+    _cachedSelectedIndexes: NSIndexSet;
+    _cachedSelectedObjects: NSArray;
+    _arrangedObjects: NSArray;
     
     
   public
   public
     class function alloc: NSArrayController; message 'alloc';
     class function alloc: NSArrayController; message 'alloc';

+ 127 - 119
packages/cocoaint/src/appkit/NSAttributedString.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSAttributedString.h }
 { Parsed from Appkit.framework NSAttributedString.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:06 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -22,8 +22,8 @@ const
   NSUnderlinePatternDashDotDot = $0400;
   NSUnderlinePatternDashDotDot = $0400;
 
 
 const
 const
-  NSSpellingStateSpellingFlag = 1  shl  0;
-  NSSpellingStateGrammarFlag = 1  shl  1;
+  NSSpellingStateSpellingFlag = 1 shl 0;
+  NSSpellingStateGrammarFlag = 1 shl 1;
 
 
 const
 const
   NSNoUnderlineStyle = 0;
   NSNoUnderlineStyle = 0;
@@ -52,84 +52,89 @@ const
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSFontAttributeName: NSString; external name '_NSFontAttributeName';
-  NSParagraphStyleAttributeName: NSString; external name '_NSParagraphStyleAttributeName';
-  NSForegroundColorAttributeName: NSString; external name '_NSForegroundColorAttributeName';
-  NSUnderlineStyleAttributeName: NSString; external name '_NSUnderlineStyleAttributeName';
-  NSSuperscriptAttributeName: NSString; external name '_NSSuperscriptAttributeName';
-  NSBackgroundColorAttributeName: NSString; external name '_NSBackgroundColorAttributeName';
-  NSAttachmentAttributeName: NSString; external name '_NSAttachmentAttributeName';
-  NSLigatureAttributeName: NSString; external name '_NSLigatureAttributeName';
-  NSBaselineOffsetAttributeName: NSString; external name '_NSBaselineOffsetAttributeName';
-  NSKernAttributeName: NSString; external name '_NSKernAttributeName';
-  NSLinkAttributeName: NSString; external name '_NSLinkAttributeName';
-  NSStrokeWidthAttributeName: NSString; external name '_NSStrokeWidthAttributeName';
-  NSStrokeColorAttributeName: NSString; external name '_NSStrokeColorAttributeName';
-  NSUnderlineColorAttributeName: NSString; external name '_NSUnderlineColorAttributeName';
-  NSStrikethroughStyleAttributeName: NSString; external name '_NSStrikethroughStyleAttributeName';
-  NSStrikethroughColorAttributeName: NSString; external name '_NSStrikethroughColorAttributeName';
-  NSShadowAttributeName: NSString; external name '_NSShadowAttributeName';
-  NSObliquenessAttributeName: NSString; external name '_NSObliquenessAttributeName';
-  NSExpansionAttributeName: NSString; external name '_NSExpansionAttributeName';
-  NSCursorAttributeName: NSString; external name '_NSCursorAttributeName';
-  NSToolTipAttributeName: NSString; external name '_NSToolTipAttributeName';
-  NSCharacterShapeAttributeName: NSString; external name '_NSCharacterShapeAttributeName';
-  NSGlyphInfoAttributeName: NSString; external name '_NSGlyphInfoAttributeName';
-  NSMarkedClauseSegmentAttributeName: NSString; external name '_NSMarkedClauseSegmentAttributeName';
-  NSSpellingStateAttributeName: NSString; external name '_NSSpellingStateAttributeName';
-  NSPlainTextDocumentType: NSString; external name '_NSPlainTextDocumentType';
-  NSRTFTextDocumentType: NSString; external name '_NSRTFTextDocumentType';
-  NSRTFDTextDocumentType: NSString; external name '_NSRTFDTextDocumentType';
-  NSMacSimpleTextDocumentType: NSString; external name '_NSMacSimpleTextDocumentType';
-  NSHTMLTextDocumentType: NSString; external name '_NSHTMLTextDocumentType';
-  NSDocFormatTextDocumentType: NSString; external name '_NSDocFormatTextDocumentType';
-  NSWordMLTextDocumentType: NSString; external name '_NSWordMLTextDocumentType';
-  NSWebArchiveTextDocumentType: NSString; external name '_NSWebArchiveTextDocumentType';
-  NSOfficeOpenXMLTextDocumentType: NSString; external name '_NSOfficeOpenXMLTextDocumentType';
-  NSOpenDocumentTextDocumentType: NSString; external name '_NSOpenDocumentTextDocumentType';
-  NSPaperSizeDocumentAttribute: NSString; external name '_NSPaperSizeDocumentAttribute';
-  NSLeftMarginDocumentAttribute: NSString; external name '_NSLeftMarginDocumentAttribute';
-  NSRightMarginDocumentAttribute: NSString; external name '_NSRightMarginDocumentAttribute';
-  NSTopMarginDocumentAttribute: NSString; external name '_NSTopMarginDocumentAttribute';
-  NSBottomMarginDocumentAttribute: NSString; external name '_NSBottomMarginDocumentAttribute';
-  NSViewSizeDocumentAttribute: NSString; external name '_NSViewSizeDocumentAttribute';
-  NSViewZoomDocumentAttribute: NSString; external name '_NSViewZoomDocumentAttribute';
-  NSViewModeDocumentAttribute: NSString; external name '_NSViewModeDocumentAttribute';
-  NSDocumentTypeDocumentAttribute: NSString; external name '_NSDocumentTypeDocumentAttribute';
-  NSReadOnlyDocumentAttribute: NSString; external name '_NSReadOnlyDocumentAttribute';
-  NSConvertedDocumentAttribute: NSString; external name '_NSConvertedDocumentAttribute';
-  NSCocoaVersionDocumentAttribute: NSString; external name '_NSCocoaVersionDocumentAttribute';
-  NSBackgroundColorDocumentAttribute: NSString; external name '_NSBackgroundColorDocumentAttribute';
-  NSHyphenationFactorDocumentAttribute: NSString; external name '_NSHyphenationFactorDocumentAttribute';
-  NSDefaultTabIntervalDocumentAttribute: NSString; external name '_NSDefaultTabIntervalDocumentAttribute';
-  NSCharacterEncodingDocumentAttribute: NSString; external name '_NSCharacterEncodingDocumentAttribute';
-  NSTitleDocumentAttribute: NSString; external name '_NSTitleDocumentAttribute';
-  NSCompanyDocumentAttribute: NSString; external name '_NSCompanyDocumentAttribute';
-  NSCopyrightDocumentAttribute: NSString; external name '_NSCopyrightDocumentAttribute';
-  NSSubjectDocumentAttribute: NSString; external name '_NSSubjectDocumentAttribute';
-  NSAuthorDocumentAttribute: NSString; external name '_NSAuthorDocumentAttribute';
-  NSKeywordsDocumentAttribute: NSString; external name '_NSKeywordsDocumentAttribute';
-  NSCommentDocumentAttribute: NSString; external name '_NSCommentDocumentAttribute';
-  NSEditorDocumentAttribute: NSString; external name '_NSEditorDocumentAttribute';
-  NSCreationTimeDocumentAttribute: NSString; external name '_NSCreationTimeDocumentAttribute';
-  NSModificationTimeDocumentAttribute: NSString; external name '_NSModificationTimeDocumentAttribute';
-  NSExcludedElementsDocumentAttribute: NSString; external name '_NSExcludedElementsDocumentAttribute';
-  NSTextEncodingNameDocumentAttribute: NSString; external name '_NSTextEncodingNameDocumentAttribute';
-  NSPrefixSpacesDocumentAttribute: NSString; external name '_NSPrefixSpacesDocumentAttribute';
-  NSDocumentTypeDocumentOption: NSString; external name '_NSDocumentTypeDocumentOption';
-  NSDefaultAttributesDocumentOption: NSString; external name '_NSDefaultAttributesDocumentOption';
-  NSCharacterEncodingDocumentOption: NSString; external name '_NSCharacterEncodingDocumentOption';
-  NSTextEncodingNameDocumentOption: NSString; external name '_NSTextEncodingNameDocumentOption';
-  NSBaseURLDocumentOption: NSString; external name '_NSBaseURLDocumentOption';
-  NSTimeoutDocumentOption: NSString; external name '_NSTimeoutDocumentOption';
-  NSWebPreferencesDocumentOption: NSString; external name '_NSWebPreferencesDocumentOption';
-  NSWebResourceLoadDelegateDocumentOption: NSString; external name '_NSWebResourceLoadDelegateDocumentOption';
-  NSTextSizeMultiplierDocumentOption: NSString; external name '_NSTextSizeMultiplierDocumentOption';
+  NSFontAttributeName: NSString; cvar; external;
+  NSParagraphStyleAttributeName: NSString; cvar; external;
+  NSForegroundColorAttributeName: NSString; cvar; external;
+  NSUnderlineStyleAttributeName: NSString; cvar; external;
+  NSSuperscriptAttributeName: NSString; cvar; external;
+  NSBackgroundColorAttributeName: NSString; cvar; external;
+  NSAttachmentAttributeName: NSString; cvar; external;
+  NSLigatureAttributeName: NSString; cvar; external;
+  NSBaselineOffsetAttributeName: NSString; cvar; external;
+  NSKernAttributeName: NSString; cvar; external;
+  NSLinkAttributeName: NSString; cvar; external;
+  NSStrokeWidthAttributeName: NSString; cvar; external;
+  NSStrokeColorAttributeName: NSString; cvar; external;
+  NSUnderlineColorAttributeName: NSString; cvar; external;
+  NSStrikethroughStyleAttributeName: NSString; cvar; external;
+  NSStrikethroughColorAttributeName: NSString; cvar; external;
+  NSShadowAttributeName: NSString; cvar; external;
+  NSObliquenessAttributeName: NSString; cvar; external;
+  NSExpansionAttributeName: NSString; cvar; external;
+  NSCursorAttributeName: NSString; cvar; external;
+  NSToolTipAttributeName: NSString; cvar; external;
+  NSCharacterShapeAttributeName: NSString; cvar; external;
+  NSGlyphInfoAttributeName: NSString; cvar; external;
+  NSWritingDirectionAttributeName: NSString; cvar; external;
+  NSMarkedClauseSegmentAttributeName: NSString; cvar; external;
+  NSSpellingStateAttributeName: NSString; cvar; external;
+  NSPlainTextDocumentType: NSString; cvar; external;
+  NSRTFTextDocumentType: NSString; cvar; external;
+  NSRTFDTextDocumentType: NSString; cvar; external;
+  NSMacSimpleTextDocumentType: NSString; cvar; external;
+  NSHTMLTextDocumentType: NSString; cvar; external;
+  NSDocFormatTextDocumentType: NSString; cvar; external;
+  NSWordMLTextDocumentType: NSString; cvar; external;
+  NSWebArchiveTextDocumentType: NSString; cvar; external;
+  NSOfficeOpenXMLTextDocumentType: NSString; cvar; external;
+  NSOpenDocumentTextDocumentType: NSString; cvar; external;
+  NSPaperSizeDocumentAttribute: NSString; cvar; external;
+  NSLeftMarginDocumentAttribute: NSString; cvar; external;
+  NSRightMarginDocumentAttribute: NSString; cvar; external;
+  NSTopMarginDocumentAttribute: NSString; cvar; external;
+  NSBottomMarginDocumentAttribute: NSString; cvar; external;
+  NSViewSizeDocumentAttribute: NSString; cvar; external;
+  NSViewZoomDocumentAttribute: NSString; cvar; external;
+  NSViewModeDocumentAttribute: NSString; cvar; external;
+  NSDocumentTypeDocumentAttribute: NSString; cvar; external;
+  NSReadOnlyDocumentAttribute: NSString; cvar; external;
+  NSConvertedDocumentAttribute: NSString; cvar; external;
+  NSCocoaVersionDocumentAttribute: NSString; cvar; external;
+  NSBackgroundColorDocumentAttribute: NSString; cvar; external;
+  NSHyphenationFactorDocumentAttribute: NSString; cvar; external;
+  NSDefaultTabIntervalDocumentAttribute: NSString; cvar; external;
+  NSCharacterEncodingDocumentAttribute: NSString; cvar; external;
+  NSFileTypeDocumentAttribute: NSString; cvar; external;
+  NSTitleDocumentAttribute: NSString; cvar; external;
+  NSCompanyDocumentAttribute: NSString; cvar; external;
+  NSCopyrightDocumentAttribute: NSString; cvar; external;
+  NSSubjectDocumentAttribute: NSString; cvar; external;
+  NSAuthorDocumentAttribute: NSString; cvar; external;
+  NSKeywordsDocumentAttribute: NSString; cvar; external;
+  NSCommentDocumentAttribute: NSString; cvar; external;
+  NSEditorDocumentAttribute: NSString; cvar; external;
+  NSCreationTimeDocumentAttribute: NSString; cvar; external;
+  NSModificationTimeDocumentAttribute: NSString; cvar; external;
+  NSManagerDocumentAttribute: NSString; cvar; external;
+  NSCategoryDocumentAttribute: NSString; cvar; external;
+  NSExcludedElementsDocumentAttribute: NSString; cvar; external;
+  NSTextEncodingNameDocumentAttribute: NSString; cvar; external;
+  NSPrefixSpacesDocumentAttribute: NSString; cvar; external;
+  NSDocumentTypeDocumentOption: NSString; cvar; external;
+  NSDefaultAttributesDocumentOption: NSString; cvar; external;
+  NSCharacterEncodingDocumentOption: NSString; cvar; external;
+  NSTextEncodingNameDocumentOption: NSString; cvar; external;
+  NSBaseURLDocumentOption: NSString; cvar; external;
+  NSTimeoutDocumentOption: NSString; cvar; external;
+  NSWebPreferencesDocumentOption: NSString; cvar; external;
+  NSWebResourceLoadDelegateDocumentOption: NSString; cvar; external;
+  NSTextSizeMultiplierDocumentOption: NSString; cvar; external;
+  NSFileTypeDocumentOption: NSString; cvar; external;
 
 
 { External symbols }
 { External symbols }
 var
 var
-  NSUnderlineByWordMask: NSUInteger; external name '_NSUnderlineByWordMask';
-  NSUnderlineStrikethroughMask: NSUInteger; external name '_NSUnderlineStrikethroughMask';
+  NSUnderlineByWordMask: NSUInteger; cvar; external;
+  NSUnderlineStrikethroughMask: NSUInteger; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -137,8 +142,10 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSAttributedString = objcclass;
   NSAttributedString = objcclass;
   NSAttributedStringPointer = ^NSAttributedString;
   NSAttributedStringPointer = ^NSAttributedString;
+  NSAttributedStringPtr = NSAttributedStringPointer;
   NSMutableAttributedString = objcclass;
   NSMutableAttributedString = objcclass;
   NSMutableAttributedStringPointer = ^NSMutableAttributedString;
   NSMutableAttributedStringPointer = ^NSMutableAttributedString;
+  NSMutableAttributedStringPtr = NSMutableAttributedStringPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -155,7 +162,25 @@ var
     function string_: NSString; message 'string';
     function string_: NSString; message 'string';
     function attributesAtIndex_effectiveRange(location: NSUInteger; range: NSRangePointer): NSDictionary; message 'attributesAtIndex:effectiveRange:';
     function attributesAtIndex_effectiveRange(location: NSUInteger; range: NSRangePointer): NSDictionary; message 'attributesAtIndex:effectiveRange:';
 
 
-    { Category: NSExtendedAttributedString }
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    function mutableCopyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSMutableAttributedString }
+  NSMutableAttributedString = objcclass(NSAttributedString)
+    
+  public
+    class function alloc: NSMutableAttributedString; message 'alloc';
+
+    procedure replaceCharactersInRange_withString(range: NSRange; str: NSString); message 'replaceCharactersInRange:withString:';
+    procedure setAttributes_range(attrs: NSDictionary; range: NSRange); message 'setAttributes:range:';
+  end; external;
+
+{ NSExtendedAttributedStringCategory }
+  NSExtendedAttributedStringCategory = objccategory(NSAttributedString)
     function length: NSUInteger; message 'length';
     function length: NSUInteger; message 'length';
     function attribute_atIndex_effectiveRange(attrName: NSString; location: NSUInteger; range: NSRangePointer): id; message 'attribute:atIndex:effectiveRange:';
     function attribute_atIndex_effectiveRange(attrName: NSString; location: NSUInteger; range: NSRangePointer): id; message 'attribute:atIndex:effectiveRange:';
     function attributedSubstringFromRange(range: NSRange): NSAttributedString; message 'attributedSubstringFromRange:';
     function attributedSubstringFromRange(range: NSRange): NSAttributedString; message 'attributedSubstringFromRange:';
@@ -165,8 +190,25 @@ var
     function initWithString(str: NSString): id; message 'initWithString:';
     function initWithString(str: NSString): id; message 'initWithString:';
     function initWithString_attributes(str: NSString; attrs: NSDictionary): id; message 'initWithString:attributes:';
     function initWithString_attributes(str: NSString; attrs: NSDictionary): id; message 'initWithString:attributes:';
     function initWithAttributedString(attrStr: NSAttributedString): id; message 'initWithAttributedString:';
     function initWithAttributedString(attrStr: NSAttributedString): id; message 'initWithAttributedString:';
+  end; external;
+
+{ NSExtendedMutableAttributedStringCategory }
+  NSExtendedMutableAttributedStringCategory = objccategory(NSMutableAttributedString)
+    function mutableString: NSMutableString; message 'mutableString';
+    procedure addAttribute_value_range(name: NSString; value: id; range: NSRange); message 'addAttribute:value:range:';
+    procedure addAttributes_range(attrs: NSDictionary; range: NSRange); message 'addAttributes:range:';
+    procedure removeAttribute_range(name: NSString; range: NSRange); message 'removeAttribute:range:';
+    procedure replaceCharactersInRange_withAttributedString(range: NSRange; attrString: NSAttributedString); message 'replaceCharactersInRange:withAttributedString:';
+    procedure insertAttributedString_atIndex(attrString: NSAttributedString; loc: NSUInteger); message 'insertAttributedString:atIndex:';
+    procedure appendAttributedString(attrString: NSAttributedString); message 'appendAttributedString:';
+    procedure deleteCharactersInRange(range: NSRange); message 'deleteCharactersInRange:';
+    procedure setAttributedString(attrString: NSAttributedString); message 'setAttributedString:';
+    procedure beginEditing; message 'beginEditing';
+    procedure endEditing; message 'endEditing';
+  end; external;
 
 
-    { Category: NSAttributedStringKitAdditions }
+{ NSAttributedStringKitAdditionsCategory }
+  NSAttributedStringKitAdditionsCategory = objccategory(NSAttributedString)
     function fontAttributesInRange(range: NSRange): NSDictionary; message 'fontAttributesInRange:';
     function fontAttributesInRange(range: NSRange): NSDictionary; message 'fontAttributesInRange:';
     function rulerAttributesInRange(range: NSRange): NSDictionary; message 'rulerAttributesInRange:';
     function rulerAttributesInRange(range: NSRange): NSDictionary; message 'rulerAttributesInRange:';
     function containsAttachments: Boolean; message 'containsAttachments';
     function containsAttachments: Boolean; message 'containsAttachments';
@@ -198,49 +240,18 @@ var
     function RTFDFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSData; message 'RTFDFromRange:documentAttributes:';
     function RTFDFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSData; message 'RTFDFromRange:documentAttributes:';
     function RTFDFileWrapperFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSFileWrapper; message 'RTFDFileWrapperFromRange:documentAttributes:';
     function RTFDFileWrapperFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSFileWrapper; message 'RTFDFileWrapperFromRange:documentAttributes:';
     function docFormatFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSData; message 'docFormatFromRange:documentAttributes:';
     function docFormatFromRange_documentAttributes(range: NSRange; dict: NSDictionary): NSData; message 'docFormatFromRange:documentAttributes:';
+  end; external;
 
 
-    { Category: NSDeprecatedKitAdditions }
+{ NSDeprecatedKitAdditionsCategory }
+  NSDeprecatedKitAdditionsCategory = objccategory(NSAttributedString)
     class function textFileTypes: NSArray; message 'textFileTypes';
     class function textFileTypes: NSArray; message 'textFileTypes';
     class function textPasteboardTypes: NSArray; message 'textPasteboardTypes';
     class function textPasteboardTypes: NSArray; message 'textPasteboardTypes';
     class function textUnfilteredFileTypes: NSArray; message 'textUnfilteredFileTypes';
     class function textUnfilteredFileTypes: NSArray; message 'textUnfilteredFileTypes';
     class function textUnfilteredPasteboardTypes: NSArray; message 'textUnfilteredPasteboardTypes';
     class function textUnfilteredPasteboardTypes: NSArray; message 'textUnfilteredPasteboardTypes';
-
-    { Category: NSAttributedStringAttachmentConveniences }
-    class function attributedStringWithAttachment(attachment: NSTextAttachment): NSAttributedString; message 'attributedStringWithAttachment:';
-
-    { Category: NSStringDrawing }
-    function size: NSSize; message 'size';
-    procedure drawAtPoint(point: NSPoint); message 'drawAtPoint:';
-    procedure drawInRect(rect: NSRect); message 'drawInRect:';
-
-    { Category: NSExtendedStringDrawing }
-    procedure drawWithRect_options(rect: NSRect; options: NSStringDrawingOptions); message 'drawWithRect:options:';
-    function boundingRectWithSize_options(size_: NSSize; options: NSStringDrawingOptions): NSRect; message 'boundingRectWithSize:options:';
   end; external;
   end; external;
 
 
-{ NSMutableAttributedString }
-  NSMutableAttributedString = objcclass(NSAttributedString)
-    
-  public
-    class function alloc: NSMutableAttributedString; message 'alloc';
-
-    procedure replaceCharactersInRange_withString(range: NSRange; str: NSString); message 'replaceCharactersInRange:withString:';
-    procedure setAttributes_range(attrs: NSDictionary; range: NSRange); message 'setAttributes:range:';
-
-    { Category: NSExtendedMutableAttributedString }
-    function mutableString: NSMutableString; message 'mutableString';
-    procedure addAttribute_value_range(name: NSString; value: id; range: NSRange); message 'addAttribute:value:range:';
-    procedure addAttributes_range(attrs: NSDictionary; range: NSRange); message 'addAttributes:range:';
-    procedure removeAttribute_range(name: NSString; range: NSRange); message 'removeAttribute:range:';
-    procedure replaceCharactersInRange_withAttributedString(range: NSRange; attrString: NSAttributedString); message 'replaceCharactersInRange:withAttributedString:';
-    procedure insertAttributedString_atIndex(attrString: NSAttributedString; loc: NSUInteger); message 'insertAttributedString:atIndex:';
-    procedure appendAttributedString(attrString: NSAttributedString); message 'appendAttributedString:';
-    procedure deleteCharactersInRange(range: NSRange); message 'deleteCharactersInRange:';
-    procedure setAttributedString(attrString: NSAttributedString); message 'setAttributedString:';
-    procedure beginEditing; message 'beginEditing';
-    procedure endEditing; message 'endEditing';
-
-    { Category: NSMutableAttributedStringKitAdditions }
+{ NSMutableAttributedStringKitAdditionsCategory }
+  NSMutableAttributedStringKitAdditionsCategory = objccategory(NSMutableAttributedString)
     function readFromURL_options_documentAttributes_error(url: NSURL; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): Boolean; message 'readFromURL:options:documentAttributes:error:';
     function readFromURL_options_documentAttributes_error(url: NSURL; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): Boolean; message 'readFromURL:options:documentAttributes:error:';
     function readFromData_options_documentAttributes_error(data: NSData; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): Boolean; message 'readFromData:options:documentAttributes:error:';
     function readFromData_options_documentAttributes_error(data: NSData; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): Boolean; message 'readFromData:options:documentAttributes:error:';
     function readFromURL_options_documentAttributes(url: NSURL; options: NSDictionary; dict: NSDictionaryPointer): Boolean; message 'readFromURL:options:documentAttributes:';
     function readFromURL_options_documentAttributes(url: NSURL; options: NSDictionary; dict: NSDictionaryPointer): Boolean; message 'readFromURL:options:documentAttributes:';
@@ -255,9 +266,6 @@ var
     procedure fixFontAttributeInRange(range: NSRange); message 'fixFontAttributeInRange:';
     procedure fixFontAttributeInRange(range: NSRange); message 'fixFontAttributeInRange:';
     procedure fixParagraphStyleAttributeInRange(range: NSRange); message 'fixParagraphStyleAttributeInRange:';
     procedure fixParagraphStyleAttributeInRange(range: NSRange); message 'fixParagraphStyleAttributeInRange:';
     procedure fixAttachmentAttributeInRange(range: NSRange); message 'fixAttachmentAttributeInRange:';
     procedure fixAttachmentAttributeInRange(range: NSRange); message 'fixAttachmentAttributeInRange:';
-
-    { Category: NSMutableAttributedStringAttachmentConveniences }
-    procedure updateAttachmentsFromPath(path: NSString); message 'updateAttachmentsFromPath:';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 46 - 19
packages/cocoaint/src/appkit/NSBezierPath.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSBezierPath.h }
 { Parsed from Appkit.framework NSBezierPath.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -31,9 +31,13 @@ const
 { Types }
 { Types }
 type
 type
   NSLineCapStyle = NSUInteger;
   NSLineCapStyle = NSUInteger;
+  NSLineCapStylePtr = ^NSLineCapStyle;
   NSLineJoinStyle = NSUInteger;
   NSLineJoinStyle = NSUInteger;
+  NSLineJoinStylePtr = ^NSLineJoinStyle;
   NSWindingRule = NSUInteger;
   NSWindingRule = NSUInteger;
+  NSWindingRulePtr = ^NSWindingRule;
   NSBezierPathElement = NSUInteger;
   NSBezierPathElement = NSUInteger;
+  NSBezierPathElementPtr = ^NSBezierPathElement;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -62,6 +66,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSBezierPath = objcclass;
   NSBezierPath = objcclass;
   NSBezierPathPointer = ^NSBezierPath;
   NSBezierPathPointer = ^NSBezierPath;
+  NSBezierPathPtr = NSBezierPathPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -72,25 +77,31 @@ type
 { NSBezierPath }
 { NSBezierPath }
   NSBezierPath = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSBezierPath = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __segmentCount: NSInteger;
-    __segmentMax: NSInteger;
-    __head: PATHSEGMENT;
-    __lastSubpathIndex: NSInteger;
-    __elementCount: NSInteger;
-    __lineWidth: CGFloat;
-    __controlPointBounds: NSRect;
-    __miterLimit: CGFloat;
-    __flatness: CGFloat;
-    __dashedLinePattern: CGFloat;
-    __dashedLineCount: NSUInteger;
-    __dashedLinePhase: CGFloat;
-    __path: Pointer;
-        _private: array[0..3] of id;
+    _elementCount: NSInteger;
+    _elementMax: NSInteger;
+    __head: Pointer;
+    _lastSubpathIndex: NSInteger;
+    _extraSegments: Pointer;
+    _lineWidth: CGFloat;
+    _controlPointBounds: NSRect;
+    _miterLimit: CGFloat;
+    _flatness: CGFloat;
+    _dashedLinePattern: CGFloatPtr;
+    _dashedLineCount: NSUInteger;
+    _dashedLinePhase: CGFloat;
+    _path: Pointer;
+    _extraSegmentCount: NSInteger;
+    _extraSegmentMax: NSInteger;
+        _private: array[0..1] of id;
     __bpFlags: bitpacked record
     __bpFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSBezierPath0: cuint);
+       1: (
         _flags: 0..((1 shl 8)-1);
         _flags: 0..((1 shl 8)-1);
         _pathState: 0..((1 shl 2)-1);
         _pathState: 0..((1 shl 2)-1);
         
         
         _unused: 0..((1 shl 22)-1);
         _unused: 0..((1 shl 22)-1);
+      );
       end;
       end;
     
     
   public
   public
@@ -119,10 +130,12 @@ type
     class function defaultLineWidth: CGFloat; message 'defaultLineWidth';
     class function defaultLineWidth: CGFloat; message 'defaultLineWidth';
     procedure moveToPoint(point: NSPoint); message 'moveToPoint:';
     procedure moveToPoint(point: NSPoint); message 'moveToPoint:';
     procedure lineToPoint(point: NSPoint); message 'lineToPoint:';
     procedure lineToPoint(point: NSPoint); message 'lineToPoint:';
+    procedure curveToPoint_controlPoint1_controlPoint2(endPoint: NSPoint; controlPoint: NSPoint; controlPoint1: NSPoint); message 'curveToPoint:controlPoint1:controlPoint2:';
     procedure closePath; message 'closePath';
     procedure closePath; message 'closePath';
     procedure removeAllPoints; message 'removeAllPoints';
     procedure removeAllPoints; message 'removeAllPoints';
     procedure relativeMoveToPoint(point: NSPoint); message 'relativeMoveToPoint:';
     procedure relativeMoveToPoint(point: NSPoint); message 'relativeMoveToPoint:';
     procedure relativeLineToPoint(point: NSPoint); message 'relativeLineToPoint:';
     procedure relativeLineToPoint(point: NSPoint); message 'relativeLineToPoint:';
+    procedure relativeCurveToPoint_controlPoint1_controlPoint2(endPoint: NSPoint; controlPoint: NSPoint; controlPoint1: NSPoint); message 'relativeCurveToPoint:controlPoint1:controlPoint2:';
     function lineWidth: CGFloat; message 'lineWidth';
     function lineWidth: CGFloat; message 'lineWidth';
     procedure setLineWidth(lineWidth_: CGFloat); message 'setLineWidth:';
     procedure setLineWidth(lineWidth_: CGFloat); message 'setLineWidth:';
     function lineCapStyle: NSLineCapStyle; message 'lineCapStyle';
     function lineCapStyle: NSLineCapStyle; message 'lineCapStyle';
@@ -135,8 +148,8 @@ type
     procedure setMiterLimit(miterLimit_: CGFloat); message 'setMiterLimit:';
     procedure setMiterLimit(miterLimit_: CGFloat); message 'setMiterLimit:';
     function flatness: CGFloat; message 'flatness';
     function flatness: CGFloat; message 'flatness';
     procedure setFlatness(flatness_: CGFloat); message 'setFlatness:';
     procedure setFlatness(flatness_: CGFloat); message 'setFlatness:';
-    procedure getLineDash_count_phase(pattern: psingle; count: NSIntegerPointer; phase: psingle); message 'getLineDash:count:phase:';
-    procedure setLineDash_count_phase(pattern: psingle; count: NSInteger; phase: CGFloat); message 'setLineDash:count:phase:';
+    procedure getLineDash_count_phase(pattern: CGFloatPtr; count: NSIntegerPtr; phase: CGFloatPtr); message 'getLineDash:count:phase:';
+    procedure setLineDash_count_phase(pattern: CGFloatPtr; count: NSInteger; phase: CGFloat); message 'setLineDash:count:phase:';
     procedure stroke; message 'stroke';
     procedure stroke; message 'stroke';
     procedure fill; message 'fill';
     procedure fill; message 'fill';
     procedure addClip; message 'addClip';
     procedure addClip; message 'addClip';
@@ -149,18 +162,32 @@ type
     function controlPointBounds: NSRect; message 'controlPointBounds';
     function controlPointBounds: NSRect; message 'controlPointBounds';
     function bounds: NSRect; message 'bounds';
     function bounds: NSRect; message 'bounds';
     function elementCount: NSInteger; message 'elementCount';
     function elementCount: NSInteger; message 'elementCount';
+    function elementAtIndex_associatedPoints(index: NSInteger; points: NSPointArray): NSBezierPathElement; message 'elementAtIndex:associatedPoints:';
     function elementAtIndex(index: NSInteger): NSBezierPathElement; message 'elementAtIndex:';
     function elementAtIndex(index: NSInteger): NSBezierPathElement; message 'elementAtIndex:';
     procedure setAssociatedPoints_atIndex(points: NSPointArray; index: NSInteger); message 'setAssociatedPoints:atIndex:';
     procedure setAssociatedPoints_atIndex(points: NSPointArray; index: NSInteger); message 'setAssociatedPoints:atIndex:';
     procedure appendBezierPath(path: NSBezierPath); message 'appendBezierPath:';
     procedure appendBezierPath(path: NSBezierPath); message 'appendBezierPath:';
     procedure appendBezierPathWithRect(rect: NSRect); message 'appendBezierPathWithRect:';
     procedure appendBezierPathWithRect(rect: NSRect); message 'appendBezierPathWithRect:';
     procedure appendBezierPathWithPoints_count(points: NSPointArray; count: NSInteger); message 'appendBezierPathWithPoints:count:';
     procedure appendBezierPathWithPoints_count(points: NSPointArray; count: NSInteger); message 'appendBezierPathWithPoints:count:';
     procedure appendBezierPathWithOvalInRect(rect: NSRect); message 'appendBezierPathWithOvalInRect:';
     procedure appendBezierPathWithOvalInRect(rect: NSRect); message 'appendBezierPathWithOvalInRect:';
+    procedure appendBezierPathWithArcWithCenter_radius_startAngle_endAngle_clockwise(center: NSPoint; radius: CGFloat; startAngle: CGFloat; endAngle: CGFloat; clockwise: Boolean); message 'appendBezierPathWithArcWithCenter:radius:startAngle:endAngle:clockwise:';
+    procedure appendBezierPathWithArcWithCenter_radius_startAngle_endAngle(center: NSPoint; radius: CGFloat; startAngle: CGFloat; endAngle: CGFloat); message 'appendBezierPathWithArcWithCenter:radius:startAngle:endAngle:';
+    procedure appendBezierPathWithArcFromPoint_toPoint_radius(point: NSPoint; point1: NSPoint; radius: CGFloat); message 'appendBezierPathWithArcFromPoint:toPoint:radius:';
     procedure appendBezierPathWithGlyph_inFont(glyph: NSGlyph; font: NSFont); message 'appendBezierPathWithGlyph:inFont:';
     procedure appendBezierPathWithGlyph_inFont(glyph: NSGlyph; font: NSFont); message 'appendBezierPathWithGlyph:inFont:';
+    procedure appendBezierPathWithGlyphs_count_inFont(glyphs: NSGlyphPtr; count: NSInteger; font: NSFont); message 'appendBezierPathWithGlyphs:count:inFont:';
     procedure appendBezierPathWithPackedGlyphs(packedGlyphs: PChar); message 'appendBezierPathWithPackedGlyphs:';
     procedure appendBezierPathWithPackedGlyphs(packedGlyphs: PChar); message 'appendBezierPathWithPackedGlyphs:';
     procedure appendBezierPathWithRoundedRect_xRadius_yRadius(rect: NSRect; xRadius: CGFloat; yRadius: CGFloat); message 'appendBezierPathWithRoundedRect:xRadius:yRadius:';
     procedure appendBezierPathWithRoundedRect_xRadius_yRadius(rect: NSRect; xRadius: CGFloat; yRadius: CGFloat); message 'appendBezierPathWithRoundedRect:xRadius:yRadius:';
     function containsPoint(point: NSPoint): Boolean; message 'containsPoint:';
     function containsPoint(point: NSPoint): Boolean; message 'containsPoint:';
-    function cachesBezierPath: Boolean; message 'cachesBezierPath';
-    procedure setCachesBezierPath(flag: Boolean); message 'setCachesBezierPath:';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSBezierPathDeprecatedCategory }
+  NSBezierPathDeprecatedCategory = objccategory(NSBezierPath)
+    function cachesBezierPath: Boolean; message 'cachesBezierPath'; deprecated 'in Mac OS X 10 and later';
+    procedure setCachesBezierPath(flag: Boolean); message 'setCachesBezierPath:'; deprecated 'in Mac OS X 10 and later';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 55 - 23
packages/cocoaint/src/appkit/NSBitmapImageRep.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSBitmapImageRep.h }
 { Parsed from Appkit.framework NSBitmapImageRep.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -35,16 +35,20 @@ const
   NSImageRepLoadStatusCompleted = -6;
   NSImageRepLoadStatusCompleted = -6;
 
 
 const
 const
-  NSAlphaFirstBitmapFormat = 1  shl  0;
-  NSAlphaNonpremultipliedBitmapFormat = 1  shl  1;
-  NSFloatingPointSamplesBitmapFormat = 1  shl  2;
+  NSAlphaFirstBitmapFormat = 1 shl 0;
+  NSAlphaNonpremultipliedBitmapFormat = 1 shl 1;
+  NSFloatingPointSamplesBitmapFormat = 1 shl 2;
 
 
 { Types }
 { Types }
 type
 type
   NSTIFFCompression = NSUInteger;
   NSTIFFCompression = NSUInteger;
+  NSTIFFCompressionPtr = ^NSTIFFCompression;
   NSBitmapImageFileType = NSUInteger;
   NSBitmapImageFileType = NSUInteger;
+  NSBitmapImageFileTypePtr = ^NSBitmapImageFileType;
   NSImageRepLoadStatus = NSInteger;
   NSImageRepLoadStatus = NSInteger;
+  NSImageRepLoadStatusPtr = ^NSImageRepLoadStatus;
   NSBitmapFormat = NSUInteger;
   NSBitmapFormat = NSUInteger;
+  NSBitmapFormatPtr = ^NSBitmapFormat;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -67,12 +71,30 @@ type
 {$ifndef NSBITMAPIMAGEREP_PAS_S}
 {$ifndef NSBITMAPIMAGEREP_PAS_S}
 {$define NSBITMAPIMAGEREP_PAS_S}
 {$define NSBITMAPIMAGEREP_PAS_S}
 
 
+{ External string constants }
+var
+  NSImageCompressionMethod: NSString; cvar; external;
+  NSImageCompressionFactor: NSString; cvar; external;
+  NSImageDitherTransparency: NSString; cvar; external;
+  NSImageRGBColorTable: NSString; cvar; external;
+  NSImageInterlaced: NSString; cvar; external;
+  NSImageColorSyncProfileData: NSString; cvar; external;
+  NSImageFrameCount: NSString; cvar; external;
+  NSImageCurrentFrame: NSString; cvar; external;
+  NSImageCurrentFrameDuration: NSString; cvar; external;
+  NSImageLoopCount: NSString; cvar; external;
+  NSImageGamma: NSString; cvar; external;
+  NSImageProgressive: NSString; cvar; external;
+  NSImageEXIFData: NSString; cvar; external;
+  NSImageFallbackBackgroundColor: NSString; cvar; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSBitmapImageRep = objcclass;
   NSBitmapImageRep = objcclass;
   NSBitmapImageRepPointer = ^NSBitmapImageRep;
   NSBitmapImageRepPointer = ^NSBitmapImageRep;
+  NSBitmapImageRepPtr = NSBitmapImageRepPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -84,37 +106,42 @@ type
   NSBitmapImageRep = objcclass(NSImageRep)
   NSBitmapImageRep = objcclass(NSImageRep)
   private
   private
     __moreRepFlags: bitpacked record
     __moreRepFlags: bitpacked record
-        bitsPerPixel: cuint;
-        isPlanar: 0..1;
+      case byte of
+       0: (_anonbitfield_NSBitmapImageRep0: cuint);
+       1: (
+        _bitsPerPixel: cuint;
+        _isPlanar: 0..1;
         explicitPlanes: 0..1;
         explicitPlanes: 0..1;
-        isUnpacked: 0..1;
+        imageSourceIsIndexed: 0..1;
         dataLoaded: 0..1;
         dataLoaded: 0..1;
-        numColors: cuint;
-        memory: 0..((1 shl 2)-1);
+        colorModel: 0..((1 shl 4)-1);
+        tierTwoInfoIsLoaded: 0..1;
+        respectO: 0..1;
         compressionFactor: 0..((1 shl 14)-1);
         compressionFactor: 0..((1 shl 14)-1);
         imageNumber: 0..((1 shl 8)-1);
         imageNumber: 0..((1 shl 8)-1);
-        bitmapFormat: 0..((1 shl 3)-1);
+        _bitmapFormat: 0..((1 shl 3)-1);
         cgImageIsPrimary: 0..1;
         cgImageIsPrimary: 0..1;
         compression: 0..((1 shl 20)-1);
         compression: 0..((1 shl 20)-1);
+      );
       end;
       end;
-    __bytesPerRow: cuint;
-    __data: char;
-    __tiffData: NSData;
-    __properties: id;
+    _bytesPerRow: cuint;
+    _dataObj: id; {garbage collector: volatile }
+    _tiffData: NSData;
+    _properties: id;
     
     
   public
   public
     class function alloc: NSBitmapImageRep; message 'alloc';
     class function alloc: NSBitmapImageRep; message 'alloc';
 
 
     function initWithFocusedViewRect(rect: NSRect): id; message 'initWithFocusedViewRect:';
     function initWithFocusedViewRect(rect: NSRect): id; message 'initWithFocusedViewRect:';
-    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bytesPerRow_bitsPerPixel(planes: pchar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: Boolean; isPlanar_: Boolean; colorSpaceName_: NSString; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bytesPerRow:bitsPerPixel:';
-    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bitmapFormat_bytesPerRow_bitsPerPixel(planes: pchar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: Boolean; isPlanar_: Boolean; colorSpaceName_: NSString; bitmapFormat_: NSBitmapFormat; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bitmapFormat:bytesPerRow:bitsPerPixel:';
-    function initWithCGImage(CGImage_: CGImageRef): id; message 'initWithCGImage:';
-    function initWithCIImage(ciImage: CIImagePointer): id; message 'initWithCIImage:';
+    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bytesPerRow_bitsPerPixel(planes: PChar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: Boolean; isPlanar_: Boolean; colorSpaceName_: NSString; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bytesPerRow:bitsPerPixel:';
+    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bitmapFormat_bytesPerRow_bitsPerPixel(planes: PChar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: Boolean; isPlanar_: Boolean; colorSpaceName_: NSString; bitmapFormat_: NSBitmapFormat; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bitmapFormat:bytesPerRow:bitsPerPixel:';
+    function initWithCGImage(cgImage_: CGImageRef): id; message 'initWithCGImage:';
+    function initWithCIImage(ciImage_: CIImage): id; message 'initWithCIImage:';
     class function imageRepsWithData(data: NSData): NSArray; message 'imageRepsWithData:';
     class function imageRepsWithData(data: NSData): NSArray; message 'imageRepsWithData:';
     class function imageRepWithData(data: NSData): id; message 'imageRepWithData:';
     class function imageRepWithData(data: NSData): id; message 'imageRepWithData:';
     function initWithData(data: NSData): id; message 'initWithData:';
     function initWithData(data: NSData): id; message 'initWithData:';
-    function bitmapData: Pointer; message 'bitmapData';
-    procedure getBitmapDataPlanes(data: pchar); message 'getBitmapDataPlanes:';
+    function bitmapData: PChar; message 'bitmapData';
+    procedure getBitmapDataPlanes(data: PChar); message 'getBitmapDataPlanes:';
     function isPlanar: Boolean; message 'isPlanar';
     function isPlanar: Boolean; message 'isPlanar';
     function samplesPerPixel: NSInteger; message 'samplesPerPixel';
     function samplesPerPixel: NSInteger; message 'samplesPerPixel';
     function bitsPerPixel: NSInteger; message 'bitsPerPixel';
     function bitsPerPixel: NSInteger; message 'bitsPerPixel';
@@ -122,13 +149,13 @@ type
     function bytesPerPlane: NSInteger; message 'bytesPerPlane';
     function bytesPerPlane: NSInteger; message 'bytesPerPlane';
     function numberOfPlanes: NSInteger; message 'numberOfPlanes';
     function numberOfPlanes: NSInteger; message 'numberOfPlanes';
     function bitmapFormat: NSBitmapFormat; message 'bitmapFormat';
     function bitmapFormat: NSBitmapFormat; message 'bitmapFormat';
-    procedure getCompression_factor(compression: NSTIFFCompressionPointer; factor: psingle); message 'getCompression:factor:';
+    procedure getCompression_factor(compression: NSTIFFCompressionPtr; factor: psingle); message 'getCompression:factor:';
     procedure setCompression_factor(compression: NSTIFFCompression; factor: single); message 'setCompression:factor:';
     procedure setCompression_factor(compression: NSTIFFCompression; factor: single); message 'setCompression:factor:';
     function TIFFRepresentation: NSData; message 'TIFFRepresentation';
     function TIFFRepresentation: NSData; message 'TIFFRepresentation';
     function TIFFRepresentationUsingCompression_factor(comp: NSTIFFCompression; factor: single): NSData; message 'TIFFRepresentationUsingCompression:factor:';
     function TIFFRepresentationUsingCompression_factor(comp: NSTIFFCompression; factor: single): NSData; message 'TIFFRepresentationUsingCompression:factor:';
     class function TIFFRepresentationOfImageRepsInArray(array_: NSArray): NSData; message 'TIFFRepresentationOfImageRepsInArray:';
     class function TIFFRepresentationOfImageRepsInArray(array_: NSArray): NSData; message 'TIFFRepresentationOfImageRepsInArray:';
     class function TIFFRepresentationOfImageRepsInArray_usingCompression_factor(array_: NSArray; comp: NSTIFFCompression; factor: single): NSData; message 'TIFFRepresentationOfImageRepsInArray:usingCompression:factor:';
     class function TIFFRepresentationOfImageRepsInArray_usingCompression_factor(array_: NSArray; comp: NSTIFFCompression; factor: single): NSData; message 'TIFFRepresentationOfImageRepsInArray:usingCompression:factor:';
-    class procedure getTIFFCompressionTypes_count(list: NSTIFFCompressionPointer; numTypes: NSIntegerPointer); message 'getTIFFCompressionTypes:count:';
+    class procedure getTIFFCompressionTypes_count(list: NSTIFFCompressionPtr; numTypes: NSIntegerPtr); message 'getTIFFCompressionTypes:count:';
     class function localizedNameForTIFFCompressionType(compression: NSTIFFCompression): NSString; message 'localizedNameForTIFFCompressionType:';
     class function localizedNameForTIFFCompressionType(compression: NSTIFFCompression): NSString; message 'localizedNameForTIFFCompressionType:';
     function canBeCompressedUsing(compression: NSTIFFCompression): Boolean; message 'canBeCompressedUsing:';
     function canBeCompressedUsing(compression: NSTIFFCompression): Boolean; message 'canBeCompressedUsing:';
     procedure colorizeByMappingGray_toColor_blackMapping_whiteMapping(midPoint: CGFloat; midPointColor: NSColor; shadowColor: NSColor; lightColor: NSColor); message 'colorizeByMappingGray:toColor:blackMapping:whiteMapping:';
     procedure colorizeByMappingGray_toColor_blackMapping_whiteMapping(midPoint: CGFloat; midPointColor: NSColor; shadowColor: NSColor; lightColor: NSColor); message 'colorizeByMappingGray:toColor:blackMapping:whiteMapping:';
@@ -139,8 +166,13 @@ type
     procedure getPixel_atX_y(p: NSUInteger; x: NSInteger; y: NSInteger); message 'getPixel:atX:y:';
     procedure getPixel_atX_y(p: NSUInteger; x: NSInteger; y: NSInteger); message 'getPixel:atX:y:';
     procedure setPixel_atX_y(p: NSUInteger; x: NSInteger; y: NSInteger); message 'setPixel:atX:y:';
     procedure setPixel_atX_y(p: NSUInteger; x: NSInteger; y: NSInteger); message 'setPixel:atX:y:';
     function CGImage: CGImageRef; message 'CGImage';
     function CGImage: CGImageRef; message 'CGImage';
+    function colorSpace: NSColorSpace; message 'colorSpace';
+    function bitmapImageRepByConvertingToColorSpace_renderingIntent(targetSpace: NSColorSpace; renderingIntent: NSColorRenderingIntent): NSBitmapImageRep; message 'bitmapImageRepByConvertingToColorSpace:renderingIntent:';
+    function bitmapImageRepByRetaggingWithColorSpace(newSpace: NSColorSpace): NSBitmapImageRep; message 'bitmapImageRepByRetaggingWithColorSpace:';
+  end; external;
 
 
-    { Category: NSBitmapImageFileTypeExtensions }
+{ NSBitmapImageFileTypeExtensionsCategory }
+  NSBitmapImageFileTypeExtensionsCategory = objccategory(NSBitmapImageRep)
     class function representationOfImageRepsInArray_usingType_properties(imageReps: NSArray; storageType: NSBitmapImageFileType; properties: NSDictionary): NSData; message 'representationOfImageRepsInArray:usingType:properties:';
     class function representationOfImageRepsInArray_usingType_properties(imageReps: NSArray; storageType: NSBitmapImageFileType; properties: NSDictionary): NSData; message 'representationOfImageRepsInArray:usingType:properties:';
     function representationUsingType_properties(storageType: NSBitmapImageFileType; properties: NSDictionary): NSData; message 'representationUsingType:properties:';
     function representationUsingType_properties(storageType: NSBitmapImageFileType; properties: NSDictionary): NSData; message 'representationUsingType:properties:';
     procedure setProperty_withValue(property_: NSString; value: id); message 'setProperty:withValue:';
     procedure setProperty_withValue(property_: NSString; value: id); message 'setProperty:withValue:';

+ 23 - 12
packages/cocoaint/src/appkit/NSBox.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSBox.h }
 { Parsed from Appkit.framework NSBox.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -27,7 +27,9 @@ const
 { Types }
 { Types }
 type
 type
   NSTitlePosition = NSUInteger;
   NSTitlePosition = NSUInteger;
+  NSTitlePositionPtr = ^NSTitlePosition;
   NSBoxType = NSUInteger;
   NSBoxType = NSUInteger;
+  NSBoxTypePtr = ^NSBoxType;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -56,6 +58,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSBox = objcclass;
   NSBox = objcclass;
   NSBoxPointer = ^NSBox;
   NSBoxPointer = ^NSBox;
+  NSBoxPtr = NSBoxPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -66,23 +69,27 @@ type
 { NSBox }
 { NSBox }
   NSBox = objcclass(NSView)
   NSBox = objcclass(NSView)
   private
   private
-    __titleCell: id;
-    __contentView: id;
-    __offsets: NSSize;
-    __borderRect: NSRect;
-    __titleRect: NSRect;
+    _titleCell: id;
+    _contentView: id;
+    _offsets: NSSize;
+    _borderRect: NSRect;
+    _titleRect: NSRect;
     __bFlags: bitpacked record
     __bFlags: bitpacked record
-        borderType: 0..((1 shl 2)-1);
-        titlePosition: 0..((1 shl 3)-1);
+      case byte of
+       0: (_anonbitfield_NSBox0: NSBorderType);
+       1: (
+        _borderType: 0..((1 shl 2)-1);
+        _titlePosition: 0..((1 shl 3)-1);
         backgroundTransparent: 0..1;
         backgroundTransparent: 0..1;
         reserved: 0..((1 shl 2)-1);
         reserved: 0..((1 shl 2)-1);
         needsTile: 0..1;
         needsTile: 0..1;
         transparent: 0..1;
         transparent: 0..1;
         colorAltInterpretation: 0..1;
         colorAltInterpretation: 0..1;
-        boxType: 0..((1 shl 3)-1);
+        _boxType: 0..((1 shl 3)-1);
         _RESERVED: 0..((1 shl 18)-1);
         _RESERVED: 0..((1 shl 18)-1);
+      );
       end;
       end;
-    __unused: id;
+    _unused: id;
     
     
   public
   public
     class function alloc: NSBox; message 'alloc';
     class function alloc: NSBox; message 'alloc';
@@ -108,11 +115,15 @@ type
     procedure setContentView(aView: NSView); message 'setContentView:';
     procedure setContentView(aView: NSView); message 'setContentView:';
     function isTransparent: Boolean; message 'isTransparent';
     function isTransparent: Boolean; message 'isTransparent';
     procedure setTransparent(flag: Boolean); message 'setTransparent:';
     procedure setTransparent(flag: Boolean); message 'setTransparent:';
+  end; external;
 
 
-    { Category: NSKeyboardUI }
+{ NSKeyboardUI_NSBoxCategory }
+  NSKeyboardUI_NSBoxCategory = objccategory(NSBox)
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+  end; external name 'NSKeyboardUI';
 
 
-    { Category: NSCustomBoxTypeProperties }
+{ NSCustomBoxTypePropertiesCategory }
+  NSCustomBoxTypePropertiesCategory = objccategory(NSBox)
     function borderWidth: CGFloat; message 'borderWidth';
     function borderWidth: CGFloat; message 'borderWidth';
     procedure setBorderWidth(borderWidth_: CGFloat); message 'setBorderWidth:';
     procedure setBorderWidth(borderWidth_: CGFloat); message 'setBorderWidth:';
     function cornerRadius: CGFloat; message 'cornerRadius';
     function cornerRadius: CGFloat; message 'cornerRadius';

+ 108 - 29
packages/cocoaint/src/appkit/NSBrowser.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSBrowser.h }
 { Parsed from Appkit.framework NSBrowser.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -18,10 +18,16 @@ const
   NSBrowserAutoColumnResizing = 1;
   NSBrowserAutoColumnResizing = 1;
   NSBrowserUserColumnResizing = 2;
   NSBrowserUserColumnResizing = 2;
 
 
+const
+  NSBrowserDropOn = 0;
+  NSBrowserDropAbove = 1;
+
 { Types }
 { Types }
 type
 type
   NSBrowserColumnResizingType = NSUInteger;
   NSBrowserColumnResizingType = NSUInteger;
+  NSBrowserColumnResizingTypePtr = ^NSBrowserColumnResizingType;
   NSBrowserDropOperation = NSUInteger;
   NSBrowserDropOperation = NSUInteger;
+  NSBrowserDropOperationPtr = ^NSBrowserDropOperation;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -32,7 +38,7 @@ type
 
 
 { Records }
 { Records }
 type
 type
-  __Brflags = bitpacked record
+  __Brflags = record
 {$ifdef fpc_big_endian}
 {$ifdef fpc_big_endian}
     allowsMultipleSelection: 0..1;
     allowsMultipleSelection: 0..1;
     allowsBranchSelection: 0..1;
     allowsBranchSelection: 0..1;
@@ -92,6 +98,7 @@ type
 {$endif}
 {$endif}
   end;
   end;
 _Brflags = __Brflags;
 _Brflags = __Brflags;
+__BrflagsPtr = ^__Brflags;
 
 
 
 
 {$endif}
 {$endif}
@@ -110,14 +117,16 @@ _Brflags = __Brflags;
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSBrowserColumnConfigurationDidChangeNotification: NSString; external name '_NSBrowserColumnConfigurationDidChangeNotification';
+  NSBrowserColumnConfigurationDidChangeNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSBrowserDelegateProtocol = objcprotocol;
   NSBrowser = objcclass;
   NSBrowser = objcclass;
   NSBrowserPointer = ^NSBrowser;
   NSBrowserPointer = ^NSBrowser;
+  NSBrowserPtr = NSBrowserPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -128,24 +137,24 @@ var
 { NSBrowser }
 { NSBrowser }
   NSBrowser = objcclass(NSControl)
   NSBrowser = objcclass(NSControl)
   private
   private
-    __target: id;
-    __action: SEL;
-    __delegate: id;
-    __doubleAction: SEL;
-    __matrixClass: Pobjc_class;
-    __cellPrototype: id;
-    __columnSize: NSSize;
-    __numberOfVisibleColumns: cshort;
-    __minColumnWidth: cshort;
-    __firstVisibleColumn: cshort;
-    __maxVisibleColumns: cshort;
-    __titles: NSMutableArray;
-    __pathSeparator: NSString;
-    __columns: NSMutableArray;
-    __brAuxiliaryStorage: id;
-    __firstColumnTitle: NSString;
-    __scroller: NSScroller;
-    __brflags: _Brflags;
+    _target: id;
+    _action: SEL;
+    _delegate: id;
+    _doubleAction: SEL;
+    _matrixClass: Pobjc_class;
+    _cellPrototype: id;
+    _columnSize: NSSize;
+    _numberOfVisibleColumns: cshort;
+    _minColumnWidth: cshort;
+    _firstVisibleColumn: cshort;
+    _maxVisibleColumns: cshort;
+    _titles: NSMutableArray;
+    _pathSeparator: NSString;
+    _columns: NSMutableArray;
+    _brAuxiliaryStorage: id;
+    _firstColumnTitle: NSString;
+    _scroller: NSScroller;
+    _brflags: _Brflags;
     
     
   public
   public
     class function alloc: NSBrowser; message 'alloc';
     class function alloc: NSBrowser; message 'alloc';
@@ -166,6 +175,8 @@ var
     function reusesColumns: Boolean; message 'reusesColumns';
     function reusesColumns: Boolean; message 'reusesColumns';
     procedure setHasHorizontalScroller(flag: Boolean); message 'setHasHorizontalScroller:';
     procedure setHasHorizontalScroller(flag: Boolean); message 'setHasHorizontalScroller:';
     function hasHorizontalScroller: Boolean; message 'hasHorizontalScroller';
     function hasHorizontalScroller: Boolean; message 'hasHorizontalScroller';
+    procedure setAutohidesScroller(flag: Boolean); message 'setAutohidesScroller:';
+    function autohidesScroller: Boolean; message 'autohidesScroller';
     procedure setSeparatesColumns(flag: Boolean); message 'setSeparatesColumns:';
     procedure setSeparatesColumns(flag: Boolean); message 'setSeparatesColumns:';
     function separatesColumns: Boolean; message 'separatesColumns';
     function separatesColumns: Boolean; message 'separatesColumns';
     procedure setTitled(flag: Boolean); message 'setTitled:';
     procedure setTitled(flag: Boolean); message 'setTitled:';
@@ -182,10 +193,15 @@ var
     function allowsEmptySelection: Boolean; message 'allowsEmptySelection';
     function allowsEmptySelection: Boolean; message 'allowsEmptySelection';
     procedure setTakesTitleFromPreviousColumn(flag: Boolean); message 'setTakesTitleFromPreviousColumn:';
     procedure setTakesTitleFromPreviousColumn(flag: Boolean); message 'setTakesTitleFromPreviousColumn:';
     function takesTitleFromPreviousColumn: Boolean; message 'takesTitleFromPreviousColumn';
     function takesTitleFromPreviousColumn: Boolean; message 'takesTitleFromPreviousColumn';
-    procedure setAcceptsArrowKeys(flag: Boolean); message 'setAcceptsArrowKeys:';
-    function acceptsArrowKeys: Boolean; message 'acceptsArrowKeys';
     procedure setSendsActionOnArrowKeys(flag: Boolean); message 'setSendsActionOnArrowKeys:';
     procedure setSendsActionOnArrowKeys(flag: Boolean); message 'setSendsActionOnArrowKeys:';
     function sendsActionOnArrowKeys: Boolean; message 'sendsActionOnArrowKeys';
     function sendsActionOnArrowKeys: Boolean; message 'sendsActionOnArrowKeys';
+    function itemAtIndexPath(indexPath: NSIndexPath): id; message 'itemAtIndexPath:';
+    function itemAtRow_inColumn(row: NSInteger; column: NSInteger): id; message 'itemAtRow:inColumn:';
+    function indexPathForColumn(column: NSInteger): NSIndexPath; message 'indexPathForColumn:';
+    function isLeafItem(item: id): Boolean; message 'isLeafItem:';
+    procedure reloadDataForRowIndexes_inColumn(rowIndexes: NSIndexSet; column: NSInteger); message 'reloadDataForRowIndexes:inColumn:';
+    function parentForItemsInColumn(column: NSInteger): id; message 'parentForItemsInColumn:';
+    procedure scrollRowToVisible_inColumn(row: NSInteger; column: NSInteger); message 'scrollRowToVisible:inColumn:';
     procedure setTitle_ofColumn(aString: NSString; column: NSInteger); message 'setTitle:ofColumn:';
     procedure setTitle_ofColumn(aString: NSString; column: NSInteger); message 'setTitle:ofColumn:';
     function titleOfColumn(column: NSInteger): NSString; message 'titleOfColumn:';
     function titleOfColumn(column: NSInteger): NSString; message 'titleOfColumn:';
     procedure setPathSeparator(newString: NSString); message 'setPathSeparator:';
     procedure setPathSeparator(newString: NSString); message 'setPathSeparator:';
@@ -193,12 +209,18 @@ var
     function setPath(path_: NSString): Boolean; message 'setPath:';
     function setPath(path_: NSString): Boolean; message 'setPath:';
     function path: NSString; message 'path';
     function path: NSString; message 'path';
     function pathToColumn(column: NSInteger): NSString; message 'pathToColumn:';
     function pathToColumn(column: NSInteger): NSString; message 'pathToColumn:';
+    function clickedColumn: NSInteger; message 'clickedColumn';
+    function clickedRow: NSInteger; message 'clickedRow';
     function selectedColumn: NSInteger; message 'selectedColumn';
     function selectedColumn: NSInteger; message 'selectedColumn';
     function selectedCell: id; message 'selectedCell';
     function selectedCell: id; message 'selectedCell';
     function selectedCellInColumn(column: NSInteger): id; message 'selectedCellInColumn:';
     function selectedCellInColumn(column: NSInteger): id; message 'selectedCellInColumn:';
     function selectedCells: NSArray; message 'selectedCells';
     function selectedCells: NSArray; message 'selectedCells';
     procedure selectRow_inColumn(row: NSInteger; column: NSInteger); message 'selectRow:inColumn:';
     procedure selectRow_inColumn(row: NSInteger; column: NSInteger); message 'selectRow:inColumn:';
     function selectedRowInColumn(column: NSInteger): NSInteger; message 'selectedRowInColumn:';
     function selectedRowInColumn(column: NSInteger): NSInteger; message 'selectedRowInColumn:';
+    function selectionIndexPath: NSIndexPath; message 'selectionIndexPath';
+    procedure setSelectionIndexPath(path_: NSIndexPath); message 'setSelectionIndexPath:';
+    function selectionIndexPaths: NSArray; message 'selectionIndexPaths';
+    procedure setSelectionIndexPaths(paths: NSArray); message 'setSelectionIndexPaths:';
     procedure selectRowIndexes_inColumn(indexes: NSIndexSet; column: NSInteger); message 'selectRowIndexes:inColumn:';
     procedure selectRowIndexes_inColumn(indexes: NSIndexSet; column: NSInteger); message 'selectRowIndexes:inColumn:';
     function selectedRowIndexesInColumn(column: NSInteger): NSIndexSet; message 'selectedRowIndexesInColumn:';
     function selectedRowIndexesInColumn(column: NSInteger): NSIndexSet; message 'selectedRowIndexesInColumn:';
     procedure reloadColumn(column: NSInteger); message 'reloadColumn:';
     procedure reloadColumn(column: NSInteger); message 'reloadColumn:';
@@ -206,8 +228,8 @@ var
     procedure scrollColumnsRightBy(shiftAmount: NSInteger); message 'scrollColumnsRightBy:';
     procedure scrollColumnsRightBy(shiftAmount: NSInteger); message 'scrollColumnsRightBy:';
     procedure scrollColumnsLeftBy(shiftAmount: NSInteger); message 'scrollColumnsLeftBy:';
     procedure scrollColumnsLeftBy(shiftAmount: NSInteger); message 'scrollColumnsLeftBy:';
     procedure scrollColumnToVisible(column: NSInteger); message 'scrollColumnToVisible:';
     procedure scrollColumnToVisible(column: NSInteger); message 'scrollColumnToVisible:';
-    procedure setLastColumn(column: NSInteger); message 'setLastColumn:';
     function lastColumn: NSInteger; message 'lastColumn';
     function lastColumn: NSInteger; message 'lastColumn';
+    procedure setLastColumn(column: NSInteger); message 'setLastColumn:';
     procedure addColumn; message 'addColumn';
     procedure addColumn; message 'addColumn';
     function numberOfVisibleColumns: NSInteger; message 'numberOfVisibleColumns';
     function numberOfVisibleColumns: NSInteger; message 'numberOfVisibleColumns';
     function firstVisibleColumn: NSInteger; message 'firstVisibleColumn';
     function firstVisibleColumn: NSInteger; message 'firstVisibleColumn';
@@ -225,14 +247,21 @@ var
     function titleHeight: CGFloat; message 'titleHeight';
     function titleHeight: CGFloat; message 'titleHeight';
     function frameOfColumn(column: NSInteger): NSRect; message 'frameOfColumn:';
     function frameOfColumn(column: NSInteger): NSRect; message 'frameOfColumn:';
     function frameOfInsideOfColumn(column: NSInteger): NSRect; message 'frameOfInsideOfColumn:';
     function frameOfInsideOfColumn(column: NSInteger): NSRect; message 'frameOfInsideOfColumn:';
+    function frameOfRow_inColumn(row: NSInteger; column: NSInteger): NSRect; message 'frameOfRow:inColumn:';
+    function getRow_column_forPoint(row: NSIntegerPtr; column: NSIntegerPtr; point: NSPoint): Boolean; message 'getRow:column:forPoint:';
     function columnWidthForColumnContentWidth(columnContentWidth: CGFloat): CGFloat; message 'columnWidthForColumnContentWidth:';
     function columnWidthForColumnContentWidth(columnContentWidth: CGFloat): CGFloat; message 'columnWidthForColumnContentWidth:';
     function columnContentWidthForColumnWidth(columnWidth: CGFloat): CGFloat; message 'columnContentWidthForColumnWidth:';
     function columnContentWidthForColumnWidth(columnWidth: CGFloat): CGFloat; message 'columnContentWidthForColumnWidth:';
-    procedure setColumnResizingType(columnResizingType_: NSBrowserColumnResizingType); message 'setColumnResizingType:';
+    procedure setColumnResizingType(columnResizingType: NSBrowserColumnResizingType); message 'setColumnResizingType:';
     function columnResizingType: NSBrowserColumnResizingType; message 'columnResizingType';
     function columnResizingType: NSBrowserColumnResizingType; message 'columnResizingType';
     procedure setPrefersAllColumnUserResizing(prefersAllColumnResizing: Boolean); message 'setPrefersAllColumnUserResizing:';
     procedure setPrefersAllColumnUserResizing(prefersAllColumnResizing: Boolean); message 'setPrefersAllColumnUserResizing:';
     function prefersAllColumnUserResizing: Boolean; message 'prefersAllColumnUserResizing';
     function prefersAllColumnUserResizing: Boolean; message 'prefersAllColumnUserResizing';
     procedure setWidth_ofColumn(columnWidth: CGFloat; columnIndex: NSInteger); message 'setWidth:ofColumn:';
     procedure setWidth_ofColumn(columnWidth: CGFloat; columnIndex: NSInteger); message 'setWidth:ofColumn:';
     function widthOfColumn(column: NSInteger): CGFloat; message 'widthOfColumn:';
     function widthOfColumn(column: NSInteger): CGFloat; message 'widthOfColumn:';
+    procedure setRowHeight(height: CGFloat); message 'setRowHeight:';
+    function rowHeight: CGFloat; message 'rowHeight';
+    procedure noteHeightOfRowsWithIndexesChanged_inColumn(indexSet: NSIndexSet; columnIndex: NSInteger); message 'noteHeightOfRowsWithIndexesChanged:inColumn:';
+    procedure setDefaultColumnWidth(columnWidth: CGFloat); message 'setDefaultColumnWidth:';
+    function defaultColumnWidth: CGFloat; message 'defaultColumnWidth';
     procedure setColumnsAutosaveName(name: NSString); message 'setColumnsAutosaveName:';
     procedure setColumnsAutosaveName(name: NSString); message 'setColumnsAutosaveName:';
     function columnsAutosaveName: NSString; message 'columnsAutosaveName';
     function columnsAutosaveName: NSString; message 'columnsAutosaveName';
     class procedure removeSavedColumnsWithAutosaveName(name: NSString); message 'removeSavedColumnsWithAutosaveName:';
     class procedure removeSavedColumnsWithAutosaveName(name: NSString); message 'removeSavedColumnsWithAutosaveName:';
@@ -243,11 +272,61 @@ var
     procedure setAllowsTypeSelect(value: Boolean); message 'setAllowsTypeSelect:';
     procedure setAllowsTypeSelect(value: Boolean); message 'setAllowsTypeSelect:';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     function backgroundColor: NSColor; message 'backgroundColor';
     function backgroundColor: NSColor; message 'backgroundColor';
-    procedure displayColumn(column: NSInteger); message 'displayColumn:';
-    procedure displayAllColumns; message 'displayAllColumns';
-    procedure scrollViaScroller(sender: NSScroller); message 'scrollViaScroller:';
-    procedure updateScroller; message 'updateScroller';
+    procedure editItemAtIndexPath_withEvent_select(indexPath: NSIndexPath; theEvent: NSEvent; select: Boolean); message 'editItemAtIndexPath:withEvent:select:';
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSBrowserCategory }
+  NSDeprecated_NSBrowserCategory = objccategory(NSBrowser)
+    procedure setAcceptsArrowKeys(flag: Boolean); message 'setAcceptsArrowKeys:'; deprecated 'in Mac OS X 10.6 and later';
+    function acceptsArrowKeys: Boolean; message 'acceptsArrowKeys'; deprecated 'in Mac OS X 10.6 and later';
+    procedure displayColumn(column: NSInteger); message 'displayColumn:'; deprecated 'in Mac OS X 10.3 and later';
+    procedure displayAllColumns; message 'displayAllColumns'; deprecated 'in Mac OS X 10.3 and later';
+    procedure scrollViaScroller(sender: NSScroller); message 'scrollViaScroller:'; deprecated 'in Mac OS X 10.3 and later';
+    procedure updateScroller; message 'updateScroller'; deprecated 'in Mac OS X 10.3 and later';
+  end; external name 'NSDeprecated';
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSBROWSER_PAS_P}
+{$define NSBROWSER_PAS_P}
+  
+{ NSBrowserDelegate Protocol }
+  NSBrowserDelegateProtocol = objcprotocol
+    function browser_numberOfRowsInColumn(sender: NSBrowser; column: NSInteger): NSInteger; message 'browser:numberOfRowsInColumn:';
+    procedure browser_createRowsForColumn_inMatrix(sender: NSBrowser; column: NSInteger; matrix: NSMatrix); message 'browser:createRowsForColumn:inMatrix:';
+    function browser_numberOfChildrenOfItem(browser: NSBrowser; item: id): NSInteger; message 'browser:numberOfChildrenOfItem:';
+    function browser_child_ofItem(browser: NSBrowser; index: NSInteger; item: id): id; message 'browser:child:ofItem:';
+    function browser_isLeafItem(browser: NSBrowser; item: id): Boolean; message 'browser:isLeafItem:';
+    function browser_objectValueForItem(browser: NSBrowser; item: id): id; message 'browser:objectValueForItem:';
+    function browser_heightOfRow_inColumn(browser: NSBrowser; row: NSInteger; columnIndex: NSInteger): CGFloat; message 'browser:heightOfRow:inColumn:';
+    function rootItemForBrowser(browser: NSBrowser): id; message 'rootItemForBrowser:';
+    procedure browser_setObjectValue_forItem(browser: NSBrowser; object_: id; item: id); message 'browser:setObjectValue:forItem:';
+    function browser_shouldEditItem(browser: NSBrowser; item: id): Boolean; message 'browser:shouldEditItem:';
+    procedure browser_willDisplayCell_atRow_column(sender: NSBrowser; cell: id; row: NSInteger; column: NSInteger); message 'browser:willDisplayCell:atRow:column:';
+    function browser_titleOfColumn(sender: NSBrowser; column: NSInteger): NSString; message 'browser:titleOfColumn:';
+    function browser_selectCellWithString_inColumn(sender: NSBrowser; title: NSString; column: NSInteger): Boolean; message 'browser:selectCellWithString:inColumn:';
+    function browser_selectRow_inColumn(sender: NSBrowser; row: NSInteger; column: NSInteger): Boolean; message 'browser:selectRow:inColumn:';
+    function browser_isColumnValid(sender: NSBrowser; column: NSInteger): Boolean; message 'browser:isColumnValid:';
+    procedure browserWillScroll(sender: NSBrowser); message 'browserWillScroll:';
+    procedure browserDidScroll(sender: NSBrowser); message 'browserDidScroll:';
+    function browser_shouldSizeColumn_forUserResize_toWidth(browser: NSBrowser; columnIndex: NSInteger; forUserResize: Boolean; suggestedWidth: CGFloat): CGFloat; message 'browser:shouldSizeColumn:forUserResize:toWidth:';
+    function browser_sizeToFitWidthOfColumn(browser: NSBrowser; columnIndex: NSInteger): CGFloat; message 'browser:sizeToFitWidthOfColumn:';
+    procedure browserColumnConfigurationDidChange(notification: NSNotification); message 'browserColumnConfigurationDidChange:';
+    function browser_shouldShowCellExpansionForRow_column(browser: NSBrowser; row: NSInteger; column: NSInteger): Boolean; message 'browser:shouldShowCellExpansionForRow:column:';
+    function browser_writeRowsWithIndexes_inColumn_toPasteboard(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; pasteboard: NSPasteboard): Boolean; message 'browser:writeRowsWithIndexes:inColumn:toPasteboard:';
+    function browser_namesOfPromisedFilesDroppedAtDestination_forDraggedRowsWithIndexes_inColumn(browser: NSBrowser; dropDestination: NSURL; rowIndexes: NSIndexSet; column: NSInteger): NSArray; message 'browser:namesOfPromisedFilesDroppedAtDestination:forDraggedRowsWithIndexes:inColumn:';
+    function browser_canDragRowsWithIndexes_inColumn_withEvent(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent): Boolean; message 'browser:canDragRowsWithIndexes:inColumn:withEvent:';
+    function browser_draggingImageForRowsWithIndexes_inColumn_withEvent_offset(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'browser:draggingImageForRowsWithIndexes:inColumn:withEvent:offset:';
+    function browser_validateDrop_proposedRow_column_dropOperation(browser: NSBrowser; info: id; row: NSIntegerPtr; column: NSIntegerPtr; dropOperation: NSBrowserDropOperationPtr): NSDragOperation; message 'browser:validateDrop:proposedRow:column:dropOperation:';
+    function browser_acceptDrop_atRow_column_dropOperation(browser: NSBrowser; info: id; row: NSInteger; column: NSInteger; dropOperation: NSBrowserDropOperation): Boolean; message 'browser:acceptDrop:atRow:column:dropOperation:';
+    function browser_typeSelectStringForRow_inColumn(browser: NSBrowser; row: NSInteger; column: NSInteger): NSString; message 'browser:typeSelectStringForRow:inColumn:';
+    function browser_shouldTypeSelectForEvent_withCurrentSearchString(browser: NSBrowser; event: NSEvent; searchString: NSString): Boolean; message 'browser:shouldTypeSelectForEvent:withCurrentSearchString:';
+    function browser_nextTypeSelectMatchFromRow_toRow_inColumn_forString(browser: NSBrowser; startRow: NSInteger; endRow: NSInteger; column: NSInteger; searchString: NSString): NSInteger; message 'browser:nextTypeSelectMatchFromRow:toRow:inColumn:forString:';
+    function browser_previewViewControllerForLeafItem(browser: NSBrowser; item: id): NSViewController; message 'browser:previewViewControllerForLeafItem:';
+    function browser_headerViewControllerForItem(browser: NSBrowser; item: id): NSViewController; message 'browser:headerViewControllerForItem:';
+    procedure browser_didChangeLastColumn_toColumn(browser: NSBrowser; oldLastColumn: NSInteger; column: NSInteger); message 'browser:didChangeLastColumn:toColumn:';
+    function browser_selectionIndexesForProposedSelection_inColumn(browser: NSBrowser; proposedSelectionIndexes: NSIndexSet; column: NSInteger): NSIndexSet; message 'browser:selectionIndexesForProposedSelection:inColumn:';
+  end; external name 'NSBrowserDelegate';
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 2 - 1
packages/cocoaint/src/appkit/NSBrowserCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSBrowserCell.h }
 { Parsed from Appkit.framework NSBrowserCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSBrowserCell = objcclass;
   NSBrowserCell = objcclass;
   NSBrowserCellPointer = ^NSBrowserCell;
   NSBrowserCellPointer = ^NSBrowserCell;
+  NSBrowserCellPtr = NSBrowserCellPointer;
 
 
 {$endif}
 {$endif}
 
 

+ 23 - 7
packages/cocoaint/src/appkit/NSButton.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSButton.h }
 { Parsed from Appkit.framework NSButton.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSButton = objcclass;
   NSButton = objcclass;
   NSButtonPointer = ^NSButton;
   NSButtonPointer = ^NSButton;
+  NSButtonPtr = NSButtonPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -72,29 +73,44 @@
     procedure highlight(flag: Boolean); message 'highlight:';
     procedure highlight(flag: Boolean); message 'highlight:';
     function performKeyEquivalent(key: NSEvent): Boolean; message 'performKeyEquivalent:';
     function performKeyEquivalent(key: NSEvent): Boolean; message 'performKeyEquivalent:';
 
 
-    { Category: NSKeyboardUI }
+    { Adopted Protocols }
+    function validateUserInterfaceItem(anItem: id): Boolean;
+  end; external;
+
+{ NSKeyboardUI_NSButtonCategory }
+  NSKeyboardUI_NSButtonCategory = objccategory(NSButton)
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+  end; external name 'NSKeyboardUI';
 
 
-    { Category: NSButtonAttributedStringMethods }
+{ NSButtonAttributedStringMethodsCategory }
+  NSButtonAttributedStringMethodsCategory = objccategory(NSButton)
     function attributedTitle: NSAttributedString; message 'attributedTitle';
     function attributedTitle: NSAttributedString; message 'attributedTitle';
     procedure setAttributedTitle(aString: NSAttributedString); message 'setAttributedTitle:';
     procedure setAttributedTitle(aString: NSAttributedString); message 'setAttributedTitle:';
     function attributedAlternateTitle: NSAttributedString; message 'attributedAlternateTitle';
     function attributedAlternateTitle: NSAttributedString; message 'attributedAlternateTitle';
     procedure setAttributedAlternateTitle(obj: NSAttributedString); message 'setAttributedAlternateTitle:';
     procedure setAttributedAlternateTitle(obj: NSAttributedString); message 'setAttributedAlternateTitle:';
+  end; external;
 
 
-    { Category: NSButtonBezelStyles }
+{ NSButtonBezelStylesCategory }
+  NSButtonBezelStylesCategory = objccategory(NSButton)
     procedure setBezelStyle(bezelStyle_: NSBezelStyle); message 'setBezelStyle:';
     procedure setBezelStyle(bezelStyle_: NSBezelStyle); message 'setBezelStyle:';
     function bezelStyle: NSBezelStyle; message 'bezelStyle';
     function bezelStyle: NSBezelStyle; message 'bezelStyle';
+  end; external;
 
 
-    { Category: NSButtonMixedState }
+{ NSButtonMixedStateCategory }
+  NSButtonMixedStateCategory = objccategory(NSButton)
     procedure setAllowsMixedState(flag: Boolean); message 'setAllowsMixedState:';
     procedure setAllowsMixedState(flag: Boolean); message 'setAllowsMixedState:';
     function allowsMixedState: Boolean; message 'allowsMixedState';
     function allowsMixedState: Boolean; message 'allowsMixedState';
     procedure setNextState; message 'setNextState';
     procedure setNextState; message 'setNextState';
+  end; external;
 
 
-    { Category: NSButtonBorder }
+{ NSButtonBorderCategory }
+  NSButtonBorderCategory = objccategory(NSButton)
     procedure setShowsBorderOnlyWhileMouseInside(show: Boolean); message 'setShowsBorderOnlyWhileMouseInside:';
     procedure setShowsBorderOnlyWhileMouseInside(show: Boolean); message 'setShowsBorderOnlyWhileMouseInside:';
     function showsBorderOnlyWhileMouseInside: Boolean; message 'showsBorderOnlyWhileMouseInside';
     function showsBorderOnlyWhileMouseInside: Boolean; message 'showsBorderOnlyWhileMouseInside';
+  end; external;
 
 
-    { Category: NSButtonSoundExtensions }
+{ NSButtonSoundExtensionsCategory }
+  NSButtonSoundExtensionsCategory = objccategory(NSButton)
     procedure setSound(aSound: NSSound); message 'setSound:';
     procedure setSound(aSound: NSSound); message 'setSound:';
     function sound: NSSound; message 'sound';
     function sound: NSSound; message 'sound';
   end; external;
   end; external;

+ 37 - 19
packages/cocoaint/src/appkit/NSButtonCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSButtonCell.h }
 { Parsed from Appkit.framework NSButtonCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -47,8 +47,11 @@ const
 { Types }
 { Types }
 type
 type
   NSButtonType = NSUInteger;
   NSButtonType = NSUInteger;
+  NSButtonTypePtr = ^NSButtonType;
   NSBezelStyle = NSUInteger;
   NSBezelStyle = NSUInteger;
+  NSBezelStylePtr = ^NSBezelStyle;
   NSGradientType = NSUInteger;
   NSGradientType = NSUInteger;
+  NSGradientTypePtr = ^NSGradientType;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -59,7 +62,7 @@ type
 
 
 { Records }
 { Records }
 type
 type
-  __BCFlags = bitpacked record
+  __BCFlags = record
 {$ifdef fpc_big_endian}
 {$ifdef fpc_big_endian}
     pushIn: 0..1;
     pushIn: 0..1;
     changeContents: 0..1;
     changeContents: 0..1;
@@ -80,13 +83,15 @@ type
     transparent: 0..1;
     transparent: 0..1;
     inset: 0..((1 shl 2)-1);
     inset: 0..((1 shl 2)-1);
     doesNotDimImage: 0..1;
     doesNotDimImage: 0..1;
-    gradientType: 0..((1 shl 3)-1);
+    suppressAXValueChangeNote: 0..1;
+    reserved: 0..((1 shl 2)-1);
     useButtonImageSource: 0..1;
     useButtonImageSource: 0..1;
     alternateMnemonicLocation: 0..((1 shl 8)-1);
     alternateMnemonicLocation: 0..((1 shl 8)-1);
 {$else}
 {$else}
     alternateMnemonicLocation: 0..((1 shl 8)-1);
     alternateMnemonicLocation: 0..((1 shl 8)-1);
     useButtonImageSource: 0..1;
     useButtonImageSource: 0..1;
-    gradientType: 0..((1 shl 3)-1);
+    reserved: 0..((1 shl 2)-1);
+    suppressAXValueChangeNote: 0..1;
     doesNotDimImage: 0..1;
     doesNotDimImage: 0..1;
     inset: 0..((1 shl 2)-1);
     inset: 0..((1 shl 2)-1);
     transparent: 0..1;
     transparent: 0..1;
@@ -109,9 +114,10 @@ type
 {$endif}
 {$endif}
   end;
   end;
 _BCFlags = __BCFlags;
 _BCFlags = __BCFlags;
+__BCFlagsPtr = ^__BCFlags;
 
 
 type
 type
-  __BCFlags2 = bitpacked record
+  __BCFlags2 = record
 {$ifdef fpc_big_endian}
 {$ifdef fpc_big_endian}
     keyEquivalentModifierMask: 0..((1 shl 24)-1);
     keyEquivalentModifierMask: 0..((1 shl 24)-1);
     imageScaling: 0..((1 shl 2)-1);
     imageScaling: 0..((1 shl 2)-1);
@@ -129,6 +135,7 @@ type
 {$endif}
 {$endif}
   end;
   end;
 _BCFlags2 = __BCFlags2;
 _BCFlags2 = __BCFlags2;
+__BCFlags2Ptr = ^__BCFlags2;
 
 
 
 
 {$endif}
 {$endif}
@@ -151,6 +158,7 @@ _BCFlags2 = __BCFlags2;
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSButtonCell = objcclass;
   NSButtonCell = objcclass;
   NSButtonCellPointer = ^NSButtonCell;
   NSButtonCellPointer = ^NSButtonCell;
+  NSButtonCellPtr = NSButtonCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -161,15 +169,15 @@ _BCFlags2 = __BCFlags2;
 { NSButtonCell }
 { NSButtonCell }
   NSButtonCell = objcclass(NSActionCell)
   NSButtonCell = objcclass(NSActionCell)
   private
   private
-    __altContents: NSString;
-    __sound: id;
-    __keyEquivalent: NSString;
-    __bcFlags2: _BCFlags2;
-    __periodicDelay: cushort;
-    __periodicInterval: cushort;
-    __bcFlags: _BCFlags;
-    __normalImage: NSImage;
-    __alternateImageOrKeyEquivalentFont: id;
+    _altContents: NSString;
+    _sound: id;
+    _keyEquivalent: NSString;
+    _bcFlags2: _BCFlags2;
+    _periodicDelay: cushort;
+    _periodicInterval: cushort;
+    _bcFlags: _BCFlags;
+    _normalImage: NSImage;
+    _alternateImageOrKeyEquivalentFont: id;
     
     
   public
   public
     class function alloc: NSButtonCell; message 'alloc';
     class function alloc: NSButtonCell; message 'alloc';
@@ -206,15 +214,19 @@ _BCFlags2 = __BCFlags2;
     procedure drawImage_withFrame_inView(image_: NSImage; frame: NSRect; controlView_: NSView); message 'drawImage:withFrame:inView:';
     procedure drawImage_withFrame_inView(image_: NSImage; frame: NSRect; controlView_: NSView); message 'drawImage:withFrame:inView:';
     function drawTitle_withFrame_inView(title_: NSAttributedString; frame: NSRect; controlView_: NSView): NSRect; message 'drawTitle:withFrame:inView:';
     function drawTitle_withFrame_inView(title_: NSAttributedString; frame: NSRect; controlView_: NSView): NSRect; message 'drawTitle:withFrame:inView:';
     procedure drawBezelWithFrame_inView(frame: NSRect; controlView_: NSView); message 'drawBezelWithFrame:inView:';
     procedure drawBezelWithFrame_inView(frame: NSRect; controlView_: NSView); message 'drawBezelWithFrame:inView:';
+  end; external;
 
 
-    { Category: NSKeyboardUI }
+{ NSKeyboardUI_NSButtonCellCategory }
+  NSKeyboardUI_NSButtonCellCategory = objccategory(NSButtonCell)
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
     procedure setAlternateTitleWithMnemonic(stringWithAmpersand: NSString); message 'setAlternateTitleWithMnemonic:';
     procedure setAlternateTitleWithMnemonic(stringWithAmpersand: NSString); message 'setAlternateTitleWithMnemonic:';
     procedure setAlternateMnemonicLocation(location: NSUInteger); message 'setAlternateMnemonicLocation:';
     procedure setAlternateMnemonicLocation(location: NSUInteger); message 'setAlternateMnemonicLocation:';
     function alternateMnemonicLocation: NSUInteger; message 'alternateMnemonicLocation';
     function alternateMnemonicLocation: NSUInteger; message 'alternateMnemonicLocation';
     function alternateMnemonic: NSString; message 'alternateMnemonic';
     function alternateMnemonic: NSString; message 'alternateMnemonic';
+  end; external name 'NSKeyboardUI';
 
 
-    { Category: NSButtonCellExtensions }
+{ NSButtonCellExtensionsCategory }
+  NSButtonCellExtensionsCategory = objccategory(NSButtonCell)
     function gradientType: NSGradientType; message 'gradientType';
     function gradientType: NSGradientType; message 'gradientType';
     procedure setGradientType(type__: NSGradientType); message 'setGradientType:';
     procedure setGradientType(type__: NSGradientType); message 'setGradientType:';
     procedure setImageDimsWhenDisabled(flag: Boolean); message 'setImageDimsWhenDisabled:';
     procedure setImageDimsWhenDisabled(flag: Boolean); message 'setImageDimsWhenDisabled:';
@@ -225,18 +237,24 @@ _BCFlags2 = __BCFlags2;
     procedure mouseExited(event: NSEvent); message 'mouseExited:';
     procedure mouseExited(event: NSEvent); message 'mouseExited:';
     function backgroundColor: NSColor; message 'backgroundColor';
     function backgroundColor: NSColor; message 'backgroundColor';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
+  end; external;
 
 
-    { Category: NSButtonCellAttributedStringMethods }
+{ NSButtonCellAttributedStringMethodsCategory }
+  NSButtonCellAttributedStringMethodsCategory = objccategory(NSButtonCell)
     function attributedTitle: NSAttributedString; message 'attributedTitle';
     function attributedTitle: NSAttributedString; message 'attributedTitle';
     procedure setAttributedTitle(obj: NSAttributedString); message 'setAttributedTitle:';
     procedure setAttributedTitle(obj: NSAttributedString); message 'setAttributedTitle:';
     function attributedAlternateTitle: NSAttributedString; message 'attributedAlternateTitle';
     function attributedAlternateTitle: NSAttributedString; message 'attributedAlternateTitle';
     procedure setAttributedAlternateTitle(obj: NSAttributedString); message 'setAttributedAlternateTitle:';
     procedure setAttributedAlternateTitle(obj: NSAttributedString); message 'setAttributedAlternateTitle:';
+  end; external;
 
 
-    { Category: NSButtonCellBezelStyles }
+{ NSButtonCellBezelStylesCategory }
+  NSButtonCellBezelStylesCategory = objccategory(NSButtonCell)
     procedure setBezelStyle(bezelStyle_: NSBezelStyle); message 'setBezelStyle:';
     procedure setBezelStyle(bezelStyle_: NSBezelStyle); message 'setBezelStyle:';
     function bezelStyle: NSBezelStyle; message 'bezelStyle';
     function bezelStyle: NSBezelStyle; message 'bezelStyle';
+  end; external;
 
 
-    { Category: NSButtonCellSoundExtensions }
+{ NSButtonCellSoundExtensionsCategory }
+  NSButtonCellSoundExtensionsCategory = objccategory(NSButtonCell)
     procedure setSound(aSound: NSSound); message 'setSound:';
     procedure setSound(aSound: NSSound); message 'setSound:';
     function sound: NSSound; message 'sound';
     function sound: NSSound; message 'sound';
   end; external;
   end; external;

+ 12 - 4
packages/cocoaint/src/appkit/NSCIImageRep.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSCIImageRep.h }
 { Parsed from Appkit.framework NSCIImageRep.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSCIImageRep = objcclass;
   NSCIImageRep = objcclass;
   NSCIImageRepPointer = ^NSCIImageRep;
   NSCIImageRepPointer = ^NSCIImageRep;
+  NSCIImageRepPtr = NSCIImageRepPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,15 +44,22 @@
 { NSCIImageRep }
 { NSCIImageRep }
   NSCIImageRep = objcclass(NSImageRep)
   NSCIImageRep = objcclass(NSImageRep)
   private
   private
-    __ciImage: CIImage;
+    _ciImage: CIImage;
     
     
   public
   public
     class function alloc: NSCIImageRep; message 'alloc';
     class function alloc: NSCIImageRep; message 'alloc';
 
 
-    class function imageRepWithCIImage(image: CIImage_Pointer): id; message 'imageRepWithCIImage:';
-    function initWithCIImage(image: CIImage_Pointer): id; message 'initWithCIImage:';
+    class function imageRepWithCIImage(image: CIImage): id; message 'imageRepWithCIImage:';
+    function initWithCIImage(image: CIImage): id; message 'initWithCIImage:';
     function CIImage: CIImage; message 'CIImage';
     function CIImage: CIImage; message 'CIImage';
   end; external;
   end; external;
 
 
+{ NSAppKitAdditions_CIImageCategory }
+  NSAppKitAdditions_CIImageCategory = objccategory(CIImage)
+    function initWithBitmapImageRep(bitmapImageRep: NSBitmapImageRep): id; message 'initWithBitmapImageRep:';
+    procedure drawInRect_fromRect_operation_fraction(rect: NSRect; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawInRect:fromRect:operation:fraction:';
+    procedure drawAtPoint_fromRect_operation_fraction(point: NSPoint; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawAtPoint:fromRect:operation:fraction:';
+  end; external name 'NSAppKitAdditions';
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 6 - 5
packages/cocoaint/src/appkit/NSCachedImageRep.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSCachedImageRep.h }
 { Parsed from Appkit.framework NSCachedImageRep.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSCachedImageRep = objcclass;
   NSCachedImageRep = objcclass;
   NSCachedImageRepPointer = ^NSCachedImageRep;
   NSCachedImageRepPointer = ^NSCachedImageRep;
+  NSCachedImageRepPtr = NSCachedImageRepPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,14 +44,14 @@
 { NSCachedImageRep }
 { NSCachedImageRep }
   NSCachedImageRep = objcclass(NSImageRep)
   NSCachedImageRep = objcclass(NSImageRep)
   private
   private
-    __origin: NSPoint;
-    __window: NSWindow;
-    __cache: Pointer; {garbage collector: __strong }
+    _origin: NSPoint;
+    _window: NSWindow;
+    _cache: Pointer; {garbage collector: __strong }
     
     
   public
   public
     class function alloc: NSCachedImageRep; message 'alloc';
     class function alloc: NSCachedImageRep; message 'alloc';
 
 
-    function initWithWindow_rect(win: NSWindow; rect_: NSRect): id; message 'initWithWindow:rect:';
+    function initWithWindow_rect(win: NSWindow; rect: NSRect): id; message 'initWithWindow:rect:';
     function initWithSize_depth_separate_alpha(size_: NSSize; depth: NSWindowDepth; flag: Boolean; alpha: Boolean): id; message 'initWithSize:depth:separate:alpha:';
     function initWithSize_depth_separate_alpha(size_: NSSize; depth: NSWindowDepth; flag: Boolean; alpha: Boolean): id; message 'initWithSize:depth:separate:alpha:';
     function window: NSWindow; message 'window';
     function window: NSWindow; message 'window';
     function rect: NSRect; message 'rect';
     function rect: NSRect; message 'rect';

+ 115 - 71
packages/cocoaint/src/appkit/NSCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSCell.h }
 { Parsed from Appkit.framework NSCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -50,11 +50,6 @@ const
   NSImageAbove = 5;
   NSImageAbove = 5;
   NSImageOverlaps = 6;
   NSImageOverlaps = 6;
 
 
-const
-  NSScaleProportionally = 0;
-  NSScaleToFit = 0;
-  NSScaleNone = 1;
-
 const
 const
   NSImageScaleProportionallyDown = 0;
   NSImageScaleProportionallyDown = 0;
   NSImageScaleAxesIndependently = 0;
   NSImageScaleAxesIndependently = 0;
@@ -82,12 +77,13 @@ const
 const
 const
   NSRegularControlSize = 0;
   NSRegularControlSize = 0;
   NSSmallControlSize = 1;
   NSSmallControlSize = 1;
+  NSMiniControlSize = 2;
 
 
 const
 const
   NSCellHitNone = 0;
   NSCellHitNone = 0;
-  NSCellHitContentArea = 1  shl  0;
-  NSCellHitEditableTextArea = 1  shl  1;
-  NSCellHitTrackableArea = 1  shl  2;
+  NSCellHitContentArea = 1 shl 0;
+  NSCellHitEditableTextArea = 1 shl 1;
+  NSCellHitTrackableArea = 1 shl 2;
 
 
 const
 const
   NSBackgroundStyleLight = 0;
   NSBackgroundStyleLight = 0;
@@ -95,16 +91,29 @@ const
   NSBackgroundStyleRaised = 1;
   NSBackgroundStyleRaised = 1;
   NSBackgroundStyleLowered = 2;
   NSBackgroundStyleLowered = 2;
 
 
+const
+  NSScaleProportionally = 0;
+  NSScaleToFit = 0;
+  NSScaleNone = 1;
+
 { Types }
 { Types }
 type
 type
   NSCellType = NSUInteger;
   NSCellType = NSUInteger;
+  NSCellTypePtr = ^NSCellType;
   NSCellAttribute = NSUInteger;
   NSCellAttribute = NSUInteger;
+  NSCellAttributePtr = ^NSCellAttribute;
   NSCellImagePosition = NSUInteger;
   NSCellImagePosition = NSUInteger;
+  NSCellImagePositionPtr = ^NSCellImagePosition;
   NSImageScaling = NSUInteger;
   NSImageScaling = NSUInteger;
+  NSImageScalingPtr = ^NSImageScaling;
   NSCellStateValue = NSInteger;
   NSCellStateValue = NSInteger;
+  NSCellStateValuePtr = ^NSCellStateValue;
   NSControlTint = NSUInteger;
   NSControlTint = NSUInteger;
+  NSControlTintPtr = ^NSControlTint;
   NSControlSize = NSUInteger;
   NSControlSize = NSUInteger;
+  NSControlSizePtr = ^NSControlSize;
   NSBackgroundStyle = NSInteger;
   NSBackgroundStyle = NSInteger;
+  NSBackgroundStylePtr = ^NSBackgroundStyle;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -116,55 +125,62 @@ type
 { Records }
 { Records }
 type
 type
   __CFlags = bitpacked record
   __CFlags = bitpacked record
-    state: 0..1;
-    highlighted: 0..1;
-    disabled: 0..1;
-    editable: 0..1;
-    type_: 0..((1 shl 2)-1);
-    vCentered: 0..1;
-    hCentered: 0..1;
-    bordered: 0..1;
-    bezeled: 0..1;
-    selectable: 0..1;
-    scrollable: 0..1;
-    continuous: 0..1;
-    actOnMouseDown: 0..1;
-    isLeaf: 0..1;
-    invalidObjectValue: 0..1;
-    invalidFont: 0..1;
-    lineBreakMode: 0..((1 shl 3)-1);
-    backgroundStyle: 0..((1 shl 2)-1);
-    reserved1: 0..1;
-    actOnMouseDragged: 0..1;
-    isLoaded: 0..1;
-    truncateLastLine: 0..1;
-    dontActOnMouseUp: 0..1;
-    isWhite: 0..1;
-    useUserKeyEquivalent: 0..1;
-    showsFirstResponder: 0..1;
-    focusRingType: 0..((1 shl 2)-1);
-    wasSelectable: 0..1;
-    hasInvalidObject: 0..1;
-    allowsEditingTextAttributes: 0..1;
-    importsGraphics: 0..1;
-    alignment: 0..((1 shl 3)-1);
-    reserved: 0..((1 shl 8)-1);
-    refusesFirstResponder: 0..1;
-    needsHighlightedText: 0..1;
-    dontAllowsUndo: 0..1;
-    currentlyEditing: 0..1;
-    allowsMixedState: 0..1;
-    inMixedState: 0..1;
-    sendsActionOnEndEditing: 0..1;
-    inSendAction: 0..1;
-    menuWasSet: 0..1;
-    controlTint: 0..((1 shl 3)-1);
-    controlSize: 0..((1 shl 2)-1);
-    branchImageDisabled: 0..1;
-    drawingInRevealover: 0..1;
-    needsHighlightedTextHint: 0..1;
+    case byte of
+    0: (_anonbitfield_NSCell0: cuint);
+    1: (
+          state: 0..1;
+          highlighted: 0..1;
+          disabled: 0..1;
+          editable: 0..1;
+          _type: 0..((1 shl 2)-1);
+          vCentered: 0..1;
+          hCentered: 0..1;
+          bordered: 0..1;
+          bezeled: 0..1;
+          selectable: 0..1;
+          scrollable: 0..1;
+          continuous: 0..1;
+          actOnMouseDown: 0..1;
+          isLeaf: 0..1;
+          invalidObjectValue: 0..1;
+          invalidFont: 0..1;
+          lineBreakMode: 0..((1 shl 3)-1);
+          cellReserved1: 0..((1 shl 2)-1);
+          singleLineMode: 0..1;
+          actOnMouseDragged: 0..1;
+          isLoaded: 0..1;
+          truncateLastLine: 0..1;
+          dontActOnMouseUp: 0..1;
+          isWhite: 0..1;
+          useUserKeyEquivalent: 0..1;
+          showsFirstResponder: 0..1;
+          focusRingType: 0..((1 shl 2)-1);
+          wasSelectable: 0..1;
+          hasInvalidObject: 0..1;
+          allowsEditingTextAttributes: 0..1;
+          importsGraphics: 0..1;
+          alignment: 0..((1 shl 3)-1);
+          layoutDirectionRTL: 0..1;
+          backgroundStyle: 0..((1 shl 3)-1);
+          cellReserved2: 0..((1 shl 4)-1);
+          refusesFirstResponder: 0..1;
+          needsHighlightedText: 0..1;
+          dontAllowsUndo: 0..1;
+          currentlyEditing: 0..1;
+          allowsMixedState: 0..1;
+          inMixedState: 0..1;
+          sendsActionOnEndEditing: 0..1;
+          inSendAction: 0..1;
+          menuWasSet: 0..1;
+          controlTint: 0..((1 shl 3)-1);
+          controlSize: 0..((1 shl 2)-1);
+          branchImageDisabled: 0..1;
+          drawingInRevealover: 0..1;
+          needsHighlightedTextHint: 0..1;
+       );
   end;
   end;
 _CFlags = __CFlags;
 _CFlags = __CFlags;
+__CFlagsPtr = ^__CFlags;
 
 
 
 
 {$endif}
 {$endif}
@@ -175,8 +191,8 @@ _CFlags = __CFlags;
 {$define NSCELL_PAS_F}
 {$define NSCELL_PAS_F}
 
 
 { Functions }
 { Functions }
-procedure NSDrawThreePartImage(frame: NSRect; startCapPointer: NSImage; centerFillPointer: NSImage; endCapPointer: NSImage; vertical: Boolean; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: Boolean); cdecl; external name 'NSDrawThreePartImage';
-procedure NSDrawNinePartImage(frame: NSRect; topLeftCornerPointer: NSImage; topEdgeFillPointer: NSImage; topRightCornerPointer: NSImage; leftEdgeFillPointer: NSImage; centerFillPointer: NSImage; rightEdgeFillPointer: NSImage; bottomLeftCornerPointer: NSImage; bottomEdgeFillPointer: NSImage; bottomRightCornerPointer: NSImage; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: Boolean); cdecl; external name 'NSDrawNinePartImage';
+procedure NSDrawThreePartImage(frame: NSRect; startCap: NSImage; centerFill: NSImage; endCap: NSImage; vertical: Boolean; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: Boolean); cdecl; external;
+procedure NSDrawNinePartImage(frame: NSRect; topLeftCorner: NSImage; topEdgeFill: NSImage; topRightCorner: NSImage; leftEdgeFill: NSImage; centerFill: NSImage; rightEdgeFill: NSImage; bottomLeftCorner: NSImage; bottomEdgeFill: NSImage; bottomRightCorner: NSImage; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: Boolean); cdecl; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -187,7 +203,7 @@ procedure NSDrawNinePartImage(frame: NSRect; topLeftCornerPointer: NSImage; topE
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSControlTintDidChangeNotification: NSString; external name '_NSControlTintDidChangeNotification';
+  NSControlTintDidChangeNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -195,6 +211,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSCell = objcclass;
   NSCell = objcclass;
   NSCellPointer = ^NSCell;
   NSCellPointer = ^NSCell;
+  NSCellPtr = NSCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -205,9 +222,9 @@ var
 { NSCell }
 { NSCell }
   NSCell = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSCell = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __contents: id;
-    __cFlags: _CFlags;
-    __support: id;
+    _contents: id;
+    _cFlags: _CFlags;
+    _support: id;
     
     
   public
   public
     class function alloc: NSCell; message 'alloc';
     class function alloc: NSCell; message 'alloc';
@@ -253,10 +270,7 @@ var
     procedure setWraps(flag: Boolean); message 'setWraps:';
     procedure setWraps(flag: Boolean); message 'setWraps:';
     function font: NSFont; message 'font';
     function font: NSFont; message 'font';
     procedure setFont(fontObj: NSFont); message 'setFont:';
     procedure setFont(fontObj: NSFont); message 'setFont:';
-    function entryType: NSInteger; message 'entryType';
-    procedure setEntryType(aType: NSInteger); message 'setEntryType:';
     function isEntryAcceptable(aString: NSString): Boolean; message 'isEntryAcceptable:';
     function isEntryAcceptable(aString: NSString): Boolean; message 'isEntryAcceptable:';
-    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:';
     function keyEquivalent: NSString; message 'keyEquivalent';
     function keyEquivalent: NSString; message 'keyEquivalent';
     procedure setFormatter(newFormatter: NSFormatter); message 'setFormatter:';
     procedure setFormatter(newFormatter: NSFormatter); message 'setFormatter:';
     function formatter: id; message 'formatter';
     function formatter: id; message 'formatter';
@@ -323,9 +337,22 @@ var
     function integerValue: NSInteger; message 'integerValue';
     function integerValue: NSInteger; message 'integerValue';
     procedure setIntegerValue(anInteger: NSInteger); message 'setIntegerValue:';
     procedure setIntegerValue(anInteger: NSInteger); message 'setIntegerValue:';
     procedure takeIntegerValueFrom(sender: id); message 'takeIntegerValueFrom:';
     procedure takeIntegerValueFrom(sender: id); message 'takeIntegerValueFrom:';
+    function truncatesLastVisibleLine: Boolean; message 'truncatesLastVisibleLine';
     procedure setTruncatesLastVisibleLine(flag: Boolean); message 'setTruncatesLastVisibleLine:';
     procedure setTruncatesLastVisibleLine(flag: Boolean); message 'setTruncatesLastVisibleLine:';
+    function userInterfaceLayoutDirection: NSUserInterfaceLayoutDirection; message 'userInterfaceLayoutDirection';
+    procedure setUserInterfaceLayoutDirection(layoutDirection: NSUserInterfaceLayoutDirection); message 'setUserInterfaceLayoutDirection:';
+    function fieldEditorForView(aControlView: NSView): NSTextView; message 'fieldEditorForView:';
+    function usesSingleLineMode: Boolean; message 'usesSingleLineMode';
+    procedure setUsesSingleLineMode(flag: Boolean); message 'setUsesSingleLineMode:';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
 
 
-    { Category: NSKeyboardUI }
+{ NSKeyboardUI_NSCellCategory }
+  NSKeyboardUI_NSCellCategory = objccategory(NSCell)
     procedure setRefusesFirstResponder(flag: Boolean); message 'setRefusesFirstResponder:';
     procedure setRefusesFirstResponder(flag: Boolean); message 'setRefusesFirstResponder:';
     function refusesFirstResponder: Boolean; message 'refusesFirstResponder';
     function refusesFirstResponder: Boolean; message 'refusesFirstResponder';
     function acceptsFirstResponder: Boolean; message 'acceptsFirstResponder';
     function acceptsFirstResponder: Boolean; message 'acceptsFirstResponder';
@@ -340,33 +367,50 @@ var
     function focusRingType: NSFocusRingType; message 'focusRingType';
     function focusRingType: NSFocusRingType; message 'focusRingType';
     class function defaultFocusRingType: NSFocusRingType; message 'defaultFocusRingType';
     class function defaultFocusRingType: NSFocusRingType; message 'defaultFocusRingType';
     function wantsNotificationForMarkedText: Boolean; message 'wantsNotificationForMarkedText';
     function wantsNotificationForMarkedText: Boolean; message 'wantsNotificationForMarkedText';
+  end; external name 'NSKeyboardUI';
 
 
-    { Category: NSCellAttributedStringMethods }
+{ NSCellAttributedStringMethodsCategory }
+  NSCellAttributedStringMethodsCategory = objccategory(NSCell)
     function attributedStringValue: NSAttributedString; message 'attributedStringValue';
     function attributedStringValue: NSAttributedString; message 'attributedStringValue';
     procedure setAttributedStringValue(obj: NSAttributedString); message 'setAttributedStringValue:';
     procedure setAttributedStringValue(obj: NSAttributedString); message 'setAttributedStringValue:';
     function allowsEditingTextAttributes: Boolean; message 'allowsEditingTextAttributes';
     function allowsEditingTextAttributes: Boolean; message 'allowsEditingTextAttributes';
     procedure setAllowsEditingTextAttributes(flag: Boolean); message 'setAllowsEditingTextAttributes:';
     procedure setAllowsEditingTextAttributes(flag: Boolean); message 'setAllowsEditingTextAttributes:';
     function importsGraphics: Boolean; message 'importsGraphics';
     function importsGraphics: Boolean; message 'importsGraphics';
     procedure setImportsGraphics(flag: Boolean); message 'setImportsGraphics:';
     procedure setImportsGraphics(flag: Boolean); message 'setImportsGraphics:';
+  end; external;
 
 
-    { Category: NSCellMixedState }
+{ NSCellMixedStateCategory }
+  NSCellMixedStateCategory = objccategory(NSCell)
     procedure setAllowsMixedState(flag: Boolean); message 'setAllowsMixedState:';
     procedure setAllowsMixedState(flag: Boolean); message 'setAllowsMixedState:';
     function allowsMixedState: Boolean; message 'allowsMixedState';
     function allowsMixedState: Boolean; message 'allowsMixedState';
     function nextState: NSInteger; message 'nextState';
     function nextState: NSInteger; message 'nextState';
     procedure setNextState; message 'setNextState';
     procedure setNextState; message 'setNextState';
+  end; external;
 
 
-    { Category: NSCellHitTest }
+{ NSCellHitTestCategory }
+  NSCellHitTestCategory = objccategory(NSCell)
     function hitTestForEvent_inRect_ofView(event: NSEvent; cellFrame: NSRect; controlView_: NSView): NSUInteger; message 'hitTestForEvent:inRect:ofView:';
     function hitTestForEvent_inRect_ofView(event: NSEvent; cellFrame: NSRect; controlView_: NSView): NSUInteger; message 'hitTestForEvent:inRect:ofView:';
+  end; external;
 
 
-    { Category: NSCellExpansion }
+{ NSCellExpansionCategory }
+  NSCellExpansionCategory = objccategory(NSCell)
     function expansionFrameWithFrame_inView(cellFrame: NSRect; view: NSView): NSRect; message 'expansionFrameWithFrame:inView:';
     function expansionFrameWithFrame_inView(cellFrame: NSRect; view: NSView): NSRect; message 'expansionFrameWithFrame:inView:';
     procedure drawWithExpansionFrame_inView(cellFrame: NSRect; view: NSView); message 'drawWithExpansionFrame:inView:';
     procedure drawWithExpansionFrame_inView(cellFrame: NSRect; view: NSView); message 'drawWithExpansionFrame:inView:';
+  end; external;
 
 
-    { Category: NSCellBackgroundStyle }
+{ NSCellBackgroundStyleCategory }
+  NSCellBackgroundStyleCategory = objccategory(NSCell)
     function backgroundStyle: NSBackgroundStyle; message 'backgroundStyle';
     function backgroundStyle: NSBackgroundStyle; message 'backgroundStyle';
     procedure setBackgroundStyle(style: NSBackgroundStyle); message 'setBackgroundStyle:';
     procedure setBackgroundStyle(style: NSBackgroundStyle); message 'setBackgroundStyle:';
     function interiorBackgroundStyle: NSBackgroundStyle; message 'interiorBackgroundStyle';
     function interiorBackgroundStyle: NSBackgroundStyle; message 'interiorBackgroundStyle';
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSCellCategory }
+  NSDeprecated_NSCellCategory = objccategory(NSCell)
+    function entryType: NSInteger; message 'entryType'; deprecated 'in Mac OS X 10 and later';
+    procedure setEntryType(aType: NSInteger); message 'setEntryType:'; deprecated 'in Mac OS X 10 and later';
+    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:'; deprecated 'in Mac OS X 10 and later';
+  end; external name 'NSDeprecated';
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 22 - 10
packages/cocoaint/src/appkit/NSClipView.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSClipView.h }
 { Parsed from Appkit.framework NSClipView.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSClipView = objcclass;
   NSClipView = objcclass;
   NSClipViewPointer = ^NSClipView;
   NSClipViewPointer = ^NSClipView;
+  NSClipViewPtr = NSClipViewPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,20 +44,23 @@
 { NSClipView }
 { NSClipView }
   NSClipView = objcclass(NSView)
   NSClipView = objcclass(NSView)
   private
   private
-    __backgroundColor: NSColor;
-    __docView: NSView;
-    __docRect: NSRect;
-    __oldDocFrame: NSRect;
-    __cursor: NSCursor;
-    __scrollAnimationHelper: id;
+    _backgroundColor: NSColor;
+    _docView: NSView;
+    _docRect: NSRect;
+    _oldDocFrame: NSRect;
+    _cursor: NSCursor;
+    _scrollAnimationHelper: id;
     __cvFlags: bitpacked record
     __cvFlags: bitpacked record
-        isFlipped: 0..1;
+      case byte of
+       0: (_anonbitfield_NSClipView0: cuint);
+       1: (
+        _isFlipped: 0..1;
         onlyUncovered: 0..1;
         onlyUncovered: 0..1;
         reflectScroll: 0..1;
         reflectScroll: 0..1;
         usedByCell: 0..1;
         usedByCell: 0..1;
         scrollClipTo: 0..1;
         scrollClipTo: 0..1;
         noCopyOnScroll: 0..1;
         noCopyOnScroll: 0..1;
-        drawsBackground: 0..1;
+        _drawsBackground: 0..1;
         scrollInProgress: 0..1;
         scrollInProgress: 0..1;
         skipRemoveSuperviewCheck: 0..1;
         skipRemoveSuperviewCheck: 0..1;
         animateCurrentScroll: 0..1;
         animateCurrentScroll: 0..1;
@@ -65,7 +69,9 @@
         viewBoundsChangedOverridden: 0..1;
         viewBoundsChangedOverridden: 0..1;
         viewFrameChangedOverridden: 0..1;
         viewFrameChangedOverridden: 0..1;
         documentViewAlignment: 0..((1 shl 4)-1);
         documentViewAlignment: 0..((1 shl 4)-1);
-        RESERVED: 0..((1 shl 14)-1);
+        redrawnWhileScrolling: 0..1;
+        RESERVED: 0..((1 shl 13)-1);
+      );
       end;
       end;
     
     
   public
   public
@@ -90,5 +96,11 @@
     procedure scrollToPoint(newOrigin: NSPoint); message 'scrollToPoint:';
     procedure scrollToPoint(newOrigin: NSPoint); message 'scrollToPoint:';
   end; external;
   end; external;
 
 
+{ NSClipViewSuperviewCategory }
+  NSClipViewSuperviewCategory = objccategory(NSView)
+    procedure reflectScrolledClipView(aClipView: NSClipView); message 'reflectScrolledClipView:';
+    procedure scrollClipView_toPoint(aClipView: NSClipView; aPoint: NSPoint); message 'scrollClipView:toPoint:';
+  end; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 98 - 57
packages/cocoaint/src/appkit/NSCollectionView.inc

@@ -1,11 +1,22 @@
 { Parsed from Appkit.framework NSCollectionView.h }
 { Parsed from Appkit.framework NSCollectionView.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:08 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:07 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
 {$ifndef NSCOLLECTIONVIEW_PAS_T}
 {$ifndef NSCOLLECTIONVIEW_PAS_T}
 {$define NSCOLLECTIONVIEW_PAS_T}
 {$define NSCOLLECTIONVIEW_PAS_T}
 
 
+{ Types }
+type
+  NSCollectionViewDropOperation = NSInteger;
+  NSCollectionViewDropOperationPtr = ^NSCollectionViewDropOperation;
+
+{ Constants }
+
+const
+  NSCollectionViewDropOn = 0;
+  NSCollectionViewDropBefore = 1;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
@@ -31,10 +42,13 @@
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSCollectionViewDelegateProtocol = objcprotocol;
   NSCollectionViewItem = objcclass;
   NSCollectionViewItem = objcclass;
   NSCollectionViewItemPointer = ^NSCollectionViewItem;
   NSCollectionViewItemPointer = ^NSCollectionViewItem;
+  NSCollectionViewItemPtr = NSCollectionViewItemPointer;
   NSCollectionView = objcclass;
   NSCollectionView = objcclass;
   NSCollectionViewPointer = ^NSCollectionView;
   NSCollectionViewPointer = ^NSCollectionView;
+  NSCollectionViewPtr = NSCollectionViewPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,82 +57,90 @@
 {$define NSCOLLECTIONVIEW_PAS_C}
 {$define NSCOLLECTIONVIEW_PAS_C}
 
 
 { NSCollectionViewItem }
 { NSCollectionViewItem }
-  NSCollectionViewItem = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  NSCollectionViewItem = objcclass(NSViewController, NSCopyingProtocol)
   private
   private
-        _reserved: array[0..1] of Pointer;
-    __archive: NSMutableData;
-    __ownerView: NSCollectionView;
-    __representedObject: id;
-    __view: NSView;
-    __itemFlags: bitpacked record
-        _selected: 0..1;
-        _removalNeeded: 0..1;
-        _suppressSelectionChangeNotification: 0..1;
-        _reservedAnimationContainer: 0..((1 shl 29)-1);
+    _collectionView: NSCollectionView;
+    __cviFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSCollectionView0: cuint);
+       1: (
+        _isSelected: 0..1;
+        suppressSelectionChangedNotification: 0..1;
+        connectionsCopied: 0..1;
+        reserved: 0..((1 shl 29)-1);
+      );
       end;
       end;
-    __targetViewFrameRect: NSRect;
-    __appliedViewFrameRect: NSRect;
-    __containerReferenceCounter: NSUInteger;
+    _cachedArchive: NSData;
+    _reserved2: Pointer;
     
     
   public
   public
     class function alloc: NSCollectionViewItem; message 'alloc';
     class function alloc: NSCollectionViewItem; message 'alloc';
 
 
     function collectionView: NSCollectionView; message 'collectionView';
     function collectionView: NSCollectionView; message 'collectionView';
-    procedure setRepresentedObject(object_: id); message 'setRepresentedObject:';
-    function representedObject: id; message 'representedObject';
-    procedure setView(view_: NSView); message 'setView:';
-    function view: NSView; message 'view';
     procedure setSelected(flag: Boolean); message 'setSelected:';
     procedure setSelected(flag: Boolean); message 'setSelected:';
     function isSelected: Boolean; message 'isSelected';
     function isSelected: Boolean; message 'isSelected';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
   end; external;
   end; external;
 
 
 { NSCollectionView }
 { NSCollectionView }
   NSCollectionView = objcclass(NSView)
   NSCollectionView = objcclass(NSView)
   private
   private
-        _reserved: array[0..8] of Pointer;
-    __backgroundLayers: NSMutableArray;
-    __content: NSArray;
-    __selectionIndexes: NSMutableIndexSet;
-    __itemPrototype: NSCollectionViewItem;
-    __minGridSize: NSSize;
-    __maxGridSize: NSSize;
-    __minGridRows: NSUInteger;
-    __maxGridRows: NSUInteger;
-    __minGridColumns: NSUInteger;
-    __maxGridColumns: NSUInteger;
-    __backgroundColors: NSArray;
-    __animationContainerFlags: bitpacked record
-        _ignoreFrameSizeChanges: 0..1;
-        _selectable: 0..1;
-        _allowsMultipleSelection: 0..1;
-        _avoidsEmptySelection: 0..1;
-        _superviewIsClipView: 0..1;
-        _gridParametersReadFromPrototype: 0..1;
+    _content: NSArray;
+    _selectionIndexes: NSMutableIndexSet;
+    _itemPrototype: NSCollectionViewItem;
+    _minItemSize: NSSize;
+    _maxItemSize: NSSize;
+    _maxGridRows: NSUInteger;
+    _maxGridColumns: NSUInteger;
+    _backgroundColors: NSArray;
+    _displayedItems: NSMutableArray;
+    _animationDuration: NSTimeInterval;
+    __cvFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSCollectionView1: cuint);
+       1: (
         _isFirstResponder: 0..1;
         _isFirstResponder: 0..1;
-        _reservedAnimationContainer: 0..((1 shl 25)-1);
+        invalidateItemViews: 0..1;
+        selectable: 0..1;
+        _allowsMultipleSelection: 0..1;
+        avoidsEmptySelection: 0..1;
+        superviewIsClipView: 0..1;
+        needsUpdateGrid: 0..1;
+        needsUpdateBackground: 0..1;
+        gridSettingsNeedUpdate: 0..1;
+        guardSetFrameSize: 0..1;
+        canDisplayItems: 0..1;
+        animateForDrag: 0..1;
+        unarchiving: 0..1;
+        reserved: 0..((1 shl 19)-1);
+      );
       end;
       end;
-    __targetFrameSize: NSSize;
-    __targetGridSize: NSSize;
-    __targetUnfilledViewSpace: NSSize;
-    __targetNumberOfGridRows: NSUInteger;
-    __targetNumberOfGridColumns: NSUInteger;
-    __targetItems: NSMutableArray;
-    __appliedFrameSize: NSSize;
-    __appliedGridSize: NSSize;
-    __appliedUnfilledViewSpace: NSSize;
-    __appliedNumberOfGridRows: NSUInteger;
-    __appliedNumberOfGridColumns: NSUInteger;
-    __appliedItems: NSMutableArray;
-    __appliedItemsAsSet: NSMutableSet;
-    __appliedRemovedItemsAsSet: NSMutableSet;
-    __animationDuration: NSTimeInterval;
-    __animation: NSViewAnimation;
-    __hideItems: NSMutableArray;
-    __showItems: NSMutableArray;
+    _delegate: id;
+    _backgroundLayers: NSMutableArray;
+    _storedFrameSize: NSSize;
+    _cachedNib: NSNib;
+    _animTimer: NSTimer;
+    _removedItems: NSArray;
+    _resizeTimer: NSTimer;
+    _draggedIndexes: NSIndexSet;
+    _draggingSourceOperationMaskForLocal: NSDragOperation;
+    _draggingSourceOperationMaskForNonLocal: NSDragOperation;
+    _currentDropIndex: NSInteger;
+    _currentDropSpaceIndex: NSInteger;
+    _shiftRow: NSInteger;
+    _currentDragOperation: NSDragOperation;
+    _currentDropOperation: NSCollectionViewDropOperation;
+    _dragTimer: NSTimer;
+    _private: id;
+        _reserved: array[0..15] of Pointer;
     
     
   public
   public
     class function alloc: NSCollectionView; message 'alloc';
     class function alloc: NSCollectionView; message 'alloc';
 
 
+    procedure setDelegate(aDelegate: id); message 'setDelegate:';
+    function delegate: id; message 'delegate';
     function isFirstResponder: Boolean; message 'isFirstResponder';
     function isFirstResponder: Boolean; message 'isFirstResponder';
     procedure setContent(content_: NSArray); message 'setContent:';
     procedure setContent(content_: NSArray); message 'setContent:';
     function content: NSArray; message 'content';
     function content: NSArray; message 'content';
@@ -141,7 +163,26 @@
     function maxItemSize: NSSize; message 'maxItemSize';
     function maxItemSize: NSSize; message 'maxItemSize';
     procedure setBackgroundColors(colors: NSArray); message 'setBackgroundColors:';
     procedure setBackgroundColors(colors: NSArray); message 'setBackgroundColors:';
     function backgroundColors: NSArray; message 'backgroundColors';
     function backgroundColors: NSArray; message 'backgroundColors';
+    function itemAtIndex(index: NSUInteger): NSCollectionViewItem; message 'itemAtIndex:';
+    function frameForItemAtIndex(index: NSUInteger): NSRect; message 'frameForItemAtIndex:';
+    procedure setDraggingSourceOperationMask_forLocal(dragOperationMask: NSDragOperation; localDestination: Boolean); message 'setDraggingSourceOperationMask:forLocal:';
+    function draggingImageForItemsAtIndexes_withEvent_offset(indexes: NSIndexSet; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'draggingImageForItemsAtIndexes:withEvent:offset:';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSCOLLECTIONVIEW_PAS_P}
+{$define NSCOLLECTIONVIEW_PAS_P}
+  
+{ NSCollectionViewDelegate Protocol }
+  NSCollectionViewDelegateProtocol = objcprotocol
+    function collectionView_canDragItemsAtIndexes_withEvent(collectionView: NSCollectionView; indexes: NSIndexSet; event: NSEvent): Boolean; message 'collectionView:canDragItemsAtIndexes:withEvent:';
+    function collectionView_writeItemsAtIndexes_toPasteboard(collectionView: NSCollectionView; indexes: NSIndexSet; pasteboard: NSPasteboard): Boolean; message 'collectionView:writeItemsAtIndexes:toPasteboard:';
+    function collectionView_namesOfPromisedFilesDroppedAtDestination_forDraggedItemsAtIndexes(collectionView: NSCollectionView; dropURL: NSURL; indexes: NSIndexSet): NSArray; message 'collectionView:namesOfPromisedFilesDroppedAtDestination:forDraggedItemsAtIndexes:';
+    function collectionView_draggingImageForItemsAtIndexes_withEvent_offset(collectionView: NSCollectionView; indexes: NSIndexSet; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'collectionView:draggingImageForItemsAtIndexes:withEvent:offset:';
+    function collectionView_validateDrop_proposedIndex_dropOperation(collectionView: NSCollectionView; draggingInfo: id; proposedDropIndex: NSIntegerPtr; proposedDropOperation: NSCollectionViewDropOperationPtr): NSDragOperation; message 'collectionView:validateDrop:proposedIndex:dropOperation:';
+    function collectionView_acceptDrop_index_dropOperation(collectionView: NSCollectionView; draggingInfo: id; index: NSInteger; dropOperation: NSCollectionViewDropOperation): Boolean; message 'collectionView:acceptDrop:index:dropOperation:';
+  end; external name 'NSCollectionViewDelegate';
+{$endif}
+{$endif}

+ 24 - 11
packages/cocoaint/src/appkit/NSColor.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSColor.h }
 { Parsed from Appkit.framework NSColor.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,7 +33,7 @@ const
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSSystemColorsDidChangeNotification: NSString; external name '_NSSystemColorsDidChangeNotification';
+  NSSystemColorsDidChangeNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -41,6 +41,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSColor = objcclass;
   NSColor = objcclass;
   NSColorPointer = ^NSColor;
   NSColorPointer = ^NSColor;
+  NSColorPtr = NSColorPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -49,7 +50,7 @@ var
 {$define NSCOLOR_PAS_C}
 {$define NSCOLOR_PAS_C}
 
 
 { NSColor }
 { NSColor }
-  NSColor = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  NSColor = objcclass(NSObject)
     
     
   public
   public
     class function alloc: NSColor; message 'alloc';
     class function alloc: NSColor; message 'alloc';
@@ -62,7 +63,7 @@ var
     class function colorWithDeviceRed_green_blue_alpha(red: CGFloat; green: CGFloat; blue: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceRed:green:blue:alpha:';
     class function colorWithDeviceRed_green_blue_alpha(red: CGFloat; green: CGFloat; blue: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceRed:green:blue:alpha:';
     class function colorWithDeviceCyan_magenta_yellow_black_alpha(cyan: CGFloat; magenta: CGFloat; yellow: CGFloat; black: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceCyan:magenta:yellow:black:alpha:';
     class function colorWithDeviceCyan_magenta_yellow_black_alpha(cyan: CGFloat; magenta: CGFloat; yellow: CGFloat; black: CGFloat; alpha: CGFloat): NSColor; message 'colorWithDeviceCyan:magenta:yellow:black:alpha:';
     class function colorWithCatalogName_colorName(listName: NSString; colorName: NSString): NSColor; message 'colorWithCatalogName:colorName:';
     class function colorWithCatalogName_colorName(listName: NSString; colorName: NSString): NSColor; message 'colorWithCatalogName:colorName:';
-    class function colorWithColorSpace_components_count(space: NSColorSpace; components: psingle; numberOfComponents_: NSInteger): NSColor; message 'colorWithColorSpace:components:count:';
+    class function colorWithColorSpace_components_count(space: NSColorSpace; components: CGFloatPtr; numberOfComponents_: NSInteger): NSColor; message 'colorWithColorSpace:components:count:';
     class function blackColor: NSColor; message 'blackColor';
     class function blackColor: NSColor; message 'blackColor';
     class function darkGrayColor: NSColor; message 'darkGrayColor';
     class function darkGrayColor: NSColor; message 'darkGrayColor';
     class function lightGrayColor: NSColor; message 'lightGrayColor';
     class function lightGrayColor: NSColor; message 'lightGrayColor';
@@ -130,21 +131,21 @@ var
     function redComponent: CGFloat; message 'redComponent';
     function redComponent: CGFloat; message 'redComponent';
     function greenComponent: CGFloat; message 'greenComponent';
     function greenComponent: CGFloat; message 'greenComponent';
     function blueComponent: CGFloat; message 'blueComponent';
     function blueComponent: CGFloat; message 'blueComponent';
-    procedure getRed_green_blue_alpha(red: psingle; green: psingle; blue: psingle; alpha: psingle); message 'getRed:green:blue:alpha:';
+    procedure getRed_green_blue_alpha(red: CGFloatPtr; green: CGFloatPtr; blue: CGFloatPtr; alpha: CGFloatPtr); message 'getRed:green:blue:alpha:';
     function hueComponent: CGFloat; message 'hueComponent';
     function hueComponent: CGFloat; message 'hueComponent';
     function saturationComponent: CGFloat; message 'saturationComponent';
     function saturationComponent: CGFloat; message 'saturationComponent';
     function brightnessComponent: CGFloat; message 'brightnessComponent';
     function brightnessComponent: CGFloat; message 'brightnessComponent';
-    procedure getHue_saturation_brightness_alpha(hue: psingle; saturation: psingle; brightness: psingle; alpha: psingle); message 'getHue:saturation:brightness:alpha:';
+    procedure getHue_saturation_brightness_alpha(hue: CGFloatPtr; saturation: CGFloatPtr; brightness: CGFloatPtr; alpha: CGFloatPtr); message 'getHue:saturation:brightness:alpha:';
     function whiteComponent: CGFloat; message 'whiteComponent';
     function whiteComponent: CGFloat; message 'whiteComponent';
-    procedure getWhite_alpha(white: psingle; alpha: psingle); message 'getWhite:alpha:';
+    procedure getWhite_alpha(white: CGFloatPtr; alpha: CGFloatPtr); message 'getWhite:alpha:';
     function cyanComponent: CGFloat; message 'cyanComponent';
     function cyanComponent: CGFloat; message 'cyanComponent';
     function magentaComponent: CGFloat; message 'magentaComponent';
     function magentaComponent: CGFloat; message 'magentaComponent';
     function yellowComponent: CGFloat; message 'yellowComponent';
     function yellowComponent: CGFloat; message 'yellowComponent';
     function blackComponent: CGFloat; message 'blackComponent';
     function blackComponent: CGFloat; message 'blackComponent';
-    procedure getCyan_magenta_yellow_black_alpha(cyan: psingle; magenta: psingle; yellow: psingle; black: psingle; alpha: psingle); message 'getCyan:magenta:yellow:black:alpha:';
+    procedure getCyan_magenta_yellow_black_alpha(cyan: CGFloatPtr; magenta: CGFloatPtr; yellow: CGFloatPtr; black: CGFloatPtr; alpha: CGFloatPtr); message 'getCyan:magenta:yellow:black:alpha:';
     function colorSpace: NSColorSpace; message 'colorSpace';
     function colorSpace: NSColorSpace; message 'colorSpace';
     function numberOfComponents: NSInteger; message 'numberOfComponents';
     function numberOfComponents: NSInteger; message 'numberOfComponents';
-    procedure getComponents(components: psingle); message 'getComponents:';
+    procedure getComponents(components: CGFloatPtr); message 'getComponents:';
     function alphaComponent: CGFloat; message 'alphaComponent';
     function alphaComponent: CGFloat; message 'alphaComponent';
     class function colorFromPasteboard(pasteBoard: NSPasteboard): NSColor; message 'colorFromPasteboard:';
     class function colorFromPasteboard(pasteBoard: NSPasteboard): NSColor; message 'colorFromPasteboard:';
     procedure writeToPasteboard(pasteBoard: NSPasteboard); message 'writeToPasteboard:';
     procedure writeToPasteboard(pasteBoard: NSPasteboard); message 'writeToPasteboard:';
@@ -153,9 +154,21 @@ var
     procedure drawSwatchInRect(rect: NSRect); message 'drawSwatchInRect:';
     procedure drawSwatchInRect(rect: NSRect); message 'drawSwatchInRect:';
     class procedure setIgnoresAlpha(flag: Boolean); message 'setIgnoresAlpha:';
     class procedure setIgnoresAlpha(flag: Boolean); message 'setIgnoresAlpha:';
     class function ignoresAlpha: Boolean; message 'ignoresAlpha';
     class function ignoresAlpha: Boolean; message 'ignoresAlpha';
+  end; external;
+
+{ NSQuartzCoreAdditions_NSColorCategory }
+  NSQuartzCoreAdditions_NSColorCategory = objccategory(NSColor)
+    class function colorWithCIColor(color: CIColor): NSColor; message 'colorWithCIColor:';
+  end; external name 'NSQuartzCoreAdditions';
+
+{ NSAppKitAdditionsCategory }
+  NSAppKitAdditionsCategory = objccategory(CIColor)
+    function initWithColor(color: NSColor): id; message 'initWithColor:';
+  end; external;
 
 
-    { Category: NSQuartzCoreAdditions }
-    class function colorWithCIColor(color: CIColorPointer): NSColor; message 'colorWithCIColor:';
+{ NSAppKitColorExtensionsCategory }
+  NSAppKitColorExtensionsCategory = objccategory(NSCoder)
+    function decodeNXColor: NSColor; message 'decodeNXColor';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 20 - 11
packages/cocoaint/src/appkit/NSColorList.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSColorList.h }
 { Parsed from Appkit.framework NSColorList.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,7 +29,7 @@
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSColorListDidChangeNotification: NSString; external name '_NSColorListDidChangeNotification';
+  NSColorListDidChangeNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -37,6 +37,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSColorList = objcclass;
   NSColorList = objcclass;
   NSColorListPointer = ^NSColorList;
   NSColorListPointer = ^NSColorList;
+  NSColorListPtr = NSColorListPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -47,13 +48,16 @@ var
 { NSColorList }
 { NSColorList }
   NSColorList = objcclass(NSObject, NSCodingProtocol)
   NSColorList = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __keyArray: NSMutableArray;
-    __colorArray: NSMutableArray;
-    __keyToIndexTable: CFMutableDictionaryRef;
-    __name: NSString;
-    __printerType: NSString;
-    __fileName: NSString;
+    _keyArray: NSMutableArray;
+    _colorArray: NSMutableArray;
+    _keyToIndexTable: CFMutableDictionaryRef;
+    _name: NSString;
+    _printerType: NSString;
+    _fileName: NSString;
     __flags: bitpacked record
     __flags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSColorList2: cuint);
+       1: (
         colorsLoaded: 0..1;
         colorsLoaded: 0..1;
         editable: 0..1;
         editable: 0..1;
         hasDeviceSpecificLists: 0..1;
         hasDeviceSpecificLists: 0..1;
@@ -62,12 +66,13 @@ var
         notificationsDisabled: 0..1;
         notificationsDisabled: 0..1;
         hasAttemptedLoadingBundleForDirectory: 0..1;
         hasAttemptedLoadingBundleForDirectory: 0..1;
         isProfileBased: 0..1;
         isProfileBased: 0..1;
-        int: 0..((1 shl 24)-1);
+        _anonbitfield_NSColorList0: 0..((1 shl 24)-1);
         {$ifdef cpu64}
         {$ifdef cpu64}
-        int2: 0..((1 shl 32)-1);
+        _anonbitfield_NSColorList1: 0..((1 shl 32)-1);
         {$endif}
         {$endif}
+      );
       end;
       end;
-    __clAuxiliaryStorage: id;
+    _clAuxiliaryStorage: id;
     
     
   public
   public
     class function alloc: NSColorList; message 'alloc';
     class function alloc: NSColorList; message 'alloc';
@@ -85,6 +90,10 @@ var
     function isEditable: Boolean; message 'isEditable';
     function isEditable: Boolean; message 'isEditable';
     function writeToFile(path: NSString): Boolean; message 'writeToFile:';
     function writeToFile(path: NSString): Boolean; message 'writeToFile:';
     procedure removeFile; message 'removeFile';
     procedure removeFile; message 'removeFile';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 45 - 33
packages/cocoaint/src/appkit/NSColorPanel.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSColorPanel.h }
 { Parsed from Appkit.framework NSColorPanel.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -9,6 +9,7 @@
 { Types }
 { Types }
 type
 type
   NSColorPanelMode = NSInteger;
   NSColorPanelMode = NSInteger;
+  NSColorPanelModePtr = ^NSColorPanelMode;
 
 
 { Constants }
 { Constants }
 
 
@@ -57,7 +58,7 @@ const
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSColorPanelColorDidChangeNotification: NSString; external name '_NSColorPanelColorDidChangeNotification';
+  NSColorPanelColorDidChangeNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -65,6 +66,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSColorPanel = objcclass;
   NSColorPanel = objcclass;
   NSColorPanelPointer = ^NSColorPanel;
   NSColorPanelPointer = ^NSColorPanel;
+  NSColorPanelPtr = NSColorPanelPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -75,37 +77,37 @@ var
 { NSColorPanel }
 { NSColorPanel }
   NSColorPanel = objcclass(NSPanel)
   NSColorPanel = objcclass(NSPanel)
   private
   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;
+    _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
   public
     class function alloc: NSColorPanel; message 'alloc';
     class function alloc: NSColorPanel; message 'alloc';
@@ -132,5 +134,15 @@ var
     procedure detachColorList(colorList: NSColorList); message 'detachColorList:';
     procedure detachColorList(colorList: NSColorList); message 'detachColorList:';
   end; external;
   end; external;
 
 
+{ NSColorPanel_NSApplicationCategory }
+  NSColorPanel_NSApplicationCategory = objccategory(NSApplication)
+    procedure orderFrontColorPanel(sender: id); message 'orderFrontColorPanel:';
+  end; external name 'NSColorPanel';
+
+{ NSColorPanelResponderMethodCategory }
+  NSColorPanelResponderMethodCategory = objccategory(NSObject)
+    procedure changeColor(sender: id); message 'changeColor:';
+  end; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 8 - 4
packages/cocoaint/src/appkit/NSColorPicker.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSColorPicker.h }
 { Parsed from Appkit.framework NSColorPicker.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSColorPicker = objcclass;
   NSColorPicker = objcclass;
   NSColorPickerPointer = ^NSColorPicker;
   NSColorPickerPointer = ^NSColorPicker;
+  NSColorPickerPtr = NSColorPickerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,9 +44,9 @@
 { NSColorPicker }
 { NSColorPicker }
   NSColorPicker = objcclass(NSObject, NSColorPickingDefaultProtocol)
   NSColorPicker = objcclass(NSObject, NSColorPickingDefaultProtocol)
   private
   private
-    __imageObject: id;
-    __colorPanel: NSColorPanel;
-    __buttonToolTip: NSString;
+    _imageObject: id;
+    _colorPanel: NSColorPanel;
+    _buttonToolTip: NSString;
     
     
   public
   public
     class function alloc: NSColorPicker; message 'alloc';
     class function alloc: NSColorPicker; message 'alloc';
@@ -60,6 +61,9 @@
     procedure setMode(mode: NSColorPanelMode); message 'setMode:';
     procedure setMode(mode: NSColorPanelMode); message 'setMode:';
     function buttonToolTip: NSString; message 'buttonToolTip';
     function buttonToolTip: NSString; message 'buttonToolTip';
     function minContentSize: NSSize; message 'minContentSize';
     function minContentSize: NSSize; message 'minContentSize';
+
+    { Adopted Protocols }
+    procedure alphaControlAddedOrRemoved(sender: id);
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 1 - 1
packages/cocoaint/src/appkit/NSColorPicking.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSColorPicking.h }
 { Parsed from Appkit.framework NSColorPicking.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}

+ 18 - 6
packages/cocoaint/src/appkit/NSColorSpace.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSColorSpace.h }
 { Parsed from Appkit.framework NSColorSpace.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -21,6 +21,7 @@ const
 { Types }
 { Types }
 type
 type
   NSColorSpaceModel = NSInteger;
   NSColorSpaceModel = NSInteger;
+  NSColorSpaceModelPtr = ^NSColorSpaceModel;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -49,6 +50,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSColorSpace = objcclass;
   NSColorSpace = objcclass;
   NSColorSpacePointer = ^NSColorSpace;
   NSColorSpacePointer = ^NSColorSpace;
+  NSColorSpacePtr = NSColorSpacePointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -59,17 +61,21 @@ type
 { NSColorSpace }
 { NSColorSpace }
   NSColorSpace = objcclass(NSObject, NSCodingProtocol)
   NSColorSpace = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __profile: id;
+    _profile: id;
     __flags: bitpacked record
     __flags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSColorSpace2: cuint);
+       1: (
         colorSpaceID: 0..((1 shl 8)-1);
         colorSpaceID: 0..((1 shl 8)-1);
         storageType: 0..((1 shl 3)-1);
         storageType: 0..((1 shl 3)-1);
         replacedDuringUnarchiving: 0..1;
         replacedDuringUnarchiving: 0..1;
-        int: 0..((1 shl 20)-1);
+        _anonbitfield_NSColorSpace0: 0..((1 shl 20)-1);
         {$ifdef cpu64}
         {$ifdef cpu64}
-        int2: 0..((1 shl 32)-1);
+        _anonbitfield_NSColorSpace1: 0..((1 shl 32)-1);
         {$endif}
         {$endif}
+      );
       end;
       end;
-    ___cgColorSpace: Pointer;
+    __cgColorSpace: Pointer;
         _reserved: array[0..4] of Pointer;
         _reserved: array[0..4] of Pointer;
     
     
   public
   public
@@ -79,7 +85,7 @@ type
     function ICCProfileData: NSData; message 'ICCProfileData';
     function ICCProfileData: NSData; message 'ICCProfileData';
     function initWithColorSyncProfile(prof: Pointer): id; message 'initWithColorSyncProfile:';
     function initWithColorSyncProfile(prof: Pointer): id; message 'initWithColorSyncProfile:';
     function colorSyncProfile: Pointer; message 'colorSyncProfile';
     function colorSyncProfile: Pointer; message 'colorSyncProfile';
-    function initWithCGColorSpace(CGColorSpace_: CGColorSpaceRef): id; message 'initWithCGColorSpace:';
+    function initWithCGColorSpace(cgColorSpace: CGColorSpaceRef): id; message 'initWithCGColorSpace:';
     function CGColorSpace: CGColorSpaceRef; message 'CGColorSpace';
     function CGColorSpace: CGColorSpaceRef; message 'CGColorSpace';
     function numberOfColorComponents: NSInteger; message 'numberOfColorComponents';
     function numberOfColorComponents: NSInteger; message 'numberOfColorComponents';
     function colorSpaceModel: NSColorSpaceModel; message 'colorSpaceModel';
     function colorSpaceModel: NSColorSpaceModel; message 'colorSpaceModel';
@@ -91,7 +97,13 @@ type
     class function deviceGrayColorSpace: NSColorSpace; message 'deviceGrayColorSpace';
     class function deviceGrayColorSpace: NSColorSpace; message 'deviceGrayColorSpace';
     class function deviceCMYKColorSpace: NSColorSpace; message 'deviceCMYKColorSpace';
     class function deviceCMYKColorSpace: NSColorSpace; message 'deviceCMYKColorSpace';
     class function sRGBColorSpace: NSColorSpace; message 'sRGBColorSpace';
     class function sRGBColorSpace: NSColorSpace; message 'sRGBColorSpace';
+    class function genericGamma22GrayColorSpace: NSColorSpace; message 'genericGamma22GrayColorSpace';
     class function adobeRGB1998ColorSpace: NSColorSpace; message 'adobeRGB1998ColorSpace';
     class function adobeRGB1998ColorSpace: NSColorSpace; message 'adobeRGB1998ColorSpace';
+    class function availableColorSpacesWithModel(model: NSColorSpaceModel): NSArray; message 'availableColorSpacesWithModel:';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 11 - 6
packages/cocoaint/src/appkit/NSColorWell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSColorWell.h }
 { Parsed from Appkit.framework NSColorWell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSColorWell = objcclass;
   NSColorWell = objcclass;
   NSColorWellPointer = ^NSColorWell;
   NSColorWellPointer = ^NSColorWell;
+  NSColorWellPtr = NSColorWellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,15 +44,19 @@
 { NSColorWell }
 { NSColorWell }
   NSColorWell = objcclass(NSControl)
   NSColorWell = objcclass(NSControl)
   private
   private
-    __color: NSColor;
-    __target: id;
-    __action: SEL;
+    _color: NSColor;
+    _target: id;
+    _action: SEL;
     __cwFlags: bitpacked record
     __cwFlags: bitpacked record
-        isActive: 0..1;
-        isBordered: 0..1;
+      case byte of
+       0: (_anonbitfield_NSColorWell0: cuint);
+       1: (
+        _isActive: 0..1;
+        _isBordered: 0..1;
         cantDraw: 0..1;
         cantDraw: 0..1;
         isNotContinuous: 0..1;
         isNotContinuous: 0..1;
         reservedColorWell: 0..((1 shl 28)-1);
         reservedColorWell: 0..((1 shl 28)-1);
+      );
       end;
       end;
     
     
   public
   public

+ 32 - 6
packages/cocoaint/src/appkit/NSComboBox.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSComboBox.h }
 { Parsed from Appkit.framework NSComboBox.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,17 +29,20 @@
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSComboBoxWillPopUpNotification: NSString; external name '_NSComboBoxWillPopUpNotification';
-  NSComboBoxWillDismissNotification: NSString; external name '_NSComboBoxWillDismissNotification';
-  NSComboBoxSelectionDidChangeNotification: NSString; external name '_NSComboBoxSelectionDidChangeNotification';
-  NSComboBoxSelectionIsChangingNotification: NSString; external name '_NSComboBoxSelectionIsChangingNotification';
+  NSComboBoxWillPopUpNotification: NSString; cvar; external;
+  NSComboBoxWillDismissNotification: NSString; cvar; external;
+  NSComboBoxSelectionDidChangeNotification: NSString; cvar; external;
+  NSComboBoxSelectionIsChangingNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSComboBoxDataSourceProtocol = objcprotocol;
+  NSComboBoxDelegateProtocol = objcprotocol;
   NSComboBox = objcclass;
   NSComboBox = objcclass;
   NSComboBoxPointer = ^NSComboBox;
   NSComboBoxPointer = ^NSComboBox;
+  NSComboBoxPtr = NSComboBoxPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -50,7 +53,7 @@ var
 { NSComboBox }
 { NSComboBox }
   NSComboBox = objcclass(NSTextField)
   NSComboBox = objcclass(NSTextField)
   private
   private
-    __dataSource: id;
+    _dataSource: id;
     
     
   public
   public
     class function alloc: NSComboBox; message 'alloc';
     class function alloc: NSComboBox; message 'alloc';
@@ -77,6 +80,8 @@ var
     function numberOfItems: NSInteger; message 'numberOfItems';
     function numberOfItems: NSInteger; message 'numberOfItems';
     function completes: Boolean; message 'completes';
     function completes: Boolean; message 'completes';
     procedure setCompletes(completes_: Boolean); message 'setCompletes:';
     procedure setCompletes(completes_: Boolean); message 'setCompletes:';
+    function delegate: id; message 'delegate';
+    procedure setDelegate(anObject: id); message 'setDelegate:';
     function dataSource: id; message 'dataSource';
     function dataSource: id; message 'dataSource';
     procedure setDataSource(aSource: id); message 'setDataSource:';
     procedure setDataSource(aSource: id); message 'setDataSource:';
     procedure addItemWithObjectValue(object_: id); message 'addItemWithObjectValue:';
     procedure addItemWithObjectValue(object_: id); message 'addItemWithObjectValue:';
@@ -94,3 +99,24 @@ var
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSCOMBOBOX_PAS_P}
+{$define NSCOMBOBOX_PAS_P}
+  
+{ NSComboBoxDataSource Protocol }
+  NSComboBoxDataSourceProtocol = objcprotocol
+    function numberOfItemsInComboBox(aComboBox: NSComboBox): NSInteger; message 'numberOfItemsInComboBox:';
+    function comboBox_objectValueForItemAtIndex(aComboBox: NSComboBox; index: NSInteger): id; message 'comboBox:objectValueForItemAtIndex:';
+    function comboBox_indexOfItemWithStringValue(aComboBox: NSComboBox; string_: NSString): NSUInteger; message 'comboBox:indexOfItemWithStringValue:';
+    function comboBox_completedString(aComboBox: NSComboBox; string_: NSString): NSString; message 'comboBox:completedString:';
+  end; external name 'NSComboBoxDataSource';
+  
+{ NSComboBoxDelegate Protocol }
+  NSComboBoxDelegateProtocol = objcprotocol
+    procedure comboBoxWillPopUp(notification: NSNotification); message 'comboBoxWillPopUp:';
+    procedure comboBoxWillDismiss(notification: NSNotification); message 'comboBoxWillDismiss:';
+    procedure comboBoxSelectionDidChange(notification: NSNotification); message 'comboBoxSelectionDidChange:';
+    procedure comboBoxSelectionIsChanging(notification: NSNotification); message 'comboBoxSelectionIsChanging:';
+  end; external name 'NSComboBoxDelegate';
+{$endif}
+{$endif}

+ 32 - 14
packages/cocoaint/src/appkit/NSComboBoxCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSComboBoxCell.h }
 { Parsed from Appkit.framework NSComboBoxCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -31,8 +31,10 @@
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSComboBoxCellDataSourceProtocol = objcprotocol;
   NSComboBoxCell = objcclass;
   NSComboBoxCell = objcclass;
   NSComboBoxCellPointer = ^NSComboBoxCell;
   NSComboBoxCellPointer = ^NSComboBoxCell;
+  NSComboBoxCellPtr = NSComboBoxCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,27 +45,30 @@
 { NSComboBoxCell }
 { NSComboBoxCell }
   NSComboBoxCell = objcclass(NSTextFieldCell)
   NSComboBoxCell = objcclass(NSTextFieldCell)
   private
   private
-    __delegate: id;
-    __dataSource: id;
+    _delegate: id;
+    _dataSource: id;
     __cbcFlags: bitpacked record
     __cbcFlags: bitpacked record
-        usesDataSource: 0..1;
-        completes: 0..1;
+      case byte of
+       0: (_anonbitfield_NSComboBoxCell0: cuint);
+       1: (
+        _usesDataSource: 0..1;
+        _completes: 0..1;
         buttonBordered: 0..1;
         buttonBordered: 0..1;
         popUpIsUp: 0..1;
         popUpIsUp: 0..1;
         filteringEvents: 0..1;
         filteringEvents: 0..1;
         drawing: 0..1;
         drawing: 0..1;
         synchronizingSelection: 0..1;
         synchronizingSelection: 0..1;
-        subclassOverridesBoundsForButtonCell: 0..1;
-        reserved: 0..((1 shl 8)-1);
+        reserved: 0..((1 shl 9)-1);
         visibleItems: 0..((1 shl 16)-1);
         visibleItems: 0..((1 shl 16)-1);
+      );
       end;
       end;
-    __buttonCell: NSButtonCell;
-    __tableView: NSTableView;
-    __scrollView: NSScrollView;
-    __popUp: NSWindow;
-    __popUpList: NSMutableArray;
-    __cellFrame: NSRect; {garbage collector: __strong }
-    __reserved: Pointer;
+    _buttonCell: NSButtonCell;
+    _tableView: NSTableView;
+    _scrollView: NSScrollView;
+    _popUp: NSWindow;
+    _popUpList: NSMutableArray;
+    _cellFrame: NSRectPtr; {garbage collector: __strong }
+    _reserved: Pointer;
     
     
   public
   public
     class function alloc: NSComboBoxCell; message 'alloc';
     class function alloc: NSComboBoxCell; message 'alloc';
@@ -71,3 +76,16 @@
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSCOMBOBOXCELL_PAS_P}
+{$define NSCOMBOBOXCELL_PAS_P}
+  
+{ NSComboBoxCellDataSource Protocol }
+  NSComboBoxCellDataSourceProtocol = objcprotocol
+    function numberOfItemsInComboBoxCell(comboBoxCell: NSComboBoxCell): NSInteger; message 'numberOfItemsInComboBoxCell:';
+    function comboBoxCell_objectValueForItemAtIndex(aComboBoxCell: NSComboBoxCell; index: NSInteger): id; message 'comboBoxCell:objectValueForItemAtIndex:';
+    function comboBoxCell_indexOfItemWithStringValue(aComboBoxCell: NSComboBoxCell; string_: NSString): NSUInteger; message 'comboBoxCell:indexOfItemWithStringValue:';
+    function comboBoxCell_completedString(aComboBoxCell: NSComboBoxCell; uncompletedString: NSString): NSString; message 'comboBoxCell:completedString:';
+  end; external name 'NSComboBoxCellDataSource';
+{$endif}
+{$endif}

+ 47 - 10
packages/cocoaint/src/appkit/NSControl.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSControl.h }
 { Parsed from Appkit.framework NSControl.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,16 +29,18 @@
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSControlTextDidBeginEditingNotification: NSString; external name '_NSControlTextDidBeginEditingNotification';
-  NSControlTextDidEndEditingNotification: NSString; external name '_NSControlTextDidEndEditingNotification';
-  NSControlTextDidChangeNotification: NSString; external name '_NSControlTextDidChangeNotification';
+  NSControlTextDidBeginEditingNotification: NSString; cvar; external;
+  NSControlTextDidEndEditingNotification: NSString; cvar; external;
+  NSControlTextDidChangeNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSControlTextEditingDelegateProtocol = objcprotocol;
   NSControl = objcclass;
   NSControl = objcclass;
   NSControlPointer = ^NSControl;
   NSControlPointer = ^NSControl;
+  NSControlPtr = NSControlPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -49,16 +51,20 @@ var
 { NSControl }
 { NSControl }
   NSControl = objcclass(NSView)
   NSControl = objcclass(NSView)
   private
   private
-    __tag: NSInteger;
-    __cell: id;
+    _tag: NSInteger;
+    _cell: id;
     __conFlags: bitpacked record
     __conFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSControl0: cuint);
+       1: (
         enabled: 0..1;
         enabled: 0..1;
         ignoreMultiClick: 0..1;
         ignoreMultiClick: 0..1;
-        calcSize: 0..1;
+        _calcSize: 0..1;
         drawingAncestor: 0..1;
         drawingAncestor: 0..1;
         ibReserved: 0..1;
         ibReserved: 0..1;
         updateCellFocus: 0..1;
         updateCellFocus: 0..1;
         reserved: 0..((1 shl 26)-1);
         reserved: 0..((1 shl 26)-1);
+      );
       end;
       end;
     
     
   public
   public
@@ -86,7 +92,6 @@ var
     procedure setContinuous(flag: Boolean); message 'setContinuous:';
     procedure setContinuous(flag: Boolean); message 'setContinuous:';
     function isEnabled: Boolean; message 'isEnabled';
     function isEnabled: Boolean; message 'isEnabled';
     procedure setEnabled(flag: Boolean); message 'setEnabled:';
     procedure setEnabled(flag: Boolean); message 'setEnabled:';
-    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:';
     function alignment: NSTextAlignment; message 'alignment';
     function alignment: NSTextAlignment; message 'alignment';
     procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
     procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
     function font: NSFont; message 'font';
     function font: NSFont; message 'font';
@@ -124,16 +129,48 @@ var
     function integerValue: NSInteger; message 'integerValue';
     function integerValue: NSInteger; message 'integerValue';
     procedure setIntegerValue(anInteger: NSInteger); message 'setIntegerValue:';
     procedure setIntegerValue(anInteger: NSInteger); message 'setIntegerValue:';
     procedure takeIntegerValueFrom(sender: id); message 'takeIntegerValueFrom:';
     procedure takeIntegerValueFrom(sender: id); message 'takeIntegerValueFrom:';
+  end; external;
 
 
-    { Category: NSKeyboardUI }
+{ NSKeyboardUI_NSControlCategory }
+  NSKeyboardUI_NSControlCategory = objccategory(NSControl)
     procedure performClick(sender: id); message 'performClick:';
     procedure performClick(sender: id); message 'performClick:';
     procedure setRefusesFirstResponder(flag: Boolean); message 'setRefusesFirstResponder:';
     procedure setRefusesFirstResponder(flag: Boolean); message 'setRefusesFirstResponder:';
     function refusesFirstResponder: Boolean; message 'refusesFirstResponder';
     function refusesFirstResponder: Boolean; message 'refusesFirstResponder';
+  end; external name 'NSKeyboardUI';
+
+{ NSControlSubclassNotificationsCategory }
+  NSControlSubclassNotificationsCategory = objccategory(NSObject)
+    procedure controlTextDidBeginEditing(obj: NSNotification); message 'controlTextDidBeginEditing:';
+    procedure controlTextDidEndEditing(obj: NSNotification); message 'controlTextDidEndEditing:';
+    procedure controlTextDidChange(obj: NSNotification); message 'controlTextDidChange:';
+  end; external;
 
 
-    { Category: NSControlAttributedStringMethods }
+{ NSControlAttributedStringMethodsCategory }
+  NSControlAttributedStringMethodsCategory = objccategory(NSControl)
     function attributedStringValue: NSAttributedString; message 'attributedStringValue';
     function attributedStringValue: NSAttributedString; message 'attributedStringValue';
     procedure setAttributedStringValue(obj: NSAttributedString); message 'setAttributedStringValue:';
     procedure setAttributedStringValue(obj: NSAttributedString); message 'setAttributedStringValue:';
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSControlCategory }
+  NSDeprecated_NSControlCategory = objccategory(NSControl)
+    procedure setFloatingPointFormat_left_right(autoRange: Boolean; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:'; deprecated 'in Mac OS X 10 and later';
+  end; external name 'NSDeprecated';
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSCONTROL_PAS_P}
+{$define NSCONTROL_PAS_P}
+  
+{ NSControlTextEditingDelegate Protocol }
+  NSControlTextEditingDelegateProtocol = objcprotocol
+    function control_textShouldBeginEditing(control: NSControl; fieldEditor: NSText): Boolean; message 'control:textShouldBeginEditing:';
+    function control_textShouldEndEditing(control: NSControl; fieldEditor: NSText): Boolean; message 'control:textShouldEndEditing:';
+    function control_didFailToFormatString_errorDescription(control: NSControl; string_: NSString; error: NSString): Boolean; message 'control:didFailToFormatString:errorDescription:';
+    procedure control_didFailToValidatePartialString_errorDescription(control: NSControl; string_: NSString; error: NSString); message 'control:didFailToValidatePartialString:errorDescription:';
+    function control_isValidObject(control: NSControl; obj: id): Boolean; message 'control:isValidObject:';
+    function control_textView_doCommandBySelector(control: NSControl; textView: NSTextView; commandSelector: SEL): Boolean; message 'control:textView:doCommandBySelector:';
+    function control_textView_completions_forPartialWordRange_indexOfSelectedItem(control: NSControl; textView: NSTextView; words: NSArray; charRange: NSRange; index: NSIntegerPtr): NSArray; message 'control:textView:completions:forPartialWordRange:indexOfSelectedItem:';
+  end; external name 'NSControlTextEditingDelegate';
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 23 - 14
packages/cocoaint/src/appkit/NSController.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSController.h }
 { Parsed from Appkit.framework NSController.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSController = objcclass;
   NSController = objcclass;
   NSControllerPointer = ^NSController;
   NSControllerPointer = ^NSController;
+  NSControllerPtr = NSControllerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,26 +44,30 @@
 { NSController }
 { NSController }
   NSController = objcclass(NSObject, NSCodingProtocol)
   NSController = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __reserved: Pointer;
-    __reserved2: Pointer;
-    __specialPurposeType: cint;
-    __bindingAdaptor: id;
-    __editors: NSMutableArray;
-    __declaredKeys: NSMutableArray;
-    __dependentKeyToModelKeyTable: NSMutableDictionary;
-    __modelKeyToDependentKeyTable: NSMutableDictionary;
-    __modelKeysToRefreshEachTime: NSMutableArray;
+    _reserved: Pointer;
+    _reserved2: Pointer;
+    _specialPurposeType: cint;
+    _bindingAdaptor: id;
+    _editors: NSMutableArray;
+    _declaredKeys: NSMutableArray;
+    _dependentKeyToModelKeyTable: NSMutableDictionary;
+    _modelKeyToDependentKeyTable: NSMutableDictionary;
+    _modelKeysToRefreshEachTime: NSMutableArray;
     __bindingsControllerFlags: bitpacked record
     __bindingsControllerFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSController0: cuint);
+       1: (
         _alwaysPresentsApplicationModalAlerts: 0..1;
         _alwaysPresentsApplicationModalAlerts: 0..1;
         _refreshesAllModelKeys: 0..1;
         _refreshesAllModelKeys: 0..1;
         _multipleObservedModelObjects: 0..1;
         _multipleObservedModelObjects: 0..1;
         _isEditing: 0..1;
         _isEditing: 0..1;
         _reservedController: 0..((1 shl 28)-1);
         _reservedController: 0..((1 shl 28)-1);
+      );
       end;
       end;
-    __reservedOther: NSMutableDictionary;
-    __modelObservingTracker: id;
-    __expectedObservingInfo: id;
-    __singleValueAccessor: id;
+    _reservedOther: NSMutableDictionary;
+    _modelObservingTracker: id;
+    _expectedObservingInfo: id;
+    _singleValueAccessor: id;
     
     
   public
   public
     class function alloc: NSController; message 'alloc';
     class function alloc: NSController; message 'alloc';
@@ -73,6 +78,10 @@
     function commitEditing: Boolean; message 'commitEditing';
     function commitEditing: Boolean; message 'commitEditing';
     procedure commitEditingWithDelegate_didCommitSelector_contextInfo(delegate: id; didCommitSelector: SEL; contextInfo: Pointer); message 'commitEditingWithDelegate:didCommitSelector:contextInfo:';
     procedure commitEditingWithDelegate_didCommitSelector_contextInfo(delegate: id; didCommitSelector: SEL; contextInfo: Pointer); message 'commitEditingWithDelegate:didCommitSelector:contextInfo:';
     function isEditing: Boolean; message 'isEditing';
     function isEditing: Boolean; message 'isEditing';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 18 - 4
packages/cocoaint/src/appkit/NSCursor.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSCursor.h }
 { Parsed from Appkit.framework NSCursor.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -37,6 +37,7 @@ const
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSCursor = objcclass;
   NSCursor = objcclass;
   NSCursorPointer = ^NSCursor;
   NSCursorPointer = ^NSCursor;
+  NSCursorPtr = NSCursorPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -47,19 +48,24 @@ const
 { NSCursor }
 { NSCursor }
   NSCursor = objcclass(NSObject, NSCodingProtocol)
   NSCursor = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __hotSpot: NSPoint;
+    _hotSpot: NSPoint;
     __flags: bitpacked record
     __flags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSCursor1: cuint);
+       1: (
         onMouseExited: 0..1;
         onMouseExited: 0..1;
         onMouseEntered: 0..1;
         onMouseEntered: 0..1;
         cursorType: 0..((1 shl 8)-1);
         cursorType: 0..((1 shl 8)-1);
-        int: 0..((1 shl 22)-1);
+        _anonbitfield_NSCursor0: 0..((1 shl 22)-1);
+      );
       end;
       end;
-    __image: id;
+    _image: id;
     
     
   public
   public
     class function alloc: NSCursor; message 'alloc';
     class function alloc: NSCursor; message 'alloc';
 
 
     class function currentCursor: NSCursor; message 'currentCursor';
     class function currentCursor: NSCursor; message 'currentCursor';
+    class function currentSystemCursor: NSCursor; message 'currentSystemCursor';
     class function arrowCursor: NSCursor; message 'arrowCursor';
     class function arrowCursor: NSCursor; message 'arrowCursor';
     class function IBeamCursor: NSCursor; message 'IBeamCursor';
     class function IBeamCursor: NSCursor; message 'IBeamCursor';
     class function pointingHandCursor: NSCursor; message 'pointingHandCursor';
     class function pointingHandCursor: NSCursor; message 'pointingHandCursor';
@@ -73,6 +79,10 @@ const
     class function resizeUpDownCursor: NSCursor; message 'resizeUpDownCursor';
     class function resizeUpDownCursor: NSCursor; message 'resizeUpDownCursor';
     class function crosshairCursor: NSCursor; message 'crosshairCursor';
     class function crosshairCursor: NSCursor; message 'crosshairCursor';
     class function disappearingItemCursor: NSCursor; message 'disappearingItemCursor';
     class function disappearingItemCursor: NSCursor; message 'disappearingItemCursor';
+    class function operationNotAllowedCursor: NSCursor; message 'operationNotAllowedCursor';
+    class function dragLinkCursor: NSCursor; message 'dragLinkCursor';
+    class function dragCopyCursor: NSCursor; message 'dragCopyCursor';
+    class function contextualMenuCursor: NSCursor; message 'contextualMenuCursor';
     function initWithImage_hotSpot(newImage: NSImage; aPoint: NSPoint): id; message 'initWithImage:hotSpot:';
     function initWithImage_hotSpot(newImage: NSImage; aPoint: NSPoint): id; message 'initWithImage:hotSpot:';
     function initWithImage_foregroundColorHint_backgroundColorHint_hotSpot(newImage: NSImage; fg: NSColor; bg: NSColor; hotSpot_: NSPoint): id; message 'initWithImage:foregroundColorHint:backgroundColorHint:hotSpot:';
     function initWithImage_foregroundColorHint_backgroundColorHint_hotSpot(newImage: NSImage; fg: NSColor; bg: NSColor; hotSpot_: NSPoint): id; message 'initWithImage:foregroundColorHint:backgroundColorHint:hotSpot:';
     class procedure hide; message 'hide';
     class procedure hide; message 'hide';
@@ -89,6 +99,10 @@ const
     function isSetOnMouseEntered: Boolean; message 'isSetOnMouseEntered';
     function isSetOnMouseEntered: Boolean; message 'isSetOnMouseEntered';
     procedure mouseEntered(theEvent: NSEvent); message 'mouseEntered:';
     procedure mouseEntered(theEvent: NSEvent); message 'mouseEntered:';
     procedure mouseExited(theEvent: NSEvent); message 'mouseExited:';
     procedure mouseExited(theEvent: NSEvent); message 'mouseExited:';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 5 - 4
packages/cocoaint/src/appkit/NSCustomImageRep.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSCustomImageRep.h }
 { Parsed from Appkit.framework NSCustomImageRep.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSCustomImageRep = objcclass;
   NSCustomImageRep = objcclass;
   NSCustomImageRepPointer = ^NSCustomImageRep;
   NSCustomImageRepPointer = ^NSCustomImageRep;
+  NSCustomImageRepPtr = NSCustomImageRepPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,9 +44,9 @@
 { NSCustomImageRep }
 { NSCustomImageRep }
   NSCustomImageRep = objcclass(NSImageRep)
   NSCustomImageRep = objcclass(NSImageRep)
   private
   private
-    __drawMethod: SEL;
-    __drawObject: id;
-    __reserved: cuint;
+    _drawMethod: SEL;
+    _drawObject: id;
+    _reserved: cuint;
     
     
   public
   public
     class function alloc: NSCustomImageRep; message 'alloc';
     class function alloc: NSCustomImageRep; message 'alloc';

+ 2 - 1
packages/cocoaint/src/appkit/NSDatePicker.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDatePicker.h }
 { Parsed from Appkit.framework NSDatePicker.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:08 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSDatePicker = objcclass;
   NSDatePicker = objcclass;
   NSDatePickerPointer = ^NSDatePicker;
   NSDatePickerPointer = ^NSDatePicker;
+  NSDatePickerPtr = NSDatePickerPointer;
 
 
 {$endif}
 {$endif}
 
 

+ 36 - 17
packages/cocoaint/src/appkit/NSDatePickerCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDatePickerCell.h }
 { Parsed from Appkit.framework NSDatePickerCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:08 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -28,8 +28,11 @@ const
 { Types }
 { Types }
 type
 type
   NSDatePickerStyle = NSUInteger;
   NSDatePickerStyle = NSUInteger;
+  NSDatePickerStylePtr = ^NSDatePickerStyle;
   NSDatePickerMode = NSUInteger;
   NSDatePickerMode = NSUInteger;
+  NSDatePickerModePtr = ^NSDatePickerMode;
   NSDatePickerElementFlags = NSUInteger;
   NSDatePickerElementFlags = NSUInteger;
+  NSDatePickerElementFlagsPtr = ^NSDatePickerElementFlags;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -56,8 +59,10 @@ type
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSDatePickerCellDelegateProtocol = objcprotocol;
   NSDatePickerCell = objcclass;
   NSDatePickerCell = objcclass;
   NSDatePickerCellPointer = ^NSDatePickerCell;
   NSDatePickerCellPointer = ^NSDatePickerCell;
+  NSDatePickerCellPtr = NSDatePickerCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -68,32 +73,36 @@ type
 { NSDatePickerCell }
 { NSDatePickerCell }
   NSDatePickerCell = objcclass(NSActionCell)
   NSDatePickerCell = objcclass(NSActionCell)
   private
   private
-    __timeInterval: NSTimeInterval;
-    __minDate: NSDate;
-    __maxDate: NSDate;
+    _timeInterval: NSTimeInterval;
+    _minDate: NSDate;
+    _maxDate: NSDate;
     __dcFlags: bitpacked record
     __dcFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSDatePickerCell0: cuint);
+       1: (
         elements: 0..((1 shl 16)-1);
         elements: 0..((1 shl 16)-1);
         controlStyle: 0..((1 shl 3)-1);
         controlStyle: 0..((1 shl 3)-1);
         controlMode: 0..((1 shl 2)-1);
         controlMode: 0..((1 shl 2)-1);
         trackingHand: 0..((1 shl 2)-1);
         trackingHand: 0..((1 shl 2)-1);
         reserved2: 0..((1 shl 4)-1);
         reserved2: 0..((1 shl 4)-1);
-        drawsBackground: 0..1;
+        _drawsBackground: 0..1;
         digitsEntered: 0..((1 shl 2)-1);
         digitsEntered: 0..((1 shl 2)-1);
         forcesLeadingZeroes: 0..1;
         forcesLeadingZeroes: 0..1;
         wrapsDateComponentArithmetic: 0..1;
         wrapsDateComponentArithmetic: 0..1;
+      );
       end;
       end;
-    __delegate: id;
-    __calendar: NSCalendar;
-    __locale: NSLocale;
-    __timeZone: NSTimeZone;
-    __backgroundColor: NSColor;
-    __textColor: NSColor;
-    __indexOfSelectedSubfield: cint;
-    __reserved0: cint;
-    __reserved1: id;
-    __reserved2: id;
-    __reserved3: id;
-    __reserved4: id;
+    _delegate: id;
+    _calendar: NSCalendar;
+    _locale: NSLocale;
+    _timeZone: NSTimeZone;
+    _backgroundColor: NSColor;
+    _textColor: NSColor;
+    _indexOfSelectedSubfield: cint;
+    _reserved0: cint;
+    _reserved1: id;
+    _reserved2: id;
+    _reserved3: id;
+    _reserved4: id;
     
     
   public
   public
     class function alloc: NSDatePickerCell; message 'alloc';
     class function alloc: NSDatePickerCell; message 'alloc';
@@ -130,3 +139,13 @@ type
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSDATEPICKERCELL_PAS_P}
+{$define NSDATEPICKERCELL_PAS_P}
+  
+{ NSDatePickerCellDelegate Protocol }
+  NSDatePickerCellDelegateProtocol = objcprotocol
+    procedure datePickerCell_validateProposedDateValue_timeInterval(aDatePickerCell: NSDatePickerCell; proposedDateValue: NSDatePointer; proposedTimeInterval: NSTimeIntervalPtr); message 'datePickerCell:validateProposedDateValue:timeInterval:';
+  end; external name 'NSDatePickerCellDelegate';
+{$endif}
+{$endif}

+ 29 - 13
packages/cocoaint/src/appkit/NSDictionaryController.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDictionaryController.h }
 { Parsed from Appkit.framework NSDictionaryController.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSDictionaryController = objcclass;
   NSDictionaryController = objcclass;
   NSDictionaryControllerPointer = ^NSDictionaryController;
   NSDictionaryControllerPointer = ^NSDictionaryController;
+  NSDictionaryControllerPtr = NSDictionaryControllerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,22 +44,26 @@
 { NSDictionaryController }
 { NSDictionaryController }
   NSDictionaryController = objcclass(NSArrayController)
   NSDictionaryController = objcclass(NSArrayController)
   private
   private
-    __reserved5: Pointer;
-    __reserved6: Pointer;
-    __reserved7: Pointer;
-    __contentDictionary: id;
-    __initialKey: NSString;
-    __initialValue: id;
-    __minimumInsertionKeyIndex: NSUInteger;
-    __localizedKeyStringsFileName: NSString;
-    __localizedKeyForKeyDictionary: NSDictionary;
-    __keyForLocalizedKeyDictionary: NSDictionary;
-    __includedKeys: NSArray;
-    __excludedKeys: NSArray;
+    _reserved5: Pointer;
+    _reserved6: Pointer;
+    _reserved7: Pointer;
+    _contentDictionary: id;
+    _initialKey: NSString;
+    _initialValue: id;
+    _minimumInsertionKeyIndex: NSUInteger;
+    _localizedKeyStringsFileName: NSString;
+    _localizedKeyForKeyDictionary: NSDictionary;
+    _keyForLocalizedKeyDictionary: NSDictionary;
+    _includedKeys: NSArray;
+    _excludedKeys: NSArray;
     __dictionaryControllerFlags: bitpacked record
     __dictionaryControllerFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSDictionaryController0: cuint);
+       1: (
         _deepCopiesValues: 0..1;
         _deepCopiesValues: 0..1;
         _suppressBuildingDictionary: 0..1;
         _suppressBuildingDictionary: 0..1;
         _reservedDictionaryController: 0..((1 shl 30)-1);
         _reservedDictionaryController: 0..((1 shl 30)-1);
+      );
       end;
       end;
     
     
   public
   public
@@ -79,5 +84,16 @@
     function localizedKeyTable: NSString; message 'localizedKeyTable';
     function localizedKeyTable: NSString; message 'localizedKeyTable';
   end; external;
   end; external;
 
 
+{ NSDictionaryControllerKeyValuePairCategory }
+  NSDictionaryControllerKeyValuePairCategory = objccategory(NSObject)
+    procedure setLocalizedKey(localizedKey: NSString); message 'setLocalizedKey:';
+    function localizedKey: NSString; message 'localizedKey';
+    procedure setKey(key: NSString); message 'setKey:';
+    function key: NSString; message 'key';
+    procedure setValue(value: id); message 'setValue:';
+    function value: id; message 'value';
+    function isExplicitlyIncluded: Boolean; message 'isExplicitlyIncluded';
+  end; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 29 - 8
packages/cocoaint/src/appkit/NSDockTile.inc

@@ -1,11 +1,15 @@
 { Parsed from Appkit.framework NSDockTile.h }
 { Parsed from Appkit.framework NSDockTile.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
 {$ifndef NSDOCKTILE_PAS_T}
 {$ifndef NSDOCKTILE_PAS_T}
 {$define NSDOCKTILE_PAS_T}
 {$define NSDOCKTILE_PAS_T}
 
 
+{ Defines }
+const
+  NSAppKitVersionNumberWithDockTilePlugInSupport = 1001.0;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
@@ -31,8 +35,10 @@
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSDockTilePlugInProtocol = objcprotocol;
   NSDockTile = objcclass;
   NSDockTile = objcclass;
   NSDockTilePointer = ^NSDockTile;
   NSDockTilePointer = ^NSDockTile;
+  NSDockTilePtr = NSDockTilePointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,17 +49,21 @@
 { NSDockTile }
 { NSDockTile }
   NSDockTile = objcclass(NSObject)
   NSDockTile = objcclass(NSObject)
   private
   private
-    __owner: id;
-    __dockContextRef: Pointer;
-    __contentView: NSView;
-    __frameView: NSView;
-    __backstopView: NSView;
-    __badgeLabel: NSString;
+    _owner: id;
+    _dockContextRef: Pointer;
+    _contentView: NSView;
+    _frameView: NSView;
+    _backstopView: NSView;
+    _badgeLabel: NSString;
     __dFlags: bitpacked record
     __dFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSDockTile0: cuint);
+       1: (
         showsAppBadge: 0..1;
         showsAppBadge: 0..1;
         reserved: 0..((1 shl 31)-1);
         reserved: 0..((1 shl 31)-1);
+      );
       end;
       end;
-    __dockTileSize: NSSize;
+    _dockTileSize: NSSize;
         reserved: array[0..4] of id;
         reserved: array[0..4] of id;
     
     
   public
   public
@@ -72,3 +82,14 @@
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSDOCKTILE_PAS_P}
+{$define NSDOCKTILE_PAS_P}
+  
+{ NSDockTilePlugIn Protocol }
+  NSDockTilePlugInProtocol = objcprotocol
+    procedure setDockTile(dockTile: NSDockTile); message 'setDockTile:';
+    function dockMenu: NSMenu; message 'dockMenu';
+  end; external name 'NSDockTilePlugIn';
+{$endif}
+{$endif}

+ 46 - 42
packages/cocoaint/src/appkit/NSDocument.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDocument.h }
 { Parsed from Appkit.framework NSDocument.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -25,7 +25,9 @@ const
 { Types }
 { Types }
 type
 type
   NSDocumentChangeType = NSUInteger;
   NSDocumentChangeType = NSUInteger;
+  NSDocumentChangeTypePtr = ^NSDocumentChangeType;
   NSSaveOperationType = NSUInteger;
   NSSaveOperationType = NSUInteger;
+  NSSaveOperationTypePtr = ^NSSaveOperationType;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -54,6 +56,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSDocument = objcclass;
   NSDocument = objcclass;
   NSDocumentPointer = ^NSDocument;
   NSDocumentPointer = ^NSDocument;
+  NSDocumentPtr = NSDocumentPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -64,19 +67,22 @@ type
 { NSDocument }
 { NSDocument }
   NSDocument = objcclass(NSObject, NSUserInterfaceValidationsProtocol)
   NSDocument = objcclass(NSObject, NSUserInterfaceValidationsProtocol)
   private
   private
-    __window: NSWindow;
-    __windowControllers: id;
-    __fileURL: NSURL;
-    __fileType: NSString;
-    __printInfo: NSPrintInfo;
-    __changeCount: clong;
-    _savePanelAccessory: NSView;
-    __displayName: id;
-    __privateData: id;
-    __undoManager: NSUndoManager;
+    _window: NSWindow;
+    _windowControllers: id;
+    _fileURL: NSURL;
+    _fileType: NSString;
+    _printInfo: NSPrintInfo;
+    _changeCount: clong;
+    savePanelAccessory: NSView;
+    _displayName: id;
+    _privateData: id;
+    _undoManager: NSUndoManager;
     __docFlags: bitpacked record
     __docFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSDocument0: cuint);
+       1: (
         inClose: 0..1;
         inClose: 0..1;
-        hasUndoManager: 0..1;
+        _hasUndoManager: 0..1;
         isShowingPageLayout: 0..1;
         isShowingPageLayout: 0..1;
         isRunningPrintOperation: 0..1;
         isRunningPrintOperation: 0..1;
         savePanelNameExtensionHidden: 0..1;
         savePanelNameExtensionHidden: 0..1;
@@ -85,14 +91,16 @@ type
         definitelyHasUnsavedChanges: 0..1;
         definitelyHasUnsavedChanges: 0..1;
         definitelyHasUnautosavedChanges: 0..1;
         definitelyHasUnautosavedChanges: 0..1;
         RESERVED: 0..((1 shl 23)-1);
         RESERVED: 0..((1 shl 23)-1);
+      );
       end;
       end;
-    __savePanelSaveType: NSString;
+    _savePanelSaveType: NSString;
     
     
   public
   public
     class function alloc: NSDocument; message 'alloc';
     class function alloc: NSDocument; message 'alloc';
 
 
     function init: id; message 'init';
     function init: id; message 'init';
     function initWithType_error(typeName: NSString; outError: NSErrorPointer): id; message 'initWithType:error:';
     function initWithType_error(typeName: NSString; outError: NSErrorPointer): id; message 'initWithType:error:';
+    class function canConcurrentlyReadDocumentsOfType(typeName: NSString): Boolean; message 'canConcurrentlyReadDocumentsOfType:';
     function initWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'initWithContentsOfURL:ofType:error:';
     function initWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'initWithContentsOfURL:ofType:error:';
     function initForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'initForURL:withContentsOfURL:ofType:error:';
     function initForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'initForURL:withContentsOfURL:ofType:error:';
     procedure setFileType(typeName: NSString); message 'setFileType:';
     procedure setFileType(typeName: NSString); message 'setFileType:';
@@ -169,36 +177,32 @@ type
     function fileNameExtensionForType_saveOperation(typeName: NSString; saveOperation: NSSaveOperationType): NSString; message 'fileNameExtensionForType:saveOperation:';
     function fileNameExtensionForType_saveOperation(typeName: NSString; saveOperation: NSSaveOperationType): NSString; message 'fileNameExtensionForType:saveOperation:';
     function validateUserInterfaceItem(anItem: id): Boolean; message 'validateUserInterfaceItem:';
     function validateUserInterfaceItem(anItem: id): Boolean; message 'validateUserInterfaceItem:';
 
 
-    { Category: NSDeprecated }
-    function dataRepresentationOfType(type_: NSString): NSData; message 'dataRepresentationOfType:';
-    function fileAttributesToWriteToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): NSDictionary; message 'fileAttributesToWriteToFile:ofType:saveOperation:';
-    function fileName: NSString; message 'fileName';
-    function fileWrapperRepresentationOfType(type_: NSString): NSFileWrapper; message 'fileWrapperRepresentationOfType:';
-    function initWithContentsOfFile_ofType(absolutePath: NSString; typeName: NSString): id; message 'initWithContentsOfFile:ofType:';
-    function initWithContentsOfURL_ofType(absoluteURL: NSURL; typeName: NSString): id; message 'initWithContentsOfURL:ofType:';
-    function loadDataRepresentation_ofType(data: NSData; type_: NSString): Boolean; message 'loadDataRepresentation:ofType:';
-    function loadFileWrapperRepresentation_ofType(wrapper: NSFileWrapper; type_: NSString): Boolean; message 'loadFileWrapperRepresentation:ofType:';
-    procedure printShowingPrintPanel(flag: Boolean); message 'printShowingPrintPanel:';
-    function readFromFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'readFromFile:ofType:';
-    function readFromURL_ofType(url: NSURL; type_: NSString): Boolean; message 'readFromURL:ofType:';
-    function revertToSavedFromFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'revertToSavedFromFile:ofType:';
-    function revertToSavedFromURL_ofType(url: NSURL; type_: NSString): Boolean; message 'revertToSavedFromURL:ofType:';
-    function runModalPageLayoutWithPrintInfo(printInfo_: NSPrintInfo): NSInteger; message 'runModalPageLayoutWithPrintInfo:';
-    procedure saveToFile_saveOperation_delegate_didSaveSelector_contextInfo(fileName_: NSString; saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveToFile:saveOperation:delegate:didSaveSelector:contextInfo:';
-    procedure setFileName(fileName_: NSString); message 'setFileName:';
-    function writeToFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'writeToFile:ofType:';
-    function writeToFile_ofType_originalFile_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; fullOriginalDocumentPath: NSString; saveOperationType: NSSaveOperationType): Boolean; message 'writeToFile:ofType:originalFile:saveOperation:';
-    function writeToURL_ofType(url: NSURL; type_: NSString): Boolean; message 'writeToURL:ofType:';
-    function writeWithBackupToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): Boolean; message 'writeWithBackupToFile:ofType:saveOperation:';
-
-    { Category: NSScripting }
-    function lastComponentOfFileName: NSString; message 'lastComponentOfFileName';
-    procedure setLastComponentOfFileName(str: NSString); message 'setLastComponentOfFileName:';
-    function handleSaveScriptCommand(command: NSScriptCommand): id; message 'handleSaveScriptCommand:';
-    function handleCloseScriptCommand(command: NSCloseCommand): id; message 'handleCloseScriptCommand:';
-    function handlePrintScriptCommand(command: NSScriptCommand): id; message 'handlePrintScriptCommand:';
-    function objectSpecifier: NSScriptObjectSpecifier; message 'objectSpecifier';
+    { Adopted Protocols }
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSDocumentCategory }
+  NSDeprecated_NSDocumentCategory = objccategory(NSDocument)
+    function dataRepresentationOfType(type_: NSString): NSData; message 'dataRepresentationOfType:'; deprecated 'in Mac OS X 10.4 and later';
+    function fileAttributesToWriteToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): NSDictionary; message 'fileAttributesToWriteToFile:ofType:saveOperation:';
+    function fileName: NSString; message 'fileName'; deprecated 'in Mac OS X 10.4 and later';
+    function fileWrapperRepresentationOfType(type_: NSString): NSFileWrapper; message 'fileWrapperRepresentationOfType:'; deprecated 'in Mac OS X 10.4 and later';
+    function initWithContentsOfFile_ofType(absolutePath: NSString; typeName: NSString): id; message 'initWithContentsOfFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function initWithContentsOfURL_ofType(absoluteURL: NSURL; typeName: NSString): id; message 'initWithContentsOfURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function loadDataRepresentation_ofType(data: NSData; type_: NSString): Boolean; message 'loadDataRepresentation:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function loadFileWrapperRepresentation_ofType(wrapper: NSFileWrapper; type_: NSString): Boolean; message 'loadFileWrapperRepresentation:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    procedure printShowingPrintPanel(flag: Boolean); message 'printShowingPrintPanel:'; deprecated 'in Mac OS X 10.4 and later';
+    function readFromFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'readFromFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function readFromURL_ofType(url: NSURL; type_: NSString): Boolean; message 'readFromURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function revertToSavedFromFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'revertToSavedFromFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function revertToSavedFromURL_ofType(url: NSURL; type_: NSString): Boolean; message 'revertToSavedFromURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function runModalPageLayoutWithPrintInfo(printInfo_: NSPrintInfo): NSInteger; message 'runModalPageLayoutWithPrintInfo:'; deprecated 'in Mac OS X 10.4 and later';
+    procedure saveToFile_saveOperation_delegate_didSaveSelector_contextInfo(fileName_: NSString; saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveToFile:saveOperation:delegate:didSaveSelector:contextInfo:'; deprecated 'in Mac OS X 10.4 and later';
+    procedure setFileName(fileName_: NSString); message 'setFileName:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeToFile_ofType(fileName_: NSString; type_: NSString): Boolean; message 'writeToFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeToFile_ofType_originalFile_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; fullOriginalDocumentPath: NSString; saveOperationType: NSSaveOperationType): Boolean; message 'writeToFile:ofType:originalFile:saveOperation:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeToURL_ofType(url: NSURL; type_: NSString): Boolean; message 'writeToURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeWithBackupToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): Boolean; message 'writeWithBackupToFile:ofType:saveOperation:'; deprecated 'in Mac OS X 10.4 and later';
+  end; external name 'NSDeprecated';
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 27 - 20
packages/cocoaint/src/appkit/NSDocumentController.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDocumentController.h }
 { Parsed from Appkit.framework NSDocumentController.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSDocumentController = objcclass;
   NSDocumentController = objcclass;
   NSDocumentControllerPointer = ^NSDocumentController;
   NSDocumentControllerPointer = ^NSDocumentController;
+  NSDocumentControllerPtr = NSDocumentControllerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,11 +44,11 @@
 { NSDocumentController }
 { NSDocumentController }
   NSDocumentController = objcclass(NSObject, NSCodingProtocol, NSUserInterfaceValidationsProtocol)
   NSDocumentController = objcclass(NSObject, NSCodingProtocol, NSUserInterfaceValidationsProtocol)
   private
   private
-    __documents: id;
-    __moreVars: id;
-    __cachedTypeDescriptions: NSArray;
-    __recents: NSMutableDictionary;
-    __recentsLimit: cint;
+    _documents: id;
+    _moreVars: id;
+    _cachedTypeDescriptions: NSArray;
+    _recents: NSMutableDictionary;
+    _recentsLimit: cint;
     
     
   public
   public
     class function alloc: NSDocumentController; message 'alloc';
     class function alloc: NSDocumentController; message 'alloc';
@@ -71,7 +72,7 @@
     function makeDocumentWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'makeDocumentWithContentsOfURL:ofType:error:';
     function makeDocumentWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'makeDocumentWithContentsOfURL:ofType:error:';
     function reopenDocumentForURL_withContentsOfURL_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; outError: NSErrorPointer): Boolean; message 'reopenDocumentForURL:withContentsOfURL:error:';
     function reopenDocumentForURL_withContentsOfURL_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; outError: NSErrorPointer): Boolean; message 'reopenDocumentForURL:withContentsOfURL:error:';
     function makeDocumentForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'makeDocumentForURL:withContentsOfURL:ofType:error:';
     function makeDocumentForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'makeDocumentForURL:withContentsOfURL:ofType:error:';
-    procedure setAutosavingDelay(autosavingDelay_: NSTimeInterval); message 'setAutosavingDelay:';
+    procedure setAutosavingDelay(autosavingDelay: NSTimeInterval); message 'setAutosavingDelay:';
     function autosavingDelay: NSTimeInterval; message 'autosavingDelay';
     function autosavingDelay: NSTimeInterval; message 'autosavingDelay';
     procedure saveAllDocuments(sender: id); message 'saveAllDocuments:';
     procedure saveAllDocuments(sender: id); message 'saveAllDocuments:';
     function hasEditedDocuments: Boolean; message 'hasEditedDocuments';
     function hasEditedDocuments: Boolean; message 'hasEditedDocuments';
@@ -92,20 +93,26 @@
     function displayNameForType(typeName: NSString): NSString; message 'displayNameForType:';
     function displayNameForType(typeName: NSString): NSString; message 'displayNameForType:';
     function validateUserInterfaceItem(anItem: id): Boolean; message 'validateUserInterfaceItem:';
     function validateUserInterfaceItem(anItem: id): Boolean; message 'validateUserInterfaceItem:';
 
 
-    { Category: NSDeprecated }
-    function fileExtensionsFromType(typeName: NSString): NSArray; message 'fileExtensionsFromType:';
-    function typeFromFileExtension(fileNameExtensionOrHFSFileType: NSString): NSString; message 'typeFromFileExtension:';
-    function documentForFileName(fileName: NSString): id; message 'documentForFileName:';
-    function fileNamesFromRunningOpenPanel: NSArray; message 'fileNamesFromRunningOpenPanel';
-    function makeDocumentWithContentsOfFile_ofType(fileName: NSString; type_: NSString): id; message 'makeDocumentWithContentsOfFile:ofType:';
-    function makeDocumentWithContentsOfURL_ofType(url: NSURL; type_: NSString): id; message 'makeDocumentWithContentsOfURL:ofType:';
-    function makeUntitledDocumentOfType(type_: NSString): id; message 'makeUntitledDocumentOfType:';
-    function openDocumentWithContentsOfFile_display(fileName: NSString; display: Boolean): id; message 'openDocumentWithContentsOfFile:display:';
-    function openDocumentWithContentsOfURL_display(url: NSURL; display: Boolean): id; message 'openDocumentWithContentsOfURL:display:';
-    function openUntitledDocumentOfType_display(type_: NSString; display: Boolean): id; message 'openUntitledDocumentOfType:display:';
-    procedure setShouldCreateUI(flag: Boolean); message 'setShouldCreateUI:';
-    function shouldCreateUI: Boolean; message 'shouldCreateUI';
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSDocumentControllerCategory }
+  NSDeprecated_NSDocumentControllerCategory = objccategory(NSDocumentController)
+    function fileExtensionsFromType(typeName: NSString): NSArray; message 'fileExtensionsFromType:'; deprecated 'in Mac OS X 10.5 and later';
+    function typeFromFileExtension(fileNameExtensionOrHFSFileType: NSString): NSString; message 'typeFromFileExtension:'; deprecated 'in Mac OS X 10.5 and later';
+    function documentForFileName(fileName: NSString): id; message 'documentForFileName:'; deprecated 'in Mac OS X 10.4 and later';
+    function fileNamesFromRunningOpenPanel: NSArray; message 'fileNamesFromRunningOpenPanel'; deprecated 'in Mac OS X 10.4 and later';
+    function makeDocumentWithContentsOfFile_ofType(fileName: NSString; type_: NSString): id; message 'makeDocumentWithContentsOfFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function makeDocumentWithContentsOfURL_ofType(url: NSURL; type_: NSString): id; message 'makeDocumentWithContentsOfURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function makeUntitledDocumentOfType(type_: NSString): id; message 'makeUntitledDocumentOfType:'; deprecated 'in Mac OS X 10.4 and later';
+    function openDocumentWithContentsOfFile_display(fileName: NSString; display: Boolean): id; message 'openDocumentWithContentsOfFile:display:'; deprecated 'in Mac OS X 10.4 and later';
+    function openDocumentWithContentsOfURL_display(url: NSURL; display: Boolean): id; message 'openDocumentWithContentsOfURL:display:'; deprecated 'in Mac OS X 10.4 and later';
+    function openUntitledDocumentOfType_display(type_: NSString; display: Boolean): id; message 'openUntitledDocumentOfType:display:'; deprecated 'in Mac OS X 10.4 and later';
+    procedure setShouldCreateUI(flag: Boolean); message 'setShouldCreateUI:'; deprecated 'in Mac OS X 10.4 and later';
+    function shouldCreateUI: Boolean; message 'shouldCreateUI'; deprecated 'in Mac OS X 10.4 and later';
+  end; external name 'NSDeprecated';
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 22 - 1
packages/cocoaint/src/appkit/NSDocumentScripting.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDocumentScripting.h }
 { Parsed from Appkit.framework NSDocumentScripting.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,3 +29,24 @@
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+
+{$ifdef FORWARD}
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDOCUMENTSCRIPTING_PAS_C}
+{$define NSDOCUMENTSCRIPTING_PAS_C}
+
+{ NSScripting_NSDocumentCategory }
+  NSScripting_NSDocumentCategory = objccategory(NSDocument)
+    function lastComponentOfFileName: NSString; message 'lastComponentOfFileName';
+    procedure setLastComponentOfFileName(str: NSString); message 'setLastComponentOfFileName:';
+    function handleSaveScriptCommand(command: NSScriptCommand): id; message 'handleSaveScriptCommand:';
+    function handleCloseScriptCommand(command: NSCloseCommand): id; message 'handleCloseScriptCommand:';
+    function handlePrintScriptCommand(command: NSScriptCommand): id; message 'handlePrintScriptCommand:';
+    function objectSpecifier: NSScriptObjectSpecifier; message 'objectSpecifier';
+  end; external name 'NSScripting';
+
+{$endif}
+{$endif}

+ 36 - 1
packages/cocoaint/src/appkit/NSDragging.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDragging.h }
 { Parsed from Appkit.framework NSDragging.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -9,6 +9,7 @@
 { Types }
 { Types }
 type
 type
   NSDragOperation = NSUInteger;
   NSDragOperation = NSUInteger;
+  NSDragOperationPtr = ^NSDragOperation;
 
 
 { Constants }
 { Constants }
 
 
@@ -51,6 +52,40 @@ const
   NSDraggingInfoProtocol = objcprotocol;
   NSDraggingInfoProtocol = objcprotocol;
 
 
 {$endif}
 {$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSDRAGGING_PAS_C}
+{$define NSDRAGGING_PAS_C}
+
+{ NSDraggingDestinationCategory }
+  NSDraggingDestinationCategory = objccategory(NSObject)
+    function draggingEntered(sender: id): NSDragOperation; message 'draggingEntered:';
+    function draggingUpdated(sender: id): NSDragOperation; message 'draggingUpdated:';
+    procedure draggingExited(sender: id); message 'draggingExited:';
+    function prepareForDragOperation(sender: id): Boolean; message 'prepareForDragOperation:';
+    function performDragOperation(sender: id): Boolean; message 'performDragOperation:';
+    procedure concludeDragOperation(sender: id); message 'concludeDragOperation:';
+    procedure draggingEnded(sender: id); message 'draggingEnded:';
+    function wantsPeriodicDraggingUpdates: Boolean; message 'wantsPeriodicDraggingUpdates';
+  end; external;
+
+{ NSDraggingSourceCategory }
+  NSDraggingSourceCategory = objccategory(NSObject)
+    function draggingSourceOperationMaskForLocal(flag: Boolean): NSDragOperation; message 'draggingSourceOperationMaskForLocal:';
+    function namesOfPromisedFilesDroppedAtDestination(dropDestination: NSURL): NSArray; message 'namesOfPromisedFilesDroppedAtDestination:';
+    procedure draggedImage_beganAt(image: NSImage; screenPoint: NSPoint); message 'draggedImage:beganAt:';
+    procedure draggedImage_endedAt_operation(image: NSImage; screenPoint: NSPoint; operation: NSDragOperation); message 'draggedImage:endedAt:operation:';
+    procedure draggedImage_movedTo(image: NSImage; screenPoint: NSPoint); message 'draggedImage:movedTo:';
+    function ignoreModifierKeysWhileDragging: Boolean; message 'ignoreModifierKeysWhileDragging';
+  end; external;
+
+{ NSDraggingSourceDeprecatedCategory }
+  NSDraggingSourceDeprecatedCategory = objccategory(NSObject)
+    procedure draggedImage_endedAt_deposited(image: NSImage; screenPoint: NSPoint; flag: Boolean); message 'draggedImage:endedAt:deposited:'; deprecated 'in Mac OS X 10.1 and later';
+  end; external;
+
+{$endif}
+{$endif}
 {$ifdef PROTOCOLS}
 {$ifdef PROTOCOLS}
 {$ifndef NSDRAGGING_PAS_P}
 {$ifndef NSDRAGGING_PAS_P}
 {$define NSDRAGGING_PAS_P}
 {$define NSDRAGGING_PAS_P}

+ 50 - 26
packages/cocoaint/src/appkit/NSDrawer.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSDrawer.h }
 { Parsed from Appkit.framework NSDrawer.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -17,6 +17,7 @@ const
 { Types }
 { Types }
 type
 type
   NSDrawerState = NSUInteger;
   NSDrawerState = NSUInteger;
+  NSDrawerStatePtr = ^NSDrawerState;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -41,17 +42,19 @@ type
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSDrawerWillOpenNotification: NSString; external name '_NSDrawerWillOpenNotification';
-  NSDrawerDidOpenNotification: NSString; external name '_NSDrawerDidOpenNotification';
-  NSDrawerWillCloseNotification: NSString; external name '_NSDrawerWillCloseNotification';
-  NSDrawerDidCloseNotification: NSString; external name '_NSDrawerDidCloseNotification';
+  NSDrawerWillOpenNotification: NSString; cvar; external;
+  NSDrawerDidOpenNotification: NSString; cvar; external;
+  NSDrawerWillCloseNotification: NSString; cvar; external;
+  NSDrawerDidCloseNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSDrawerDelegateProtocol = objcprotocol;
   NSDrawer = objcclass;
   NSDrawer = objcclass;
   NSDrawerPointer = ^NSDrawer;
   NSDrawerPointer = ^NSDrawer;
+  NSDrawerPtr = NSDrawerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -62,27 +65,27 @@ var
 { NSDrawer }
 { NSDrawer }
   NSDrawer = objcclass(NSResponder)
   NSDrawer = objcclass(NSResponder)
   private
   private
-    __drawerState: NSDrawerState;
-    __drawerNextState: NSDrawerState;
-    __drawerEdge: NSRectEdge;
-    __drawerNextEdge: NSRectEdge;
-    __drawerPreferredEdge: NSRectEdge;
-    __drawerPercent: single;
-    __drawerPercentSaved: single;
-    __drawerLeadingOffset: CGFloat;
-    __drawerTrailingOffset: CGFloat;
-    __drawerLock: NSLock;
-    __drawerWindow: NSWindow;
-    __drawerParentWindow: NSWindow;
-    __drawerNextParentWindow: NSWindow;
-    __drawerSaveName: NSString;
-    __drawerStartTime: CFAbsoluteTime;
-    __drawerTotalTime: CFTimeInterval;
-    __drawerLoop: CFRunLoopRef;
-    __drawerTimer: CFRunLoopTimerRef; {garbage collector: __strong }
-    __drawerDelegate: id;
-    __drawerFlags: cuint;
-    __drawerObserver: CFRunLoopObserverRef; {garbage collector: __strong }
+    _drawerState: NSDrawerState;
+    _drawerNextState: NSDrawerState;
+    _drawerEdge: NSRectEdge;
+    _drawerNextEdge: NSRectEdge;
+    _drawerPreferredEdge: NSRectEdge;
+    _drawerPercent: single;
+    _drawerPercentSaved: single;
+    _drawerLeadingOffset: CGFloat;
+    _drawerTrailingOffset: CGFloat;
+    _drawerLock: NSLock;
+    _drawerWindow: NSWindow;
+    _drawerParentWindow: NSWindow;
+    _drawerNextParentWindow: NSWindow;
+    _drawerSaveName: NSString;
+    _drawerStartTime: CFAbsoluteTime;
+    _drawerTotalTime: CFTimeInterval;
+    _drawerLoop: CFRunLoopRef;
+    _drawerTimer: CFRunLoopTimerRef; {garbage collector: __strong }
+    _drawerDelegate: id;
+    _drawerFlags: cuint;
+    _drawerObserver: CFRunLoopObserverRef; {garbage collector: __strong }
     
     
   public
   public
     class function alloc: NSDrawer; message 'alloc';
     class function alloc: NSDrawer; message 'alloc';
@@ -114,5 +117,26 @@ var
     function trailingOffset: CGFloat; message 'trailingOffset';
     function trailingOffset: CGFloat; message 'trailingOffset';
   end; external;
   end; external;
 
 
+{ DrawersCategory }
+  DrawersCategory = objccategory(NSWindow)
+    function drawers: NSArray; message 'drawers';
+  end; external;
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSDRAWER_PAS_P}
+{$define NSDRAWER_PAS_P}
+  
+{ NSDrawerDelegate Protocol }
+  NSDrawerDelegateProtocol = objcprotocol
+    function drawerShouldOpen(sender: NSDrawer): Boolean; message 'drawerShouldOpen:';
+    function drawerShouldClose(sender: NSDrawer): Boolean; message 'drawerShouldClose:';
+    function drawerWillResizeContents_toSize(sender: NSDrawer; contentSize: NSSize): NSSize; message 'drawerWillResizeContents:toSize:';
+    procedure drawerWillOpen(notification: NSNotification); message 'drawerWillOpen:';
+    procedure drawerDidOpen(notification: NSNotification); message 'drawerDidOpen:';
+    procedure drawerWillClose(notification: NSNotification); message 'drawerWillClose:';
+    procedure drawerDidClose(notification: NSNotification); message 'drawerDidClose:';
+  end; external name 'NSDrawerDelegate';
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 5 - 4
packages/cocoaint/src/appkit/NSEPSImageRep.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSEPSImageRep.h }
 { Parsed from Appkit.framework NSEPSImageRep.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSEPSImageRep = objcclass;
   NSEPSImageRep = objcclass;
   NSEPSImageRepPointer = ^NSEPSImageRep;
   NSEPSImageRepPointer = ^NSEPSImageRep;
+  NSEPSImageRepPtr = NSEPSImageRepPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,9 +44,9 @@
 { NSEPSImageRep }
 { NSEPSImageRep }
   NSEPSImageRep = objcclass(NSImageRep)
   NSEPSImageRep = objcclass(NSImageRep)
   private
   private
-    __bBoxOrigin: NSPoint;
-    __epsData: NSData;
-    __pdfImageRep: NSPDFImageRep;
+    _bBoxOrigin: NSPoint;
+    _epsData: NSData;
+    _pdfImageRep: NSPDFImageRep;
     
     
   public
   public
     class function alloc: NSEPSImageRep; message 'alloc';
     class function alloc: NSEPSImageRep; message 'alloc';

+ 37 - 37
packages/cocoaint/src/appkit/NSErrors.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSErrors.h }
 { Parsed from Appkit.framework NSErrors.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,42 +29,42 @@
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSTextLineTooLongException: NSString; external name '_NSTextLineTooLongException';
-  NSTextNoSelectionException: NSString; external name '_NSTextNoSelectionException';
-  NSWordTablesWriteException: NSString; external name '_NSWordTablesWriteException';
-  NSWordTablesReadException: NSString; external name '_NSWordTablesReadException';
-  NSTextReadException: NSString; external name '_NSTextReadException';
-  NSTextWriteException: NSString; external name '_NSTextWriteException';
-  NSPasteboardCommunicationException: NSString; external name '_NSPasteboardCommunicationException';
-  NSPrintingCommunicationException: NSString; external name '_NSPrintingCommunicationException';
-  NSAbortModalException: NSString; external name '_NSAbortModalException';
-  NSAbortPrintingException: NSString; external name '_NSAbortPrintingException';
-  NSIllegalSelectorException: NSString; external name '_NSIllegalSelectorException';
-  NSAppKitVirtualMemoryException: NSString; external name '_NSAppKitVirtualMemoryException';
-  NSBadRTFDirectiveException: NSString; external name '_NSBadRTFDirectiveException';
-  NSBadRTFFontTableException: NSString; external name '_NSBadRTFFontTableException';
-  NSBadRTFStyleSheetException: NSString; external name '_NSBadRTFStyleSheetException';
-  NSTypedStreamVersionException: NSString; external name '_NSTypedStreamVersionException';
-  NSTIFFException: NSString; external name '_NSTIFFException';
-  NSPrintPackageException: NSString; external name '_NSPrintPackageException';
-  NSBadRTFColorTableException: NSString; external name '_NSBadRTFColorTableException';
-  NSDraggingException: NSString; external name '_NSDraggingException';
-  NSColorListIOException: NSString; external name '_NSColorListIOException';
-  NSColorListNotEditableException: NSString; external name '_NSColorListNotEditableException';
-  NSBadBitmapParametersException: NSString; external name '_NSBadBitmapParametersException';
-  NSWindowServerCommunicationException: NSString; external name '_NSWindowServerCommunicationException';
-  NSFontUnavailableException: NSString; external name '_NSFontUnavailableException';
-  NSPPDIncludeNotFoundException: NSString; external name '_NSPPDIncludeNotFoundException';
-  NSPPDParseException: NSString; external name '_NSPPDParseException';
-  NSPPDIncludeStackOverflowException: NSString; external name '_NSPPDIncludeStackOverflowException';
-  NSPPDIncludeStackUnderflowException: NSString; external name '_NSPPDIncludeStackUnderflowException';
-  NSRTFPropertyStackOverflowException: NSString; external name '_NSRTFPropertyStackOverflowException';
-  NSAppKitIgnoredException: NSString; external name '_NSAppKitIgnoredException';
-  NSBadComparisonException: NSString; external name '_NSBadComparisonException';
-  NSImageCacheException: NSString; external name '_NSImageCacheException';
-  NSNibLoadingException: NSString; external name '_NSNibLoadingException';
-  NSBrowserIllegalDelegateException: NSString; external name '_NSBrowserIllegalDelegateException';
-  NSAccessibilityException: NSString; external name '_NSAccessibilityException';
+  NSTextLineTooLongException: NSString; cvar; external;
+  NSTextNoSelectionException: NSString; cvar; external;
+  NSWordTablesWriteException: NSString; cvar; external;
+  NSWordTablesReadException: NSString; cvar; external;
+  NSTextReadException: NSString; cvar; external;
+  NSTextWriteException: NSString; cvar; external;
+  NSPasteboardCommunicationException: NSString; cvar; external;
+  NSPrintingCommunicationException: NSString; cvar; external;
+  NSAbortModalException: NSString; cvar; external;
+  NSAbortPrintingException: NSString; cvar; external;
+  NSIllegalSelectorException: NSString; cvar; external;
+  NSAppKitVirtualMemoryException: NSString; cvar; external;
+  NSBadRTFDirectiveException: NSString; cvar; external;
+  NSBadRTFFontTableException: NSString; cvar; external;
+  NSBadRTFStyleSheetException: NSString; cvar; external;
+  NSTypedStreamVersionException: NSString; cvar; external;
+  NSTIFFException: NSString; cvar; external;
+  NSPrintPackageException: NSString; cvar; external;
+  NSBadRTFColorTableException: NSString; cvar; external;
+  NSDraggingException: NSString; cvar; external;
+  NSColorListIOException: NSString; cvar; external;
+  NSColorListNotEditableException: NSString; cvar; external;
+  NSBadBitmapParametersException: NSString; cvar; external;
+  NSWindowServerCommunicationException: NSString; cvar; external;
+  NSFontUnavailableException: NSString; cvar; external;
+  NSPPDIncludeNotFoundException: NSString; cvar; external;
+  NSPPDParseException: NSString; cvar; external;
+  NSPPDIncludeStackOverflowException: NSString; cvar; external;
+  NSPPDIncludeStackUnderflowException: NSString; cvar; external;
+  NSRTFPropertyStackOverflowException: NSString; cvar; external;
+  NSAppKitIgnoredException: NSString; cvar; external;
+  NSBadComparisonException: NSString; cvar; external;
+  NSImageCacheException: NSString; cvar; external;
+  NSNibLoadingException: NSString; cvar; external;
+  NSBrowserIllegalDelegateException: NSString; cvar; external;
+  NSAccessibilityException: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 111 - 42
packages/cocoaint/src/appkit/NSEvent.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSEvent.h }
 { Parsed from Appkit.framework NSEvent.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -32,19 +32,54 @@ const
   NSOtherMouseDown = 25;
   NSOtherMouseDown = 25;
   NSOtherMouseUp = 26;
   NSOtherMouseUp = 26;
   NSOtherMouseDragged = 27;
   NSOtherMouseDragged = 27;
+  NSEventTypeGesture = 29;
+  NSEventTypeMagnify = 30;
+  NSEventTypeSwipe = 31;
+  NSEventTypeRotate = 18;
+  NSEventTypeBeginGesture = 19;
+  NSEventTypeEndGesture = 20;
 
 
 const
 const
+  NSLeftMouseDownMask = 1 shl NSLeftMouseDown;
+  NSLeftMouseUpMask = 1 shl NSLeftMouseUp;
+  NSRightMouseDownMask = 1 shl NSRightMouseDown;
+  NSRightMouseUpMask = 1 shl NSRightMouseUp;
+  NSMouseMovedMask = 1 shl NSMouseMoved;
+  NSLeftMouseDraggedMask = 1 shl NSLeftMouseDragged;
+  NSRightMouseDraggedMask = 1 shl NSRightMouseDragged;
+  NSMouseEnteredMask = 1 shl NSMouseEntered;
+  NSMouseExitedMask = 1 shl NSMouseExited;
+  NSKeyDownMask = 1 shl NSKeyDown;
+  NSKeyUpMask = 1 shl NSKeyUp;
+  NSFlagsChangedMask = 1 shl NSFlagsChanged;
+  NSAppKitDefinedMask = 1 shl NSAppKitDefined;
+  NSSystemDefinedMask = 1 shl NSSystemDefined;
+  NSApplicationDefinedMask = 1 shl NSApplicationDefined;
+  NSPeriodicMask = 1 shl NSPeriodic;
+  NSCursorUpdateMask = 1 shl NSCursorUpdate;
+  NSScrollWheelMask = 1 shl NSScrollWheel;
+  NSTabletPointMask = 1 shl NSTabletPoint;
+  NSTabletProximityMask = 1 shl NSTabletProximity;
+  NSOtherMouseDownMask = 1 shl NSOtherMouseDown;
+  NSOtherMouseUpMask = 1 shl NSOtherMouseUp;
+  NSOtherMouseDraggedMask = 1 shl NSOtherMouseDragged;
+  NSEventMaskGesture = 1 shl NSEventTypeGesture;
+  NSEventMaskMagnify = 1 shl NSEventTypeMagnify;
+  NSEventMaskSwipe = 1 shl NSEventTypeSwipe;
+  NSEventMaskRotate = 1 shl NSEventTypeRotate;
+  NSEventMaskBeginGesture = 1 shl NSEventTypeBeginGesture;
+  NSEventMaskEndGesture = 1 shl NSEventTypeEndGesture;
   NSAnyEventMask = NSUIntegerMax;
   NSAnyEventMask = NSUIntegerMax;
 
 
 const
 const
-  NSAlphaShiftKeyMask = 1  shl  16;
-  NSShiftKeyMask = 1  shl  17;
-  NSControlKeyMask = 1  shl  18;
-  NSAlternateKeyMask = 1  shl  19;
-  NSCommandKeyMask = 1  shl  20;
-  NSNumericPadKeyMask = 1  shl  21;
-  NSHelpKeyMask = 1  shl  22;
-  NSFunctionKeyMask = 1  shl  23;
+  NSAlphaShiftKeyMask = 1 shl 16;
+  NSShiftKeyMask = 1 shl 17;
+  NSControlKeyMask = 1 shl 18;
+  NSAlternateKeyMask = 1 shl 19;
+  NSCommandKeyMask = 1 shl 20;
+  NSNumericPadKeyMask = 1 shl 21;
+  NSHelpKeyMask = 1 shl 22;
+  NSFunctionKeyMask = 1 shl 23;
   NSDeviceIndependentModifierFlagsMask = $ffff0000;
   NSDeviceIndependentModifierFlagsMask = $ffff0000;
 
 
 const
 const
@@ -147,11 +182,14 @@ const
   NSMouseEventSubtype = NX_SUBTYPE_DEFAULT;
   NSMouseEventSubtype = NX_SUBTYPE_DEFAULT;
   NSTabletPointEventSubtype = NX_SUBTYPE_TABLET_POINT;
   NSTabletPointEventSubtype = NX_SUBTYPE_TABLET_POINT;
   NSTabletProximityEventSubtype = NX_SUBTYPE_TABLET_PROXIMITY;
   NSTabletProximityEventSubtype = NX_SUBTYPE_TABLET_PROXIMITY;
+  NSTouchEventSubtype = NX_SUBTYPE_MOUSE_TOUCH;
 
 
 { Types }
 { Types }
 type
 type
   NSEventType = NSUInteger;
   NSEventType = NSUInteger;
+  NSEventTypePtr = ^NSEventType;
   NSPointingDeviceType = NSUInteger;
   NSPointingDeviceType = NSUInteger;
+  NSPointingDeviceTypePtr = ^NSPointingDeviceType;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -180,6 +218,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSEvent = objcclass;
   NSEvent = objcclass;
   NSEventPointer = ^NSEvent;
   NSEventPointer = ^NSEvent;
+  NSEventPtr = NSEventPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -190,23 +229,23 @@ type
 { NSEvent }
 { NSEvent }
   NSEvent = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSEvent = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __type: NSEventType;
-    __location: NSPoint;
-    __modifierFlags: cuint;
-    __WSTimestamp: NSInteger;
-    __timestamp: NSTimeInterval;
-    __windowNumber: NSInteger;
-    __window: NSWindow;
-    __context: NSGraphicsContext;
+    _type: NSEventType;
+    _location: NSPoint;
+    _modifierFlags: cuint;
+    _WSTimestamp: id;
+    _timestamp: NSTimeInterval;
+    _windowNumber: NSInteger;
+    _window: NSWindow;
+    _context: NSGraphicsContext;
     _mouse: record
     _mouse: record
-        eventNumber: cint;
-        clickCount: cint;
-        pressure: single;
+        _eventNumber: cint;
+        _clickCount: cint;
+        _pressure: single;
         {$ifdef cpu64}
         {$ifdef cpu64}
-        deltaX: CGFloat;
-        deltaY: CGFloat;
-        subtype: cint;
-        buttonNumber: cshort;
+        _deltaX: CGFloat;
+        _deltaY: CGFloat;
+        _subtype: cint;
+        _buttonNumber: cshort;
         reserved1: cshort;
         reserved1: cshort;
             reserved2: array[0..2] of cint;
             reserved2: array[0..2] of cint;
         {$endif}
         {$endif}
@@ -214,34 +253,53 @@ type
     _key: record
     _key: record
         keys: NSString;
         keys: NSString;
         unmodKeys: NSString;
         unmodKeys: NSString;
-        keyCode: cushort;
-        isARepeat: Boolean;
+        _keyCode: cushort;
+        _isARepeat: Boolean;
         {$ifdef cpu64}
         {$ifdef cpu64}
-            reserved: array[0..5] of cint;
+        eventFlags: cint;
+            reserved: array[0..4] of cint;
         {$endif}
         {$endif}
       end;
       end;
     _tracking: record
     _tracking: record
-        eventNumber: cint;
-        trackingNumber: NSInteger;
-        userData: Pointer;
+        _eventNumber: cint;
+        _trackingNumber: NSInteger;
+        _userData: Pointer;
         {$ifdef cpu64}
         {$ifdef cpu64}
             reserved: array[0..5] of cint;
             reserved: array[0..5] of cint;
         {$endif}
         {$endif}
       end;
       end;
     _scrollWheel: record
     _scrollWheel: record
-        deltaX: CGFloat;
-        deltaY: CGFloat;
-        deltaZ: CGFloat;
+        _deltaX: CGFloat;
+        _deltaY: CGFloat;
+        _deltaZ: CGFloat;
         {$ifdef cpu64}
         {$ifdef cpu64}
-        subtype: cshort;
+        _subtype: cshort;
         reserved1: cshort;
         reserved1: cshort;
             reserved2: array[0..5] of cint;
             reserved2: array[0..5] of cint;
         {$endif}
         {$endif}
       end;
       end;
+    _axisGesture: record
+        _deltaX: CGFloat;
+        _deltaY: CGFloat;
+        _deltaZ: CGFloat;
+        {$ifdef cpu64}
+            reserved: array[0..6] of cint;
+        {$endif}
+      end;
+    _miscGesture: record
+        _subtype: cshort;
+        gestureEnded: Boolean;
+        reserved: Boolean;
+        value: cint;
+        percentage: single;
+        {$ifdef cpu64}
+            reserved2: array[0..6] of cint;
+        {$endif}
+      end;
     _misc: record
     _misc: record
-        subtype: cint;
-        data1: NSInteger;
-        data2: NSInteger;
+        _subtype: cint;
+        _data1: NSInteger;
+        _data2: NSInteger;
         {$ifdef cpu64}
         {$ifdef cpu64}
             reserved: array[0..5] of cint;
             reserved: array[0..5] of cint;
         {$endif}
         {$endif}
@@ -252,10 +310,10 @@ type
     {$endif}
     {$endif}
     __data: record
     __data: record
       end;
       end;
-    __eventRef: Pointer;
+    _eventRef: Pointer;
     {$ifdef cpu64}
     {$ifdef cpu64}
-    _reserved1: Pointer;
-    _reserved2: Pointer;
+    reserved1: Pointer;
+    reserved2: Pointer;
     {$endif}
     {$endif}
     
     
   public
   public
@@ -288,16 +346,17 @@ type
     function eventRef: Pointer; message 'eventRef';
     function eventRef: Pointer; message 'eventRef';
     class function eventWithEventRef(eventRef_: Pointer): NSEvent; message 'eventWithEventRef:';
     class function eventWithEventRef(eventRef_: Pointer): NSEvent; message 'eventWithEventRef:';
     function CGEvent: CGEventRef; message 'CGEvent';
     function CGEvent: CGEventRef; message 'CGEvent';
-    class function eventWithCGEvent(CGEvent_: CGEventRef): NSEvent; message 'eventWithCGEvent:';
+    class function eventWithCGEvent(cgEvent_: CGEventRef): NSEvent; message 'eventWithCGEvent:';
     class procedure setMouseCoalescingEnabled(flag: Boolean); message 'setMouseCoalescingEnabled:';
     class procedure setMouseCoalescingEnabled(flag: Boolean); message 'setMouseCoalescingEnabled:';
     class function isMouseCoalescingEnabled: Boolean; message 'isMouseCoalescingEnabled';
     class function isMouseCoalescingEnabled: Boolean; message 'isMouseCoalescingEnabled';
+    function magnification: CGFloat; message 'magnification';
     function deviceID: NSUInteger; message 'deviceID';
     function deviceID: NSUInteger; message 'deviceID';
+    function rotation: single; message 'rotation';
     function absoluteX: NSInteger; message 'absoluteX';
     function absoluteX: NSInteger; message 'absoluteX';
     function absoluteY: NSInteger; message 'absoluteY';
     function absoluteY: NSInteger; message 'absoluteY';
     function absoluteZ: NSInteger; message 'absoluteZ';
     function absoluteZ: NSInteger; message 'absoluteZ';
     function buttonMask: NSUInteger; message 'buttonMask';
     function buttonMask: NSUInteger; message 'buttonMask';
     function tilt: NSPoint; message 'tilt';
     function tilt: NSPoint; message 'tilt';
-    function rotation: single; message 'rotation';
     function tangentialPressure: single; message 'tangentialPressure';
     function tangentialPressure: single; message 'tangentialPressure';
     function vendorDefined: id; message 'vendorDefined';
     function vendorDefined: id; message 'vendorDefined';
     function vendorID: NSUInteger; message 'vendorID';
     function vendorID: NSUInteger; message 'vendorID';
@@ -310,6 +369,7 @@ type
     function capabilityMask: NSUInteger; message 'capabilityMask';
     function capabilityMask: NSUInteger; message 'capabilityMask';
     function pointingDeviceType: NSPointingDeviceType; message 'pointingDeviceType';
     function pointingDeviceType: NSPointingDeviceType; message 'pointingDeviceType';
     function isEnteringProximity: Boolean; message 'isEnteringProximity';
     function isEnteringProximity: Boolean; message 'isEnteringProximity';
+    function touchesMatchingPhase_inView(phase: NSTouchPhase; view: NSView): NSSet; message 'touchesMatchingPhase:inView:';
     class procedure startPeriodicEventsAfterDelay_withPeriod(delay: NSTimeInterval; period: NSTimeInterval); message 'startPeriodicEventsAfterDelay:withPeriod:';
     class procedure startPeriodicEventsAfterDelay_withPeriod(delay: NSTimeInterval; period: NSTimeInterval); message 'startPeriodicEventsAfterDelay:withPeriod:';
     class procedure stopPeriodicEvents; message 'stopPeriodicEvents';
     class procedure stopPeriodicEvents; message 'stopPeriodicEvents';
     class function mouseEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_clickCount_pressure(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; eNum: NSInteger; cNum: NSInteger; pressure_: single): NSEvent; message 'mouseEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:clickCount:pressure:';
     class function mouseEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_clickCount_pressure(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; eNum: NSInteger; cNum: NSInteger; pressure_: single): NSEvent; message 'mouseEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:clickCount:pressure:';
@@ -317,6 +377,15 @@ type
     class function enterExitEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_trackingNumber_userData(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; eNum: NSInteger; tNum: NSInteger; data: Pointer): NSEvent; message 'enterExitEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:trackingNumber:userData:';
     class function enterExitEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_trackingNumber_userData(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; eNum: NSInteger; tNum: NSInteger; data: Pointer): NSEvent; message 'enterExitEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:trackingNumber:userData:';
     class function otherEventWithType_location_modifierFlags_timestamp_windowNumber_context_subtype_data1_data2(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; subtype_: cshort; d: NSInteger; d1: NSInteger): NSEvent; message 'otherEventWithType:location:modifierFlags:timestamp:windowNumber:context:subtype:data1:data2:';
     class function otherEventWithType_location_modifierFlags_timestamp_windowNumber_context_subtype_data1_data2(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; subtype_: cshort; d: NSInteger; d1: NSInteger): NSEvent; message 'otherEventWithType:location:modifierFlags:timestamp:windowNumber:context:subtype:data1:data2:';
     class function mouseLocation: NSPoint; message 'mouseLocation';
     class function mouseLocation: NSPoint; message 'mouseLocation';
+    class function pressedMouseButtons: NSUInteger; message 'pressedMouseButtons';
+    class function doubleClickInterval: NSTimeInterval; message 'doubleClickInterval';
+    class function keyRepeatDelay: NSTimeInterval; message 'keyRepeatDelay';
+    class function keyRepeatInterval: NSTimeInterval; message 'keyRepeatInterval';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 60 - 28
packages/cocoaint/src/appkit/NSFileWrapper.inc

@@ -1,11 +1,28 @@
 { Parsed from Appkit.framework NSFileWrapper.h }
 { Parsed from Appkit.framework NSFileWrapper.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
 {$ifndef NSFILEWRAPPER_PAS_T}
 {$ifndef NSFILEWRAPPER_PAS_T}
 {$define NSFILEWRAPPER_PAS_T}
 {$define NSFILEWRAPPER_PAS_T}
 
 
+{ Constants }
+
+const
+  NSFileWrapperReadingImmediate = 1 shl 0;
+  NSFileWrapperReadingWithoutMapping = 1 shl 1;
+
+const
+  NSFileWrapperWritingAtomic = 1 shl 0;
+  NSFileWrapperWritingWithNameUpdating = 1 shl 1;
+
+{ Types }
+type
+  NSFileWrapperReadingOptions = NSUInteger;
+  NSFileWrapperReadingOptionsPtr = ^NSFileWrapperReadingOptions;
+  NSFileWrapperWritingOptions = NSUInteger;
+  NSFileWrapperWritingOptionsPtr = ^NSFileWrapperWritingOptions;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
@@ -33,6 +50,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSFileWrapper = objcclass;
   NSFileWrapper = objcclass;
   NSFileWrapperPointer = ^NSFileWrapper;
   NSFileWrapperPointer = ^NSFileWrapper;
+  NSFileWrapperPtr = NSFileWrapperPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,46 +61,60 @@
 { NSFileWrapper }
 { NSFileWrapper }
   NSFileWrapper = objcclass(NSObject, NSCodingProtocol)
   NSFileWrapper = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __impl: id;
-    __fileName: NSString;
-    __preferredFileName: NSString;
-    __fileAttributes: NSDictionary;
-    __image: NSImage;
-    __moreVars: id;
+    _fileAttributes: NSDictionary;
+    _preferredFileName: NSString;
+    _fileName: NSString;
+    _contents: id;
+    _icon: NSImage;
+    _moreVars: id;
     
     
   public
   public
     class function alloc: NSFileWrapper; message 'alloc';
     class function alloc: NSFileWrapper; message 'alloc';
 
 
-    function initDirectoryWithFileWrappers(docs: NSDictionary): id; message 'initDirectoryWithFileWrappers:';
-    function initRegularFileWithContents(data: NSData): id; message 'initRegularFileWithContents:';
-    function initSymbolicLinkWithDestination(path: NSString): id; message 'initSymbolicLinkWithDestination:';
-    function initWithPath(path: NSString): id; message 'initWithPath:';
-    function initWithSerializedRepresentation(data: NSData): id; message 'initWithSerializedRepresentation:';
-    function writeToFile_atomically_updateFilenames(path: NSString; atomicFlag: Boolean; updateFilenamesFlag: Boolean): Boolean; message 'writeToFile:atomically:updateFilenames:';
-    function serializedRepresentation: NSData; message 'serializedRepresentation';
-    procedure setFilename(filename_: NSString); message 'setFilename:';
-    function filename: NSString; message 'filename';
-    procedure setPreferredFilename(filename_: NSString); message 'setPreferredFilename:';
-    function preferredFilename: NSString; message 'preferredFilename';
-    procedure setFileAttributes(attributes: NSDictionary); message 'setFileAttributes:';
-    function fileAttributes: NSDictionary; message 'fileAttributes';
-    function isRegularFile: Boolean; message 'isRegularFile';
+    function initWithURL_options_error(url: NSURL; options: NSFileWrapperReadingOptions; outError: NSErrorPointer): id; message 'initWithURL:options:error:';
+    function initDirectoryWithFileWrappers(childrenByPreferredName: NSDictionary): id; message 'initDirectoryWithFileWrappers:';
+    function initRegularFileWithContents(contents: NSData): id; message 'initRegularFileWithContents:';
+    function initSymbolicLinkWithDestinationURL(url: NSURL): id; message 'initSymbolicLinkWithDestinationURL:';
+    function initWithSerializedRepresentation(serializeRepresentation: NSData): id; message 'initWithSerializedRepresentation:';
     function isDirectory: Boolean; message 'isDirectory';
     function isDirectory: Boolean; message 'isDirectory';
+    function isRegularFile: Boolean; message 'isRegularFile';
     function isSymbolicLink: Boolean; message 'isSymbolicLink';
     function isSymbolicLink: Boolean; message 'isSymbolicLink';
+    procedure setPreferredFilename(fileName_: NSString); message 'setPreferredFilename:';
+    function preferredFilename: NSString; message 'preferredFilename';
+    procedure setFilename(fileName_: NSString); message 'setFilename:';
+    function filename: NSString; message 'filename';
+    procedure setFileAttributes(fileAttributes_: NSDictionary); message 'setFileAttributes:';
+    function fileAttributes: NSDictionary; message 'fileAttributes';
     procedure setIcon(icon_: NSImage); message 'setIcon:';
     procedure setIcon(icon_: NSImage); message 'setIcon:';
     function icon: NSImage; message 'icon';
     function icon: NSImage; message 'icon';
+    function matchesContentsOfURL(url: NSURL): Boolean; message 'matchesContentsOfURL:';
+    function readFromURL_options_error(url: NSURL; options: NSFileWrapperReadingOptions; outError: NSErrorPointer): Boolean; message 'readFromURL:options:error:';
+    function writeToURL_options_originalContentsURL_error(url: NSURL; options: NSFileWrapperWritingOptions; originalContentsURL: NSURL; outError: NSErrorPointer): Boolean; message 'writeToURL:options:originalContentsURL:error:';
+    function serializedRepresentation: NSData; message 'serializedRepresentation';
+    function addFileWrapper(child: NSFileWrapper): NSString; message 'addFileWrapper:';
+    function addRegularFileWithContents_preferredFilename(data: NSData; fileName_: NSString): NSString; message 'addRegularFileWithContents:preferredFilename:';
+    procedure removeFileWrapper(child: NSFileWrapper); message 'removeFileWrapper:';
+    function fileWrappers: NSDictionary; message 'fileWrappers';
+    function keyForFileWrapper(child: NSFileWrapper): NSString; message 'keyForFileWrapper:';
+    function regularFileContents: NSData; message 'regularFileContents';
+    function symbolicLinkDestinationURL: NSURL; message 'symbolicLinkDestinationURL';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSDeprecated_NSFileWrapperCategory }
+  NSDeprecated_NSFileWrapperCategory = objccategory(NSFileWrapper)
+    function initWithPath(path: NSString): id; message 'initWithPath:';
+    function initSymbolicLinkWithDestination(path: NSString): id; message 'initSymbolicLinkWithDestination:';
     function needsToBeUpdatedFromPath(path: NSString): Boolean; message 'needsToBeUpdatedFromPath:';
     function needsToBeUpdatedFromPath(path: NSString): Boolean; message 'needsToBeUpdatedFromPath:';
     function updateFromPath(path: NSString): Boolean; message 'updateFromPath:';
     function updateFromPath(path: NSString): Boolean; message 'updateFromPath:';
-    function addFileWrapper(doc: NSFileWrapper): NSString; message 'addFileWrapper:';
-    procedure removeFileWrapper(doc: NSFileWrapper); message 'removeFileWrapper:';
-    function fileWrappers: NSDictionary; message 'fileWrappers';
-    function keyForFileWrapper(doc: NSFileWrapper): NSString; message 'keyForFileWrapper:';
+    function writeToFile_atomically_updateFilenames(path: NSString; atomicFlag: Boolean; updateFilenamesFlag: Boolean): Boolean; message 'writeToFile:atomically:updateFilenames:';
     function addFileWithPath(path: NSString): NSString; message 'addFileWithPath:';
     function addFileWithPath(path: NSString): NSString; message 'addFileWithPath:';
-    function addRegularFileWithContents_preferredFilename(data: NSData; filename_: NSString): NSString; message 'addRegularFileWithContents:preferredFilename:';
     function addSymbolicLinkWithDestination_preferredFilename(path: NSString; filename_: NSString): NSString; message 'addSymbolicLinkWithDestination:preferredFilename:';
     function addSymbolicLinkWithDestination_preferredFilename(path: NSString; filename_: NSString): NSString; message 'addSymbolicLinkWithDestination:preferredFilename:';
-    function regularFileContents: NSData; message 'regularFileContents';
     function symbolicLinkDestination: NSString; message 'symbolicLinkDestination';
     function symbolicLinkDestination: NSString; message 'symbolicLinkDestination';
-  end; external;
+  end; external name 'NSDeprecated';
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 66 - 23
packages/cocoaint/src/appkit/NSFont.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSFont.h }
 { Parsed from Appkit.framework NSFont.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -9,9 +9,13 @@
 { Types }
 { Types }
 type
 type
   NSGlyph = cuint;
   NSGlyph = cuint;
+  NSGlyphPtr = ^NSGlyph;
   NSMultibyteGlyphPacking = NSUInteger;
   NSMultibyteGlyphPacking = NSUInteger;
+  NSMultibyteGlyphPackingPtr = ^NSMultibyteGlyphPacking;
   NSFontRenderingMode = NSUInteger;
   NSFontRenderingMode = NSUInteger;
+  NSFontRenderingModePtr = ^NSFontRenderingMode;
   NSGlyphRelation = NSUInteger;
   NSGlyphRelation = NSUInteger;
+  NSGlyphRelationPtr = ^NSGlyphRelation;
 
 
 { Constants }
 { Constants }
 
 
@@ -35,6 +39,10 @@ const
   NSTwoByteGlyphPacking = 3;
   NSTwoByteGlyphPacking = 3;
   NSFourByteGlyphPacking = 4;
   NSFourByteGlyphPacking = 4;
 
 
+const
+  NSGlyphBelow = 1;
+  NSGlyphAbove = 2;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
@@ -50,7 +58,7 @@ const
 {$define NSFONT_PAS_F}
 {$define NSFONT_PAS_F}
 
 
 { Functions }
 { Functions }
-function NSConvertGlyphsToPackedGlyphs(glBufPointer: NSGlyph; count: NSInteger; packing: NSMultibyteGlyphPacking; packedGlyphsPointer: char): NSInteger; cdecl; external name 'NSConvertGlyphsToPackedGlyphs';
+function NSConvertGlyphsToPackedGlyphs(glBuf: NSGlyphPtr; count: NSInteger; packing: NSMultibyteGlyphPacking; packedGlyphs: PChar): NSInteger; cdecl; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -61,8 +69,25 @@ function NSConvertGlyphsToPackedGlyphs(glBufPointer: NSGlyph; count: NSInteger;
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSAntialiasThresholdChangedNotification: NSString; external name '_NSAntialiasThresholdChangedNotification';
-  NSFontSetChangedNotification: NSString; external name '_NSFontSetChangedNotification';
+  NSAntialiasThresholdChangedNotification: NSString; cvar; external;
+  NSFontSetChangedNotification: NSString; cvar; external;
+  NSAFMFamilyName: NSString; cvar; external;
+  NSAFMFontName: NSString; cvar; external;
+  NSAFMFormatVersion: NSString; cvar; external;
+  NSAFMFullName: NSString; cvar; external;
+  NSAFMNotice: NSString; cvar; external;
+  NSAFMVersion: NSString; cvar; external;
+  NSAFMWeight: NSString; cvar; external;
+  NSAFMEncodingScheme: NSString; cvar; external;
+  NSAFMCharacterSet: NSString; cvar; external;
+  NSAFMCapHeight: NSString; cvar; external;
+  NSAFMXHeight: NSString; cvar; external;
+  NSAFMAscender: NSString; cvar; external;
+  NSAFMDescender: NSString; cvar; external;
+  NSAFMUnderlinePosition: NSString; cvar; external;
+  NSAFMUnderlineThickness: NSString; cvar; external;
+  NSAFMItalicAngle: NSString; cvar; external;
+  NSAFMMappingScheme: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -70,6 +95,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSFont = objcclass;
   NSFont = objcclass;
   NSFontPointer = ^NSFont;
   NSFontPointer = ^NSFont;
+  NSFontPtr = NSFontPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -80,24 +106,28 @@ var
 { NSFont }
 { NSFont }
   NSFont = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSFont = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __name: NSString;
-    __size: CGFloat;
-    __reservedFont1: Pointer;
+    _name: NSString;
+    _size: CGFloat;
+    _retainCount: NSInteger;
     __fFlags: bitpacked record
     __fFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSFont0: cuint);
+       1: (
         _isScreenFont: 0..1;
         _isScreenFont: 0..1;
         _systemFontType: 0..((1 shl 8)-1);
         _systemFontType: 0..((1 shl 8)-1);
         _reserved1: 0..((1 shl 4)-1);
         _reserved1: 0..((1 shl 4)-1);
         _matrixIsIdentity: 0..1;
         _matrixIsIdentity: 0..1;
         _renderingMode: 0..((1 shl 3)-1);
         _renderingMode: 0..((1 shl 3)-1);
         _reserved2: 0..((1 shl 15)-1);
         _reserved2: 0..((1 shl 15)-1);
+      );
       end;
       end;
-    __private: id;
+    _private: id;
     
     
   public
   public
     class function alloc: NSFont; message 'alloc';
     class function alloc: NSFont; message 'alloc';
 
 
     class function fontWithName_size(fontName_: NSString; fontSize: CGFloat): NSFont; message 'fontWithName:size:';
     class function fontWithName_size(fontName_: NSString; fontSize: CGFloat): NSFont; message 'fontWithName:size:';
-    class function fontWithName_matrix(fontName_: NSString; fontMatrix: psingle): NSFont; message 'fontWithName:matrix:';
+    class function fontWithName_matrix(fontName_: NSString; fontMatrix: CGFloatPtr): NSFont; message 'fontWithName:matrix:';
     class function fontWithDescriptor_size(fontDescriptor_: NSFontDescriptor; fontSize: CGFloat): NSFont; message 'fontWithDescriptor:size:';
     class function fontWithDescriptor_size(fontDescriptor_: NSFontDescriptor; fontSize: CGFloat): NSFont; message 'fontWithDescriptor:size:';
     class function fontWithDescriptor_textTransform(fontDescriptor_: NSFontDescriptor; textTransform_: NSAffineTransform): NSFont; message 'fontWithDescriptor:textTransform:';
     class function fontWithDescriptor_textTransform(fontDescriptor_: NSFontDescriptor; textTransform_: NSAffineTransform): NSFont; message 'fontWithDescriptor:textTransform:';
     class function userFontOfSize(fontSize: CGFloat): NSFont; message 'userFontOfSize:';
     class function userFontOfSize(fontSize: CGFloat): NSFont; message 'userFontOfSize:';
@@ -120,7 +150,7 @@ var
     class function systemFontSizeForControlSize(controlSize: NSControlSize): CGFloat; message 'systemFontSizeForControlSize:';
     class function systemFontSizeForControlSize(controlSize: NSControlSize): CGFloat; message 'systemFontSizeForControlSize:';
     function fontName: NSString; message 'fontName';
     function fontName: NSString; message 'fontName';
     function pointSize: CGFloat; message 'pointSize';
     function pointSize: CGFloat; message 'pointSize';
-    function matrix: CGFloat; message 'matrix';
+    function matrix: CGFloatPtr; message 'matrix';
     function familyName: NSString; message 'familyName';
     function familyName: NSString; message 'familyName';
     function displayName: NSString; message 'displayName';
     function displayName: NSString; message 'displayName';
     function fontDescriptor: NSFontDescriptor; message 'fontDescriptor';
     function fontDescriptor: NSFontDescriptor; message 'fontDescriptor';
@@ -142,8 +172,8 @@ var
     function isFixedPitch: Boolean; message 'isFixedPitch';
     function isFixedPitch: Boolean; message 'isFixedPitch';
     function boundingRectForGlyph(aGlyph: NSGlyph): NSRect; message 'boundingRectForGlyph:';
     function boundingRectForGlyph(aGlyph: NSGlyph): NSRect; message 'boundingRectForGlyph:';
     function advancementForGlyph(ag: NSGlyph): NSSize; message 'advancementForGlyph:';
     function advancementForGlyph(ag: NSGlyph): NSSize; message 'advancementForGlyph:';
-    procedure getBoundingRects_forGlyphs_count(bounds: NSRectArray; glyphs: NSGlyphPointer; glyphCount: NSUInteger); message 'getBoundingRects:forGlyphs:count:';
-    procedure getAdvancements_forGlyphs_count(advancements: NSSizeArray; glyphs: NSGlyphPointer; glyphCount: NSUInteger); message 'getAdvancements:forGlyphs:count:';
+    procedure getBoundingRects_forGlyphs_count(bounds: NSRectArray; glyphs: NSGlyphPtr; glyphCount: NSUInteger); message 'getBoundingRects:forGlyphs:count:';
+    procedure getAdvancements_forGlyphs_count(advancements: NSSizeArray; glyphs: NSGlyphPtr; glyphCount: NSUInteger); message 'getAdvancements:forGlyphs:count:';
     procedure getAdvancements_forPackedGlyphs_length(advancements: NSSizeArray; packedGlyphs: Pointer; length: NSUInteger); message 'getAdvancements:forPackedGlyphs:length:';
     procedure getAdvancements_forPackedGlyphs_length(advancements: NSSizeArray; packedGlyphs: Pointer; length: NSUInteger); message 'getAdvancements:forPackedGlyphs:length:';
     procedure set_; message 'set';
     procedure set_; message 'set';
     procedure setInContext(graphicsContext: NSGraphicsContext); message 'setInContext:';
     procedure setInContext(graphicsContext: NSGraphicsContext); message 'setInContext:';
@@ -152,17 +182,30 @@ var
     function screenFontWithRenderingMode(renderingMode_: NSFontRenderingMode): NSFont; message 'screenFontWithRenderingMode:';
     function screenFontWithRenderingMode(renderingMode_: NSFontRenderingMode): NSFont; message 'screenFontWithRenderingMode:';
     function renderingMode: NSFontRenderingMode; message 'renderingMode';
     function renderingMode: NSFontRenderingMode; message 'renderingMode';
 
 
-    { Category: NSFontDeprecated }
-    class procedure useFont(fontName_: NSString); message 'useFont:';
-    function widthOfString(string_: NSString): CGFloat; message 'widthOfString:';
-    function glyphIsEncoded(aGlyph: NSGlyph): Boolean; message 'glyphIsEncoded:';
-    class procedure setPreferredFontNames(fontNameArray: NSArray); message 'setPreferredFontNames:';
-    function positionOfGlyph_precededByGlyph_isNominal(curGlyph: NSGlyph; prevGlyph: NSGlyph; nominal: pboolean): NSPoint; message 'positionOfGlyph:precededByGlyph:isNominal:';
-    function positionsForCompositeSequence_numberOfGlyphs_pointArray(someGlyphs: NSGlyphPointer; numGlyphs: NSInteger; points: NSPointArray): NSInteger; message 'positionsForCompositeSequence:numberOfGlyphs:pointArray:';
-    function positionOfGlyph_struckOverGlyph_metricsExist(curGlyph: NSGlyph; prevGlyph: NSGlyph; exist: pboolean): NSPoint; message 'positionOfGlyph:struckOverGlyph:metricsExist:';
-    function positionOfGlyph_struckOverRect_metricsExist(aGlyph: NSGlyph; aRect: NSRect; exist: pboolean): NSPoint; message 'positionOfGlyph:struckOverRect:metricsExist:';
-    function positionOfGlyph_forCharacter_struckOverRect(aGlyph: NSGlyph; aChar: unichar; aRect: NSRect): NSPoint; message 'positionOfGlyph:forCharacter:struckOverRect:';
-    function positionOfGlyph_withRelation_toBaseGlyph_totalAdvancement_metricsExist(thisGlyph: NSGlyph; rel: NSGlyphRelation; baseGlyph: NSGlyph; adv: NSSizePointer; exist: pboolean): NSPoint; message 'positionOfGlyph:withRelation:toBaseGlyph:totalAdvancement:metricsExist:';
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSFontDeprecatedCategory }
+  NSFontDeprecatedCategory = objccategory(NSFont)
+    class procedure useFont(fontName_: NSString); message 'useFont:'; deprecated 'in Mac OS X 10.4 and later';
+    function widthOfString(string_: NSString): CGFloat; message 'widthOfString:'; deprecated 'in Mac OS X 10.4 and later';
+    function isBaseFont: Boolean; message 'isBaseFont'; deprecated 'in Mac OS X 10.4 and later';
+    function afmDictionary: NSDictionary; message 'afmDictionary'; deprecated 'in Mac OS X 10.4 and later';
+    function glyphIsEncoded(aGlyph: NSGlyph): Boolean; message 'glyphIsEncoded:'; deprecated 'in Mac OS X 10.4 and later';
+    function defaultLineHeightForFont: CGFloat; message 'defaultLineHeightForFont'; deprecated 'in Mac OS X 10.4 and later';
+    class function preferredFontNames: NSArray; message 'preferredFontNames'; deprecated 'in Mac OS X 10.4 and later';
+    class procedure setPreferredFontNames(fontNameArray: NSArray); message 'setPreferredFontNames:'; deprecated 'in Mac OS X 10.4 and later';
+    function encodingScheme: NSString; message 'encodingScheme'; deprecated 'in Mac OS X 10.4 and later';
+    function glyphPacking: NSMultibyteGlyphPacking; message 'glyphPacking'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_precededByGlyph_isNominal(curGlyph: NSGlyph; prevGlyph: NSGlyph; nominal: pboolean): NSPoint; message 'positionOfGlyph:precededByGlyph:isNominal:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionsForCompositeSequence_numberOfGlyphs_pointArray(someGlyphs: NSGlyphPtr; numGlyphs: NSInteger; points: NSPointArray): NSInteger; message 'positionsForCompositeSequence:numberOfGlyphs:pointArray:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_struckOverGlyph_metricsExist(curGlyph: NSGlyph; prevGlyph: NSGlyph; exist: pboolean): NSPoint; message 'positionOfGlyph:struckOverGlyph:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_struckOverRect_metricsExist(aGlyph: NSGlyph; aRect: NSRect; exist: pboolean): NSPoint; message 'positionOfGlyph:struckOverRect:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_forCharacter_struckOverRect(aGlyph: NSGlyph; aChar: unichar; aRect: NSRect): NSPoint; message 'positionOfGlyph:forCharacter:struckOverRect:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_withRelation_toBaseGlyph_totalAdvancement_metricsExist(thisGlyph: NSGlyph; rel: NSGlyphRelation; baseGlyph: NSGlyph; adv: NSSizePointer; exist: pboolean): NSPoint; message 'positionOfGlyph:withRelation:toBaseGlyph:totalAdvancement:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 59 - 50
packages/cocoaint/src/appkit/NSFontDescriptor.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSFontDescriptor.h }
 { Parsed from Appkit.framework NSFontDescriptor.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -8,35 +8,37 @@
 
 
 { Types }
 { Types }
 type
 type
-  NSFontSymbolicTraits = cardinal;
-  NSFontFamilyClass = cardinal;
+  NSFontSymbolicTraits = cuint32;
+  NSFontSymbolicTraitsPtr = ^NSFontSymbolicTraits;
+  NSFontFamilyClass = cuint32;
+  NSFontFamilyClassPtr = ^NSFontFamilyClass;
 
 
 { Constants }
 { Constants }
 
 
 const
 const
-  NSFontUnknownClass = 0  shl  28;
-  NSFontOldStyleSerifsClass = 1  shl  28;
-  NSFontTransitionalSerifsClass = 2  shl  28;
-  NSFontModernSerifsClass = 3  shl  28;
-  NSFontClarendonSerifsClass = 4  shl  28;
-  NSFontSlabSerifsClass = 5  shl  28;
-  NSFontFreeformSerifsClass = 7  shl  28;
-  NSFontSansSerifClass = 8  shl  28;
-  NSFontOrnamentalsClass = 9  shl  28;
-  NSFontScriptsClass = 10  shl  28;
-  NSFontSymbolicClass = 12  shl  28;
+  NSFontUnknownClass = 0 shl 28;
+  NSFontOldStyleSerifsClass = 1 shl 28;
+  NSFontTransitionalSerifsClass = 2 shl 28;
+  NSFontModernSerifsClass = 3 shl 28;
+  NSFontClarendonSerifsClass = 4 shl 28;
+  NSFontSlabSerifsClass = 5 shl 28;
+  NSFontFreeformSerifsClass = 7 shl 28;
+  NSFontSansSerifClass = 8 shl 28;
+  NSFontOrnamentalsClass = 9 shl 28;
+  NSFontScriptsClass = 10 shl 28;
+  NSFontSymbolicClass = 12 shl 28;
 
 
 const
 const
   NSFontFamilyClassMask = $F0000000;
   NSFontFamilyClassMask = $F0000000;
 
 
 const
 const
-  NSFontItalicTrait = 1  shl  0;
-  NSFontBoldTrait = 1  shl  1;
-  NSFontExpandedTrait = 1  shl  5;
-  NSFontCondensedTrait = 1  shl  6;
-  NSFontMonoSpaceTrait = 1  shl  10;
-  NSFontVerticalTrait = 1  shl  11;
-  NSFontUIOptimizedTrait = 1  shl  12;
+  NSFontItalicTrait = 1 shl 0;
+  NSFontBoldTrait = 1 shl 1;
+  NSFontExpandedTrait = 1 shl 5;
+  NSFontCondensedTrait = 1 shl 6;
+  NSFontMonoSpaceTrait = 1 shl 10;
+  NSFontVerticalTrait = 1 shl 11;
+  NSFontUIOptimizedTrait = 1 shl 12;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -61,29 +63,30 @@ const
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSFontFamilyAttribute: NSString; external name '_NSFontFamilyAttribute';
-  NSFontNameAttribute: NSString; external name '_NSFontNameAttribute';
-  NSFontFaceAttribute: NSString; external name '_NSFontFaceAttribute';
-  NSFontSizeAttribute: NSString; external name '_NSFontSizeAttribute';
-  NSFontVisibleNameAttribute: NSString; external name '_NSFontVisibleNameAttribute';
-  NSFontMatrixAttribute: NSString; external name '_NSFontMatrixAttribute';
-  NSFontVariationAttribute: NSString; external name '_NSFontVariationAttribute';
-  NSFontCharacterSetAttribute: NSString; external name '_NSFontCharacterSetAttribute';
-  NSFontCascadeListAttribute: NSString; external name '_NSFontCascadeListAttribute';
-  NSFontTraitsAttribute: NSString; external name '_NSFontTraitsAttribute';
-  NSFontFixedAdvanceAttribute: NSString; external name '_NSFontFixedAdvanceAttribute';
-  NSFontFeatureSettingsAttribute: NSString; external name '_NSFontFeatureSettingsAttribute';
-  NSFontSymbolicTrait: NSString; external name '_NSFontSymbolicTrait';
-  NSFontWeightTrait: NSString; external name '_NSFontWeightTrait';
-  NSFontWidthTrait: NSString; external name '_NSFontWidthTrait';
-  NSFontSlantTrait: NSString; external name '_NSFontSlantTrait';
-  NSFontVariationAxisIdentifierKey: NSString; external name '_NSFontVariationAxisIdentifierKey';
-  NSFontVariationAxisMinimumValueKey: NSString; external name '_NSFontVariationAxisMinimumValueKey';
-  NSFontVariationAxisMaximumValueKey: NSString; external name '_NSFontVariationAxisMaximumValueKey';
-  NSFontVariationAxisDefaultValueKey: NSString; external name '_NSFontVariationAxisDefaultValueKey';
-  NSFontVariationAxisNameKey: NSString; external name '_NSFontVariationAxisNameKey';
-  NSFontFeatureTypeIdentifierKey: NSString; external name '_NSFontFeatureTypeIdentifierKey';
-  NSFontFeatureSelectorIdentifierKey: NSString; external name '_NSFontFeatureSelectorIdentifierKey';
+  NSFontFamilyAttribute: NSString; cvar; external;
+  NSFontNameAttribute: NSString; cvar; external;
+  NSFontFaceAttribute: NSString; cvar; external;
+  NSFontSizeAttribute: NSString; cvar; external;
+  NSFontVisibleNameAttribute: NSString; cvar; external;
+  NSFontMatrixAttribute: NSString; cvar; external;
+  NSFontVariationAttribute: NSString; cvar; external;
+  NSFontCharacterSetAttribute: NSString; cvar; external;
+  NSFontCascadeListAttribute: NSString; cvar; external;
+  NSFontTraitsAttribute: NSString; cvar; external;
+  NSFontFixedAdvanceAttribute: NSString; cvar; external;
+  NSFontFeatureSettingsAttribute: NSString; cvar; external;
+  NSFontColorAttribute: NSString; cvar; external;
+  NSFontSymbolicTrait: NSString; cvar; external;
+  NSFontWeightTrait: NSString; cvar; external;
+  NSFontWidthTrait: NSString; cvar; external;
+  NSFontSlantTrait: NSString; cvar; external;
+  NSFontVariationAxisIdentifierKey: NSString; cvar; external;
+  NSFontVariationAxisMinimumValueKey: NSString; cvar; external;
+  NSFontVariationAxisMaximumValueKey: NSString; cvar; external;
+  NSFontVariationAxisDefaultValueKey: NSString; cvar; external;
+  NSFontVariationAxisNameKey: NSString; cvar; external;
+  NSFontFeatureTypeIdentifierKey: NSString; cvar; external;
+  NSFontFeatureSelectorIdentifierKey: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -91,6 +94,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSFontDescriptor = objcclass;
   NSFontDescriptor = objcclass;
   NSFontDescriptorPointer = ^NSFontDescriptor;
   NSFontDescriptorPointer = ^NSFontDescriptor;
+  NSFontDescriptorPtr = NSFontDescriptorPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -101,12 +105,12 @@ var
 { NSFontDescriptor }
 { NSFontDescriptor }
   NSFontDescriptor = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSFontDescriptor = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __attributes: NSMutableDictionary;
-    __reserved1: id;
-    __reserved2: id;
-    __reserved3: id;
-    __reserved4: id;
-    __reserved5: id;
+    _attributes: NSMutableDictionary;
+    _reserved1: id;
+    _reserved2: id;
+    _reserved3: id;
+    _reserved4: id;
+    _reserved5: id;
     
     
   public
   public
     class function alloc: NSFontDescriptor; message 'alloc';
     class function alloc: NSFontDescriptor; message 'alloc';
@@ -129,6 +133,11 @@ var
     function fontDescriptorWithMatrix(matrix_: NSAffineTransform): NSFontDescriptor; message 'fontDescriptorWithMatrix:';
     function fontDescriptorWithMatrix(matrix_: NSAffineTransform): NSFontDescriptor; message 'fontDescriptorWithMatrix:';
     function fontDescriptorWithFace(newFace: NSString): NSFontDescriptor; message 'fontDescriptorWithFace:';
     function fontDescriptorWithFace(newFace: NSString): NSFontDescriptor; message 'fontDescriptorWithFace:';
     function fontDescriptorWithFamily(newFamily: NSString): NSFontDescriptor; message 'fontDescriptorWithFamily:';
     function fontDescriptorWithFamily(newFamily: NSString): NSFontDescriptor; message 'fontDescriptorWithFamily:';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 33 - 14
packages/cocoaint/src/appkit/NSFontManager.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSFontManager.h }
 { Parsed from Appkit.framework NSFontManager.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -9,7 +9,9 @@
 { Types }
 { Types }
 type
 type
   NSFontTraitMask = NSUInteger;
   NSFontTraitMask = NSUInteger;
+  NSFontTraitMaskPtr = ^NSFontTraitMask;
   NSFontAction = NSUInteger;
   NSFontAction = NSUInteger;
+  NSFontActionPtr = ^NSFontAction;
 
 
 { Constants }
 { Constants }
 
 
@@ -28,7 +30,7 @@ const
   NSUnitalicFontMask = $01000000;
   NSUnitalicFontMask = $01000000;
 
 
 const
 const
-  NSFontCollectionApplicationOnlyMask = 1  shl  0;
+  NSFontCollectionApplicationOnlyMask = 1 shl 0;
 
 
 const
 const
   NSNoFontChangeAction = 0;
   NSNoFontChangeAction = 0;
@@ -67,6 +69,7 @@ const
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSFontManager = objcclass;
   NSFontManager = objcclass;
   NSFontManagerPointer = ^NSFontManager;
   NSFontManagerPointer = ^NSFontManager;
+  NSFontManagerPtr = NSFontManagerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -77,23 +80,27 @@ const
 { NSFontManager }
 { NSFontManager }
   NSFontManager = objcclass(NSObject)
   NSFontManager = objcclass(NSObject)
   private
   private
-    __panel: NSFontPanel;
-    __fmReserved1: cuint;
-    __action: SEL;
-    __actionOrigin: id;
-    __target: id;
-    __selFont: NSFont;
+    _panel: NSFontPanel;
+    _fmReserved1: cuint;
+    _action: SEL;
+    _actionOrigin: id;
+    _target: id;
+    _selFont: NSFont;
     __fmFlags: bitpacked record
     __fmFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSFontManager0: cuint);
+       1: (
         multipleFont: 0..1;
         multipleFont: 0..1;
         disabled: 0..1;
         disabled: 0..1;
         senderTagMode: 0..((1 shl 2)-1);
         senderTagMode: 0..((1 shl 2)-1);
         _RESERVED: 0..((1 shl 12)-1);
         _RESERVED: 0..((1 shl 12)-1);
+      );
       end;
       end;
-    __fmReserved3: cushort;
-    __delegate: id;
-    __collections: id;
-    __hiddenCollections: id;
-    __fmReserved4: NSUInteger;
+    _fmReserved3: cushort;
+    _delegate: id;
+    _collections: id;
+    _hiddenCollections: id;
+    _fmReserved4: NSUInteger;
     
     
   public
   public
     class function alloc: NSFontManager; message 'alloc';
     class function alloc: NSFontManager; message 'alloc';
@@ -141,8 +148,10 @@ const
     function convertFontTraits(traits: NSFontTraitMask): NSFontTraitMask; message 'convertFontTraits:';
     function convertFontTraits(traits: NSFontTraitMask): NSFontTraitMask; message 'convertFontTraits:';
     procedure setTarget(aTarget: id); message 'setTarget:';
     procedure setTarget(aTarget: id); message 'setTarget:';
     function target: id; message 'target';
     function target: id; message 'target';
+  end; external;
 
 
-    { Category: NSFontManagerMenuActionMethods }
+{ NSFontManagerMenuActionMethodsCategory }
+  NSFontManagerMenuActionMethodsCategory = objccategory(NSFontManager)
     function fontNamed_hasTraits(fName: NSString; someTraits: NSFontTraitMask): Boolean; message 'fontNamed:hasTraits:';
     function fontNamed_hasTraits(fName: NSString; someTraits: NSFontTraitMask): Boolean; message 'fontNamed:hasTraits:';
     function availableFontNamesWithTraits(someTraits: NSFontTraitMask): NSArray; message 'availableFontNamesWithTraits:';
     function availableFontNamesWithTraits(someTraits: NSFontTraitMask): NSArray; message 'availableFontNamesWithTraits:';
     procedure addFontTrait(sender: id); message 'addFontTrait:';
     procedure addFontTrait(sender: id); message 'addFontTrait:';
@@ -153,5 +162,15 @@ const
     procedure orderFrontStylesPanel(sender: id); message 'orderFrontStylesPanel:';
     procedure orderFrontStylesPanel(sender: id); message 'orderFrontStylesPanel:';
   end; external;
   end; external;
 
 
+{ NSFontManagerDelegateCategory }
+  NSFontManagerDelegateCategory = objccategory(NSObject)
+    function fontManager_willIncludeFont(sender: id; fontName: NSString): Boolean; message 'fontManager:willIncludeFont:';
+  end; external;
+
+{ NSFontManagerResponderMethodCategory }
+  NSFontManagerResponderMethodCategory = objccategory(NSObject)
+    procedure changeFont(sender: id); message 'changeFont:';
+  end; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 62 - 52
packages/cocoaint/src/appkit/NSFontPanel.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSFontPanel.h }
 { Parsed from Appkit.framework NSFontPanel.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -18,12 +18,12 @@ const
   NSFPCurrentField = 134;
   NSFPCurrentField = 134;
 
 
 const
 const
-  NSFontPanelFaceModeMask = 1  shl  0;
-  NSFontPanelSizeModeMask = 1  shl  1;
-  NSFontPanelCollectionModeMask = 1  shl  2;
+  NSFontPanelFaceModeMask = 1 shl 0;
+  NSFontPanelSizeModeMask = 1 shl 1;
+  NSFontPanelCollectionModeMask = 1 shl 2;
   NSFontPanelUnderlineEffectModeMask = 1 shl 8;
   NSFontPanelUnderlineEffectModeMask = 1 shl 8;
   NSFontPanelStrikethroughEffectModeMask = 1 shl 9;
   NSFontPanelStrikethroughEffectModeMask = 1 shl 9;
-  NSFontPanelTextColorEffectModeMask = 1 shl  10;
+  NSFontPanelTextColorEffectModeMask = 1 shl 10;
   NSFontPanelDocumentColorEffectModeMask = 1 shl 11;
   NSFontPanelDocumentColorEffectModeMask = 1 shl 11;
   NSFontPanelShadowEffectModeMask = 1 shl 12;
   NSFontPanelShadowEffectModeMask = 1 shl 12;
   NSFontPanelAllEffectsModeMask = $FFF00;
   NSFontPanelAllEffectsModeMask = $FFF00;
@@ -57,6 +57,7 @@ const
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSFontPanel = objcclass;
   NSFontPanel = objcclass;
   NSFontPanelPointer = ^NSFontPanel;
   NSFontPanelPointer = ^NSFontPanel;
+  NSFontPanelPtr = NSFontPanelPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -67,31 +68,34 @@ const
 { NSFontPanel }
 { NSFontPanel }
   NSFontPanel = objcclass(NSPanel)
   NSFontPanel = objcclass(NSPanel)
   private
   private
-    __manager: NSFontManager;
-    __collectionNames: NSArray;
-    __selection: id;
-    __carbonNotification: Pointer;
-    __targetObject: id;
-    __familyList: id;
-    __faceList: id;
-    __sizeList: id;
-    __mainCollectionList: id;
-    __sizeField: id;
-    __sizeSlider: id;
-    __sizeSliderBox: id;
-    __preview: id;
-    __previewCaption: id;
-    __mainSplitView: id;
-    __mmCollectionList: id;
-    __mmFamilyList: id;
-    __mmFaceList: id;
-    __mmSizeList: id;
-    __extrasPopup: id;
-    __searchField: id;
-    __fixedListButton: id;
-    __sliderButton: id;
-    __accessoryView: id;
+    _manager: NSFontManager;
+    _collectionNames: NSArray;
+    _selection: id;
+    _carbonNotification: Pointer;
+    _targetObject: id;
+    _familyList: id;
+    _faceList: id;
+    _sizeList: id;
+    _mainCollectionList: id;
+    _sizeField: id;
+    _sizeSlider: id;
+    _sizeSliderBox: id;
+    _preview: id;
+    _previewCaption: id;
+    _mainSplitView: id;
+    _mmCollectionList: id;
+    _mmFamilyList: id;
+    _mmFaceList: id;
+    _mmSizeList: id;
+    _extrasPopup: id;
+    _searchField: id;
+    _fixedListButton: id;
+    _sliderButton: id;
+    _accessoryView: id;
     __fpFlags: bitpacked record
     __fpFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSFontPanel0: cuint);
+       1: (
         setFontChange: 0..1;
         setFontChange: 0..1;
         setFontAttributeChange: 0..1;
         setFontAttributeChange: 0..1;
         _delRespFamily: 0..1;
         _delRespFamily: 0..1;
@@ -104,30 +108,31 @@ const
         showEffects: 0..1;
         showEffects: 0..1;
         _uiMode: 0..((1 shl 8)-1);
         _uiMode: 0..((1 shl 8)-1);
         _reserved: 0..((1 shl 14)-1);
         _reserved: 0..((1 shl 14)-1);
+      );
       end;
       end;
-    __regularModeBox: id;
-    __miniModeBox: id;
-    __modeBoxSuperview: id;
-    __collectionLabel: id;
-    __sizeLabel: id;
-    __faceLabel: id;
-    __familyLabel: id;
-    __sizeStyleButton: id;
-    __newSizeField: id;
-    __editSizeList: id;
-    __editSizeListBox: id;
-    __editSizeSliderBox: id;
-    __editSizeSliderMaxField: id;
-    __editSizeSliderMinField: id;
-    __sizeEditWindow: id;
-    __availableSizes: id;
-    __addCollectionButton: id;
-    __removeCollectionButton: id;
-    __fontPanelPreviewHeight: CGFloat;
-    __typographyPanel: id;
-    __actionButton: id;
-    __fontEffectsBox: id;
-    __sizeStyle: cint;
+    _regularModeBox: id;
+    _miniModeBox: id;
+    _modeBoxSuperview: id;
+    _collectionLabel: id;
+    _sizeLabel: id;
+    _faceLabel: id;
+    _familyLabel: id;
+    _sizeStyleButton: id;
+    _newSizeField: id;
+    _editSizeList: id;
+    _editSizeListBox: id;
+    _editSizeSliderBox: id;
+    _editSizeSliderMaxField: id;
+    _editSizeSliderMinField: id;
+    _sizeEditWindow: id;
+    _availableSizes: id;
+    _addCollectionButton: id;
+    _removeCollectionButton: id;
+    _fontPanelPreviewHeight: CGFloat;
+    _typographyPanel: id;
+    _actionButton: id;
+    _fontEffectsBox: id;
+    _sizeStyle: cint;
     {$ifndef cpu64}
     {$ifndef cpu64}
         _fpUnused: array[0..71] of id;
         _fpUnused: array[0..71] of id;
     {$endif}
     {$endif}
@@ -147,5 +152,10 @@ const
     procedure reloadDefaultFontFamilies; message 'reloadDefaultFontFamilies';
     procedure reloadDefaultFontFamilies; message 'reloadDefaultFontFamilies';
   end; external;
   end; external;
 
 
+{ NSFontPanelValidationAdditionsCategory }
+  NSFontPanelValidationAdditionsCategory = objccategory(NSObject)
+    function validModesForFontPanel(fontPanel: NSFontPanel): NSUInteger; message 'validModesForFontPanel:';
+  end; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 1 - 1
packages/cocoaint/src/appkit/NSForm.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSForm.h }
 { Parsed from Appkit.framework NSForm.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}

+ 11 - 6
packages/cocoaint/src/appkit/NSFormCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSFormCell.h }
 { Parsed from Appkit.framework NSFormCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSFormCell = objcclass;
   NSFormCell = objcclass;
   NSFormCellPointer = ^NSFormCell;
   NSFormCellPointer = ^NSFormCell;
+  NSFormCellPtr = NSFormCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,9 +44,9 @@
 { NSFormCell }
 { NSFormCell }
   NSFormCell = objcclass(NSActionCell)
   NSFormCell = objcclass(NSActionCell)
   private
   private
-    __titleWidth: CGFloat;
-    __titleCell: id;
-    __titleEndPoint: CGFloat;
+    _titleWidth: CGFloat;
+    _titleCell: id;
+    _titleEndPoint: CGFloat;
     
     
   public
   public
     class function alloc: NSFormCell; message 'alloc';
     class function alloc: NSFormCell; message 'alloc';
@@ -66,11 +67,15 @@
     function placeholderAttributedString: NSAttributedString; message 'placeholderAttributedString';
     function placeholderAttributedString: NSAttributedString; message 'placeholderAttributedString';
     function titleBaseWritingDirection: NSWritingDirection; message 'titleBaseWritingDirection';
     function titleBaseWritingDirection: NSWritingDirection; message 'titleBaseWritingDirection';
     procedure setTitleBaseWritingDirection(writingDirection: NSWritingDirection); message 'setTitleBaseWritingDirection:';
     procedure setTitleBaseWritingDirection(writingDirection: NSWritingDirection); message 'setTitleBaseWritingDirection:';
+  end; external;
 
 
-    { Category: NSKeyboardUI }
+{ NSKeyboardUI_NSFormCellCategory }
+  NSKeyboardUI_NSFormCellCategory = objccategory(NSFormCell)
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
+  end; external name 'NSKeyboardUI';
 
 
-    { Category: NSFormCellAttributedStringMethods }
+{ NSFormCellAttributedStringMethodsCategory }
+  NSFormCellAttributedStringMethodsCategory = objccategory(NSFormCell)
     function attributedTitle: NSAttributedString; message 'attributedTitle';
     function attributedTitle: NSAttributedString; message 'attributedTitle';
     procedure setAttributedTitle(obj: NSAttributedString); message 'setAttributedTitle:';
     procedure setAttributedTitle(obj: NSAttributedString); message 'setAttributedTitle:';
   end; external;
   end; external;

+ 7 - 6
packages/cocoaint/src/appkit/NSGlyphGenerator.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSGlyphGenerator.h }
 { Parsed from Appkit.framework NSGlyphGenerator.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -9,9 +9,9 @@
 { Constants }
 { Constants }
 
 
 const
 const
-  NSShowControlGlyphs = 1  shl  0;
-  NSShowInvisibleGlyphs = 1  shl  1;
-  NSWantsBidiLevels = 1  shl  2;
+  NSShowControlGlyphs = 1 shl 0;
+  NSShowInvisibleGlyphs = 1 shl 1;
+  NSWantsBidiLevels = 1 shl 2;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -41,6 +41,7 @@ const
   NSGlyphStorageProtocol = objcprotocol;
   NSGlyphStorageProtocol = objcprotocol;
   NSGlyphGenerator = objcclass;
   NSGlyphGenerator = objcclass;
   NSGlyphGeneratorPointer = ^NSGlyphGenerator;
   NSGlyphGeneratorPointer = ^NSGlyphGenerator;
+  NSGlyphGeneratorPtr = NSGlyphGeneratorPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -54,7 +55,7 @@ const
   public
   public
     class function alloc: NSGlyphGenerator; message 'alloc';
     class function alloc: NSGlyphGenerator; message 'alloc';
 
 
-    procedure generateGlyphsForGlyphStorage_desiredNumberOfCharacters_glyphIndex_characterIndex(glyphStorage: id; nChars: NSUInteger; glyphIndex: NSUIntegerPointer; charIndex: NSUIntegerPointer); message 'generateGlyphsForGlyphStorage:desiredNumberOfCharacters:glyphIndex:characterIndex:';
+    procedure generateGlyphsForGlyphStorage_desiredNumberOfCharacters_glyphIndex_characterIndex(glyphStorage: id; nChars: NSUInteger; glyphIndex: NSUIntegerPtr; charIndex: NSUIntegerPtr); message 'generateGlyphsForGlyphStorage:desiredNumberOfCharacters:glyphIndex:characterIndex:';
     class function sharedGlyphGenerator: id; message 'sharedGlyphGenerator';
     class function sharedGlyphGenerator: id; message 'sharedGlyphGenerator';
   end; external;
   end; external;
 
 
@@ -66,7 +67,7 @@ const
   
   
 { NSGlyphStorage Protocol }
 { NSGlyphStorage Protocol }
   NSGlyphStorageProtocol = objcprotocol
   NSGlyphStorageProtocol = objcprotocol
-    procedure insertGlyphs_length_forStartingGlyphAtIndex_characterIndex(glyphs: NSGlyphPointer; length: NSUInteger; glyphIndex: NSUInteger; charIndex: NSUInteger); message 'insertGlyphs:length:forStartingGlyphAtIndex:characterIndex:';
+    procedure insertGlyphs_length_forStartingGlyphAtIndex_characterIndex(glyphs: NSGlyphPtr; length: NSUInteger; glyphIndex: NSUInteger; charIndex: NSUInteger); message 'insertGlyphs:length:forStartingGlyphAtIndex:characterIndex:';
     procedure setIntAttribute_value_forGlyphAtIndex(attributeTag: NSInteger; val: NSInteger; glyphIndex: NSUInteger); message 'setIntAttribute:value:forGlyphAtIndex:';
     procedure setIntAttribute_value_forGlyphAtIndex(attributeTag: NSInteger; val: NSInteger; glyphIndex: NSUInteger); message 'setIntAttribute:value:forGlyphAtIndex:';
     function attributedString: NSAttributedString; message 'attributedString';
     function attributedString: NSAttributedString; message 'attributedString';
     function layoutOptions: NSUInteger; message 'layoutOptions';
     function layoutOptions: NSUInteger; message 'layoutOptions';

+ 9 - 2
packages/cocoaint/src/appkit/NSGlyphInfo.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSGlyphInfo.h }
 { Parsed from Appkit.framework NSGlyphInfo.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -19,6 +19,7 @@ const
 { Types }
 { Types }
 type
 type
   NSCharacterCollection = NSUInteger;
   NSCharacterCollection = NSUInteger;
+  NSCharacterCollectionPtr = ^NSCharacterCollection;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -47,6 +48,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSGlyphInfo = objcclass;
   NSGlyphInfo = objcclass;
   NSGlyphInfoPointer = ^NSGlyphInfo;
   NSGlyphInfoPointer = ^NSGlyphInfo;
+  NSGlyphInfoPtr = NSGlyphInfoPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -57,7 +59,7 @@ type
 { NSGlyphInfo }
 { NSGlyphInfo }
   NSGlyphInfo = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSGlyphInfo = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __baseString: NSString;
+    _baseString: NSString;
     
     
   public
   public
     class function alloc: NSGlyphInfo; message 'alloc';
     class function alloc: NSGlyphInfo; message 'alloc';
@@ -68,6 +70,11 @@ type
     function glyphName: NSString; message 'glyphName';
     function glyphName: NSString; message 'glyphName';
     function characterIdentifier: NSUInteger; message 'characterIdentifier';
     function characterIdentifier: NSUInteger; message 'characterIdentifier';
     function characterCollection: NSCharacterCollection; message 'characterCollection';
     function characterCollection: NSCharacterCollection; message 'characterCollection';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 20 - 13
packages/cocoaint/src/appkit/NSGradient.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSGradient.h }
 { Parsed from Appkit.framework NSGradient.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -9,12 +9,13 @@
 { Types }
 { Types }
 type
 type
   NSGradientDrawingOptions = NSUInteger;
   NSGradientDrawingOptions = NSUInteger;
+  NSGradientDrawingOptionsPtr = ^NSGradientDrawingOptions;
 
 
 { Constants }
 { Constants }
 
 
 const
 const
-  NSGradientDrawsBeforeStartingLocation = 1  shl  0;
-  NSGradientDrawsAfterEndingLocation = 1  shl  1;
+  NSGradientDrawsBeforeStartingLocation = 1 shl 0;
+  NSGradientDrawsAfterEndingLocation = 1 shl 1;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -43,6 +44,7 @@ const
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSGradient = objcclass;
   NSGradient = objcclass;
   NSGradientPointer = ^NSGradient;
   NSGradientPointer = ^NSGradient;
+  NSGradientPtr = NSGradientPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -53,21 +55,21 @@ const
 { NSGradient }
 { NSGradient }
   NSGradient = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSGradient = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __colorArray: NSArray;
-    __colorSpace: NSColorSpace;
-    __functionRef: Pointer; {garbage collector: __strong }
-    __componentArray: Pointer;
-    __reserved1: Pointer;
-    __reserved2: Pointer;
-    __reserved3: Pointer;
+    _colorArray: NSArray;
+    _colorSpace: NSColorSpace;
+    _functionRef: Pointer; {garbage collector: __strong }
+    _componentArray: Pointer;
+    _reserved1: Pointer;
+    _reserved2: Pointer;
+    _reserved3: Pointer;
     
     
   public
   public
     class function alloc: NSGradient; message 'alloc';
     class function alloc: NSGradient; message 'alloc';
 
 
     function initWithStartingColor_endingColor(startingColor: NSColor; endingColor: NSColor): id; message 'initWithStartingColor:endingColor:';
     function initWithStartingColor_endingColor(startingColor: NSColor; endingColor: NSColor): id; message 'initWithStartingColor:endingColor:';
     function initWithColors(colorArray: NSArray): id; message 'initWithColors:';
     function initWithColors(colorArray: NSArray): id; message 'initWithColors:';
-    function initWithColorsAndLocations(firstColor: NSColor): id; varargs; message 'initWithColorsAndLocations:';
-    function initWithColors_atLocations_colorSpace(colorArray: NSArray; locations: psingle; colorSpace_: NSColorSpace): id; message 'initWithColors:atLocations:colorSpace:';
+    function initWithColorsAndLocations(firstKey: id): id; varargs; message 'initWithColorsAndLocations:';
+    function initWithColors_atLocations_colorSpace(colorArray: NSArray; locations: CGFloatPtr; colorSpace_: NSColorSpace): id; message 'initWithColors:atLocations:colorSpace:';
     procedure drawFromPoint_toPoint_options(startingPoint: NSPoint; endingPoint: NSPoint; options: NSGradientDrawingOptions); message 'drawFromPoint:toPoint:options:';
     procedure drawFromPoint_toPoint_options(startingPoint: NSPoint; endingPoint: NSPoint; options: NSGradientDrawingOptions); message 'drawFromPoint:toPoint:options:';
     procedure drawInRect_angle(rect: NSRect; angle: CGFloat); message 'drawInRect:angle:';
     procedure drawInRect_angle(rect: NSRect; angle: CGFloat); message 'drawInRect:angle:';
     procedure drawInBezierPath_angle(path: NSBezierPath; angle: CGFloat); message 'drawInBezierPath:angle:';
     procedure drawInBezierPath_angle(path: NSBezierPath; angle: CGFloat); message 'drawInBezierPath:angle:';
@@ -76,8 +78,13 @@ const
     procedure drawInBezierPath_relativeCenterPosition(path: NSBezierPath; relativeCenterPosition: NSPoint); message 'drawInBezierPath:relativeCenterPosition:';
     procedure drawInBezierPath_relativeCenterPosition(path: NSBezierPath; relativeCenterPosition: NSPoint); message 'drawInBezierPath:relativeCenterPosition:';
     function colorSpace: NSColorSpace; message 'colorSpace';
     function colorSpace: NSColorSpace; message 'colorSpace';
     function numberOfColorStops: NSInteger; message 'numberOfColorStops';
     function numberOfColorStops: NSInteger; message 'numberOfColorStops';
-    procedure getColor_location_atIndex(color: NSColorPointer; location: psingle; index: NSInteger); message 'getColor:location:atIndex:';
+    procedure getColor_location_atIndex(color: NSColorPointer; location: CGFloatPtr; index: NSInteger); message 'getColor:location:atIndex:';
     function interpolatedColorAtLocation(location: CGFloat): NSColor; message 'interpolatedColorAtLocation:';
     function interpolatedColorAtLocation(location: CGFloat): NSColor; message 'interpolatedColorAtLocation:';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 86 - 61
packages/cocoaint/src/appkit/NSGraphics.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSGraphics.h }
 { Parsed from Appkit.framework NSGraphics.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -44,6 +44,18 @@ const
   NSFocusRingTypeNone = 1;
   NSFocusRingTypeNone = 1;
   NSFocusRingTypeExterior = 2;
   NSFocusRingTypeExterior = 2;
 
 
+const
+  NSColorRenderingIntentDefault = 0;
+  NSColorRenderingIntentAbsoluteColorimetric = 1;
+  NSColorRenderingIntentRelativeColorimetric = 2;
+  NSColorRenderingIntentPerceptual = 3;
+  NSColorRenderingIntentSaturation = 4;
+
+const
+  NSWindowDepthTwentyfourBitRGB = $208;
+  NSWindowDepthSixtyfourBitRGB = $210;
+  NSWindowDepthOnehundredtwentyeightBitRGB = $220;
+
 const
 const
   NSAnimationEffectDisappearingItemDefault = 0;
   NSAnimationEffectDisappearingItemDefault = 0;
   NSAnimationEffectPoof = 10;
   NSAnimationEffectPoof = 10;
@@ -51,12 +63,21 @@ const
 { Types }
 { Types }
 type
 type
   NSCompositingOperation = NSUInteger;
   NSCompositingOperation = NSUInteger;
+  NSCompositingOperationPtr = ^NSCompositingOperation;
   NSBackingStoreType = NSUInteger;
   NSBackingStoreType = NSUInteger;
+  NSBackingStoreTypePtr = ^NSBackingStoreType;
   NSWindowOrderingMode = NSInteger;
   NSWindowOrderingMode = NSInteger;
+  NSWindowOrderingModePtr = ^NSWindowOrderingMode;
   NSFocusRingPlacement = NSUInteger;
   NSFocusRingPlacement = NSUInteger;
+  NSFocusRingPlacementPtr = ^NSFocusRingPlacement;
   NSFocusRingType = NSUInteger;
   NSFocusRingType = NSUInteger;
+  NSFocusRingTypePtr = ^NSFocusRingType;
+  NSColorRenderingIntent = NSInteger;
+  NSColorRenderingIntentPtr = ^NSColorRenderingIntent;
   NSWindowDepth = cint;
   NSWindowDepth = cint;
+  NSWindowDepthPtr = ^NSWindowDepth;
   NSAnimationEffect = NSUInteger;
   NSAnimationEffect = NSUInteger;
+  NSAnimationEffectPtr = ^NSAnimationEffect;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -73,46 +94,50 @@ type
 {$define NSGRAPHICS_PAS_F}
 {$define NSGRAPHICS_PAS_F}
 
 
 { Functions }
 { Functions }
-function NSBitsPerSampleFromDepth(depth: NSWindowDepth): NSInteger; cdecl; external name 'NSBitsPerSampleFromDepth';
-function NSBitsPerPixelFromDepth(depth: NSWindowDepth): NSInteger; cdecl; external name 'NSBitsPerPixelFromDepth';
-function NSNumberOfColorComponents(colorSpaceNamePointer: NSString): NSInteger; cdecl; external name 'NSNumberOfColorComponents';
-procedure NSRectFill(aRect: NSRect); cdecl; external name 'NSRectFill';
-procedure NSRectFillList(rectsPointer: NSRect; count: NSInteger); cdecl; external name 'NSRectFillList';
-procedure NSRectFillListWithGrays(rectsPointer: NSRect; graysPointer: CGFloat; num: NSInteger); cdecl; external name 'NSRectFillListWithGrays';
-procedure NSRectFillListWithColors(rectsPointer: NSRect; colors: Pointer {NSColor}; num: NSInteger); cdecl; external name 'NSRectFillListWithColors';
-procedure NSRectFillUsingOperation(aRect: NSRect; op: NSCompositingOperation); cdecl; external name 'NSRectFillUsingOperation';
-procedure NSRectFillListUsingOperation(rectsPointer: NSRect; count: NSInteger; op: NSCompositingOperation); cdecl; external name 'NSRectFillListUsingOperation';
-procedure NSRectFillListWithColorsUsingOperation(rectsPointer: NSRect; colors: Pointer {NSColor}; num: NSInteger; op: NSCompositingOperation); cdecl; external name 'NSRectFillListWithColorsUsingOperation';
-procedure NSFrameRect(aRect: NSRect); cdecl; external name 'NSFrameRect';
-procedure NSFrameRectWithWidth(aRect: NSRect; frameWidth: CGFloat); cdecl; external name 'NSFrameRectWithWidth';
-procedure NSFrameRectWithWidthUsingOperation(aRect: NSRect; frameWidth: CGFloat; op: NSCompositingOperation); cdecl; external name 'NSFrameRectWithWidthUsingOperation';
-procedure NSRectClip(aRect: NSRect); cdecl; external name 'NSRectClip';
-procedure NSRectClipList(rectsPointer: NSRect; count: NSInteger); cdecl; external name 'NSRectClipList';
-function NSDrawTiledRects(boundsRect: NSRect; clipRect: NSRect; sidesPointer: NSRectEdge; graysPointer: CGFloat; count: NSInteger): NSRect; cdecl; external name 'NSDrawTiledRects';
-procedure NSDrawGrayBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawGrayBezel';
-procedure NSDrawGroove(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawGroove';
-procedure NSDrawWhiteBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawWhiteBezel';
-procedure NSDrawButton(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawButton';
-procedure NSEraseRect(aRect: NSRect); cdecl; external name 'NSEraseRect';
-function NSReadPixel(passedPoint: NSPoint): NSColor; cdecl; external name 'NSReadPixel';
-procedure NSDrawBitmap(rect: NSRect; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; bpp: NSInteger; bpr: NSInteger; isPlanar: Boolean; hasAlpha: Boolean; colorSpaceNamePointer: NSString; char_: cuint); cdecl; external name 'NSDrawBitmap';
-procedure NSCopyBits(srcGState: NSInteger; srcRect: NSRect; destPoint: NSPoint); cdecl; external name 'NSCopyBits';
-procedure NSHighlightRect(aRect: NSRect); cdecl; external name 'NSHighlightRect';
-procedure NSBeep; cdecl; external name 'NSBeep';
-procedure NSCountWindows(countPointer: NSInteger); cdecl; external name 'NSCountWindows';
-procedure NSWindowList(size: NSInteger; list: Pointer {array of NSInteger}); cdecl; external name 'NSWindowList';
-procedure NSCountWindowsForContext(context: NSInteger; countPointer: NSInteger); cdecl; external name 'NSCountWindowsForContext';
-procedure NSWindowListForContext(context: NSInteger; size: NSInteger; list: Pointer {array of NSInteger}); cdecl; external name 'NSWindowListForContext';
-function NSGetWindowServerMemory(context: NSInteger; virtualMemoryPointer: NSInteger; windowBackingMemoryPointer: NSInteger; windowDumpString: Pointer {NSString}): NSInteger; cdecl; external name 'NSGetWindowServerMemory';
-function NSDrawColorTiledRects(boundsRect: NSRect; clipRect: NSRect; sidesPointer: NSRectEdge; colors: Pointer {NSColor}; count: NSInteger): NSRect; cdecl; external name 'NSDrawColorTiledRects';
-procedure NSDrawDarkBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawDarkBezel';
-procedure NSDrawLightBezel(aRect: NSRect; clipRect: NSRect); cdecl; external name 'NSDrawLightBezel';
-procedure NSDottedFrameRect(aRect: NSRect); cdecl; external name 'NSDottedFrameRect';
-procedure NSDrawWindowBackground(aRect: NSRect); cdecl; external name 'NSDrawWindowBackground';
-procedure NSSetFocusRingStyle(placement: NSFocusRingPlacement); cdecl; external name 'NSSetFocusRingStyle';
-procedure NSDisableScreenUpdates; cdecl; external name 'NSDisableScreenUpdates';
-procedure NSEnableScreenUpdates; cdecl; external name 'NSEnableScreenUpdates';
-procedure NSShowAnimationEffect(animationEffect: NSAnimationEffect; centerLocation: NSPoint; size: NSSize; animationDelegate: id; didEndSelector: SEL; contextInfoPointer: Pointer); cdecl; external name 'NSShowAnimationEffect';
+function NSBestDepth(colorSpace: NSString; bps: NSInteger; bpp: NSInteger; planar: Boolean; exactMatch: pboolean): NSWindowDepth; cdecl; external;
+function NSPlanarFromDepth(depth: NSWindowDepth): Boolean; cdecl; external;
+function NSColorSpaceFromDepth(depth: NSWindowDepth): NSString; cdecl; external;
+function NSBitsPerSampleFromDepth(depth: NSWindowDepth): NSInteger; cdecl; external;
+function NSBitsPerPixelFromDepth(depth: NSWindowDepth): NSInteger; cdecl; external;
+function NSNumberOfColorComponents(colorSpaceName: NSString): NSInteger; cdecl; external;
+function NSAvailableWindowDepths: NSWindowDepthPtr; cdecl; external;
+procedure NSRectFill(aRect: NSRect); cdecl; external;
+procedure NSRectFillList(rects: NSRectPtr; count: NSInteger); cdecl; external;
+procedure NSRectFillListWithGrays(rects: NSRectPtr; grays: CGFloatPtr; num: NSInteger); cdecl; external;
+procedure NSRectFillListWithColors(rects: NSRectPtr; colors: NSColorPointer; num: NSInteger); cdecl; external;
+procedure NSRectFillUsingOperation(aRect: NSRect; op: NSCompositingOperation); cdecl; external;
+procedure NSRectFillListUsingOperation(rects: NSRectPtr; count: NSInteger; op: NSCompositingOperation); cdecl; external;
+procedure NSRectFillListWithColorsUsingOperation(rects: NSRectPtr; colors: NSColorPointer; num: NSInteger; op: NSCompositingOperation); cdecl; external;
+procedure NSFrameRect(aRect: NSRect); cdecl; external;
+procedure NSFrameRectWithWidth(aRect: NSRect; frameWidth: CGFloat); cdecl; external;
+procedure NSFrameRectWithWidthUsingOperation(aRect: NSRect; frameWidth: CGFloat; op: NSCompositingOperation); cdecl; external;
+procedure NSRectClip(aRect: NSRect); cdecl; external;
+procedure NSRectClipList(rects: NSRectPtr; count: NSInteger); cdecl; external;
+function NSDrawTiledRects(boundsRect: NSRect; clipRect: NSRect; sides: NSRectEdgePtr; grays: CGFloatPtr; count: NSInteger): NSRect; cdecl; external;
+procedure NSDrawGrayBezel(aRect: NSRect; clipRect: NSRect); cdecl; external;
+procedure NSDrawGroove(aRect: NSRect; clipRect: NSRect); cdecl; external;
+procedure NSDrawWhiteBezel(aRect: NSRect; clipRect: NSRect); cdecl; external;
+procedure NSDrawButton(aRect: NSRect; clipRect: NSRect); cdecl; external;
+procedure NSEraseRect(aRect: NSRect); cdecl; external;
+function NSReadPixel(passedPoint: NSPoint): NSColor; cdecl; external;
+procedure NSDrawBitmap(rect: NSRect; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; bpp: NSInteger; bpr: NSInteger; isPlanar: Boolean; hasAlpha: Boolean; colorSpaceName: NSString; data: PPChar {array of PChar}); cdecl; external;
+procedure NSCopyBits(srcGState: NSInteger; srcRect: NSRect; destPoint: NSPoint); cdecl; external;
+procedure NSHighlightRect(aRect: NSRect); cdecl; external;
+procedure NSBeep; cdecl; external;
+function NSGetWindowServerMemory(context: NSInteger; virtualMemory: NSIntegerPtr; windowBackingMemory: NSIntegerPtr; windowDumpString: NSStringPointer): NSInteger; cdecl; external;
+function NSDrawColorTiledRects(boundsRect: NSRect; clipRect: NSRect; sides: NSRectEdgePtr; colors: NSColorPointer; count: NSInteger): NSRect; cdecl; external;
+procedure NSDrawDarkBezel(aRect: NSRect; clipRect: NSRect); cdecl; external;
+procedure NSDrawLightBezel(aRect: NSRect; clipRect: NSRect); cdecl; external;
+procedure NSDottedFrameRect(aRect: NSRect); cdecl; external;
+procedure NSDrawWindowBackground(aRect: NSRect); cdecl; external;
+procedure NSSetFocusRingStyle(placement: NSFocusRingPlacement); cdecl; external;
+procedure NSDisableScreenUpdates; cdecl; external;
+procedure NSEnableScreenUpdates; cdecl; external;
+procedure NSShowAnimationEffect(animationEffect: NSAnimationEffect; centerLocation: NSPoint; size: NSSize; animationDelegate: id; didEndSelector: SEL; contextInfo: Pointer); cdecl; external;
+procedure NSCountWindows(count: NSIntegerPtr); cdecl; external;
+procedure NSWindowList(size: NSInteger; list: NSIntegerPtr {array of NSInteger}); cdecl; external;
+procedure NSCountWindowsForContext(context: NSInteger; count: NSIntegerPtr); cdecl; external;
+procedure NSWindowListForContext(context: NSInteger; size: NSInteger; list: NSIntegerPtr {array of NSInteger}); cdecl; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -123,29 +148,29 @@ procedure NSShowAnimationEffect(animationEffect: NSAnimationEffect; centerLocati
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSCalibratedWhiteColorSpace: NSString; external name '_NSCalibratedWhiteColorSpace';
-  NSCalibratedBlackColorSpace: NSString; external name '_NSCalibratedBlackColorSpace';
-  NSCalibratedRGBColorSpace: NSString; external name '_NSCalibratedRGBColorSpace';
-  NSDeviceWhiteColorSpace: NSString; external name '_NSDeviceWhiteColorSpace';
-  NSDeviceBlackColorSpace: NSString; external name '_NSDeviceBlackColorSpace';
-  NSDeviceRGBColorSpace: NSString; external name '_NSDeviceRGBColorSpace';
-  NSDeviceCMYKColorSpace: NSString; external name '_NSDeviceCMYKColorSpace';
-  NSNamedColorSpace: NSString; external name '_NSNamedColorSpace';
-  NSPatternColorSpace: NSString; external name '_NSPatternColorSpace';
-  NSCustomColorSpace: NSString; external name '_NSCustomColorSpace';
-  NSDeviceResolution: NSString; external name '_NSDeviceResolution';
-  NSDeviceColorSpaceName: NSString; external name '_NSDeviceColorSpaceName';
-  NSDeviceBitsPerSample: NSString; external name '_NSDeviceBitsPerSample';
-  NSDeviceIsScreen: NSString; external name '_NSDeviceIsScreen';
-  NSDeviceIsPrinter: NSString; external name '_NSDeviceIsPrinter';
-  NSDeviceSize: NSString; external name '_NSDeviceSize';
+  NSCalibratedWhiteColorSpace: NSString; cvar; external;
+  NSCalibratedRGBColorSpace: NSString; cvar; external;
+  NSDeviceWhiteColorSpace: NSString; cvar; external;
+  NSDeviceRGBColorSpace: NSString; cvar; external;
+  NSDeviceCMYKColorSpace: NSString; cvar; external;
+  NSNamedColorSpace: NSString; cvar; external;
+  NSPatternColorSpace: NSString; cvar; external;
+  NSCustomColorSpace: NSString; cvar; external;
+  NSCalibratedBlackColorSpace: NSString; cvar; external;
+  NSDeviceBlackColorSpace: NSString; cvar; external;
+  NSDeviceResolution: NSString; cvar; external;
+  NSDeviceColorSpaceName: NSString; cvar; external;
+  NSDeviceBitsPerSample: NSString; cvar; external;
+  NSDeviceIsScreen: NSString; cvar; external;
+  NSDeviceIsPrinter: NSString; cvar; external;
+  NSDeviceSize: NSString; cvar; external;
 
 
 { External symbols }
 { External symbols }
 var
 var
-  NSWhite: CGFloat; external name '_NSWhite';
-  NSLightGray: CGFloat; external name '_NSLightGray';
-  NSDarkGray: CGFloat; external name '_NSDarkGray';
-  NSBlack: CGFloat; external name '_NSBlack';
+  NSWhite: CGFloat; cvar; external;
+  NSLightGray: CGFloat; cvar; external;
+  NSDarkGray: CGFloat; cvar; external;
+  NSBlack: CGFloat; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 17 - 16
packages/cocoaint/src/appkit/NSGraphicsContext.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSGraphicsContext.h }
 { Parsed from Appkit.framework NSGraphicsContext.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -12,19 +12,13 @@ const
   NSImageInterpolationDefault = 0;
   NSImageInterpolationDefault = 0;
   NSImageInterpolationNone = 1;
   NSImageInterpolationNone = 1;
   NSImageInterpolationLow = 2;
   NSImageInterpolationLow = 2;
+  NSImageInterpolationMedium = 4;
   NSImageInterpolationHigh = 3;
   NSImageInterpolationHigh = 3;
 
 
-const
-  NSColorRenderingIntentDefault = 0;
-  NSColorRenderingIntentAbsoluteColorimetric = 1;
-  NSColorRenderingIntentRelativeColorimetric = 2;
-  NSColorRenderingIntentPerceptual = 3;
-  NSColorRenderingIntentSaturation = 4;
-
 { Types }
 { Types }
 type
 type
   NSImageInterpolation = NSUInteger;
   NSImageInterpolation = NSUInteger;
-  NSColorRenderingIntent = NSInteger;
+  NSImageInterpolationPtr = ^NSImageInterpolation;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -49,10 +43,10 @@ type
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSGraphicsContextDestinationAttributeName: NSString; external name '_NSGraphicsContextDestinationAttributeName';
-  NSGraphicsContextRepresentationFormatAttributeName: NSString; external name '_NSGraphicsContextRepresentationFormatAttributeName';
-  NSGraphicsContextPSFormat: NSString; external name '_NSGraphicsContextPSFormat';
-  NSGraphicsContextPDFFormat: NSString; external name '_NSGraphicsContextPDFFormat';
+  NSGraphicsContextDestinationAttributeName: NSString; cvar; external;
+  NSGraphicsContextRepresentationFormatAttributeName: NSString; cvar; external;
+  NSGraphicsContextPSFormat: NSString; cvar; external;
+  NSGraphicsContextPDFFormat: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -60,6 +54,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSGraphicsContext = objcclass;
   NSGraphicsContext = objcclass;
   NSGraphicsContextPointer = ^NSGraphicsContext;
   NSGraphicsContextPointer = ^NSGraphicsContext;
+  NSGraphicsContextPtr = NSGraphicsContextPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -86,14 +81,20 @@ var
     function attributes: NSDictionary; message 'attributes';
     function attributes: NSDictionary; message 'attributes';
     function isDrawingToScreen: Boolean; message 'isDrawingToScreen';
     function isDrawingToScreen: Boolean; message 'isDrawingToScreen';
     procedure flushGraphics; message 'flushGraphics';
     procedure flushGraphics; message 'flushGraphics';
-    function focusStack: id; message 'focusStack';
-    procedure setFocusStack(stack: id); message 'setFocusStack:';
     function graphicsPort: Pointer; message 'graphicsPort';
     function graphicsPort: Pointer; message 'graphicsPort';
     function isFlipped: Boolean; message 'isFlipped';
     function isFlipped: Boolean; message 'isFlipped';
+  end; external;
 
 
-    { Category: NSQuartzCoreAdditions }
+{ NSQuartzCoreAdditionsCategory }
+  NSQuartzCoreAdditionsCategory = objccategory(NSGraphicsContext)
     function CIContext: CIContext; message 'CIContext';
     function CIContext: CIContext; message 'CIContext';
   end; external;
   end; external;
 
 
+{ NSGraphicsContextDeprecatedCategory }
+  NSGraphicsContextDeprecatedCategory = objccategory(NSGraphicsContext)
+    function focusStack: id; message 'focusStack';
+    procedure setFocusStack(stack: id); message 'setFocusStack:';
+  end; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 23 - 10
packages/cocoaint/src/appkit/NSHelpManager.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSHelpManager.h }
 { Parsed from Appkit.framework NSHelpManager.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,8 +29,8 @@
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSContextHelpModeDidActivateNotification: NSString; external name '_NSContextHelpModeDidActivateNotification';
-  NSContextHelpModeDidDeactivateNotification: NSString; external name '_NSContextHelpModeDidDeactivateNotification';
+  NSContextHelpModeDidActivateNotification: NSString; cvar; external;
+  NSContextHelpModeDidDeactivateNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -38,6 +38,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSHelpManager = objcclass;
   NSHelpManager = objcclass;
   NSHelpManagerPointer = ^NSHelpManager;
   NSHelpManagerPointer = ^NSHelpManager;
+  NSHelpManagerPtr = NSHelpManagerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -48,13 +49,13 @@ var
 { NSHelpManager }
 { NSHelpManager }
   NSHelpManager = objcclass(NSObject)
   NSHelpManager = objcclass(NSObject)
   private
   private
-    __helpMapTable: NSMapTable;
-    __keyMapTable: NSMapTable;
-    __bundleMapTable: NSMapTable;
-    __helpWindow: NSWindow;
-    __shadowWindow: NSWindow;
-    __evtWindow: NSWindow;
-    __helpBundle: NSBundle;
+    _helpMapTable: NSMapTable;
+    _keyMapTable: NSMapTable;
+    _bundleMapTable: NSMapTable;
+    _helpWindow: NSWindow;
+    _shadowWindow: NSWindow;
+    _evtWindow: NSWindow;
+    _helpBundle: NSBundle;
     
     
   public
   public
     class function alloc: NSHelpManager; message 'alloc';
     class function alloc: NSHelpManager; message 'alloc';
@@ -68,6 +69,18 @@ var
     function showContextHelpForObject_locationHint(object_: id; pt: NSPoint): Boolean; message 'showContextHelpForObject:locationHint:';
     function showContextHelpForObject_locationHint(object_: id; pt: NSPoint): Boolean; message 'showContextHelpForObject:locationHint:';
     procedure openHelpAnchor_inBook(anchor: NSString; book: NSString); message 'openHelpAnchor:inBook:';
     procedure openHelpAnchor_inBook(anchor: NSString; book: NSString); message 'openHelpAnchor:inBook:';
     procedure findString_inBook(query: NSString; book: NSString); message 'findString:inBook:';
     procedure findString_inBook(query: NSString; book: NSString); message 'findString:inBook:';
+    function registerBooksInBundle(bundle: NSBundle): Boolean; message 'registerBooksInBundle:';
+  end; external;
+
+{ NSBundleHelpExtensionCategory }
+  NSBundleHelpExtensionCategory = objccategory(NSBundle)
+    function contextHelpForKey(key: NSString): NSAttributedString; message 'contextHelpForKey:';
+  end; external;
+
+{ NSApplicationHelpExtensionCategory }
+  NSApplicationHelpExtensionCategory = objccategory(NSApplication)
+    procedure activateContextHelpMode(sender: id); message 'activateContextHelpMode:';
+    procedure showHelp(sender: id); message 'showHelp:';
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 131 - 74
packages/cocoaint/src/appkit/NSImage.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSImage.h }
 { Parsed from Appkit.framework NSImage.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -24,7 +24,9 @@ const
 { Types }
 { Types }
 type
 type
   NSImageLoadStatus = NSUInteger;
   NSImageLoadStatus = NSUInteger;
+  NSImageLoadStatusPtr = ^NSImageLoadStatus;
   NSImageCacheMode = NSUInteger;
   NSImageCacheMode = NSUInteger;
+  NSImageCacheModePtr = ^NSImageCacheMode;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -49,57 +51,76 @@ type
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSImageNameQuickLookTemplate: NSString; external name '_NSImageNameQuickLookTemplate';
-  NSImageNameBluetoothTemplate: NSString; external name '_NSImageNameBluetoothTemplate';
-  NSImageNameIChatTheaterTemplate: NSString; external name '_NSImageNameIChatTheaterTemplate';
-  NSImageNameSlideshowTemplate: NSString; external name '_NSImageNameSlideshowTemplate';
-  NSImageNameActionTemplate: NSString; external name '_NSImageNameActionTemplate';
-  NSImageNameSmartBadgeTemplate: NSString; external name '_NSImageNameSmartBadgeTemplate';
-  NSImageNameIconViewTemplate: NSString; external name '_NSImageNameIconViewTemplate';
-  NSImageNameListViewTemplate: NSString; external name '_NSImageNameListViewTemplate';
-  NSImageNameColumnViewTemplate: NSString; external name '_NSImageNameColumnViewTemplate';
-  NSImageNameFlowViewTemplate: NSString; external name '_NSImageNameFlowViewTemplate';
-  NSImageNamePathTemplate: NSString; external name '_NSImageNamePathTemplate';
-  NSImageNameInvalidDataFreestandingTemplate: NSString; external name '_NSImageNameInvalidDataFreestandingTemplate';
-  NSImageNameLockLockedTemplate: NSString; external name '_NSImageNameLockLockedTemplate';
-  NSImageNameLockUnlockedTemplate: NSString; external name '_NSImageNameLockUnlockedTemplate';
-  NSImageNameGoRightTemplate: NSString; external name '_NSImageNameGoRightTemplate';
-  NSImageNameGoLeftTemplate: NSString; external name '_NSImageNameGoLeftTemplate';
-  NSImageNameRightFacingTriangleTemplate: NSString; external name '_NSImageNameRightFacingTriangleTemplate';
-  NSImageNameLeftFacingTriangleTemplate: NSString; external name '_NSImageNameLeftFacingTriangleTemplate';
-  NSImageNameAddTemplate: NSString; external name '_NSImageNameAddTemplate';
-  NSImageNameRemoveTemplate: NSString; external name '_NSImageNameRemoveTemplate';
-  NSImageNameRevealFreestandingTemplate: NSString; external name '_NSImageNameRevealFreestandingTemplate';
-  NSImageNameFollowLinkFreestandingTemplate: NSString; external name '_NSImageNameFollowLinkFreestandingTemplate';
-  NSImageNameEnterFullScreenTemplate: NSString; external name '_NSImageNameEnterFullScreenTemplate';
-  NSImageNameExitFullScreenTemplate: NSString; external name '_NSImageNameExitFullScreenTemplate';
-  NSImageNameStopProgressTemplate: NSString; external name '_NSImageNameStopProgressTemplate';
-  NSImageNameStopProgressFreestandingTemplate: NSString; external name '_NSImageNameStopProgressFreestandingTemplate';
-  NSImageNameRefreshTemplate: NSString; external name '_NSImageNameRefreshTemplate';
-  NSImageNameRefreshFreestandingTemplate: NSString; external name '_NSImageNameRefreshFreestandingTemplate';
-  NSImageNameBonjour: NSString; external name '_NSImageNameBonjour';
-  NSImageNameDotMac: NSString; external name '_NSImageNameDotMac';
-  NSImageNameComputer: NSString; external name '_NSImageNameComputer';
-  NSImageNameFolderBurnable: NSString; external name '_NSImageNameFolderBurnable';
-  NSImageNameFolderSmart: NSString; external name '_NSImageNameFolderSmart';
-  NSImageNameNetwork: NSString; external name '_NSImageNameNetwork';
-  NSImageNameMultipleDocuments: NSString; external name '_NSImageNameMultipleDocuments';
-  NSImageNameUserAccounts: NSString; external name '_NSImageNameUserAccounts';
-  NSImageNamePreferencesGeneral: NSString; external name '_NSImageNamePreferencesGeneral';
-  NSImageNameAdvanced: NSString; external name '_NSImageNameAdvanced';
-  NSImageNameInfo: NSString; external name '_NSImageNameInfo';
-  NSImageNameFontPanel: NSString; external name '_NSImageNameFontPanel';
-  NSImageNameColorPanel: NSString; external name '_NSImageNameColorPanel';
-  NSImageNameUser: NSString; external name '_NSImageNameUser';
-  NSImageNameUserGroup: NSString; external name '_NSImageNameUserGroup';
-  NSImageNameEveryone: NSString; external name '_NSImageNameEveryone';
+  NSImageHintCTM: NSString; cvar; external;
+  NSImageHintInterpolation: NSString; cvar; external;
+  NSImageNameQuickLookTemplate: NSString; cvar; external;
+  NSImageNameBluetoothTemplate: NSString; cvar; external;
+  NSImageNameIChatTheaterTemplate: NSString; cvar; external;
+  NSImageNameSlideshowTemplate: NSString; cvar; external;
+  NSImageNameActionTemplate: NSString; cvar; external;
+  NSImageNameSmartBadgeTemplate: NSString; cvar; external;
+  NSImageNameIconViewTemplate: NSString; cvar; external;
+  NSImageNameListViewTemplate: NSString; cvar; external;
+  NSImageNameColumnViewTemplate: NSString; cvar; external;
+  NSImageNameFlowViewTemplate: NSString; cvar; external;
+  NSImageNamePathTemplate: NSString; cvar; external;
+  NSImageNameInvalidDataFreestandingTemplate: NSString; cvar; external;
+  NSImageNameLockLockedTemplate: NSString; cvar; external;
+  NSImageNameLockUnlockedTemplate: NSString; cvar; external;
+  NSImageNameGoRightTemplate: NSString; cvar; external;
+  NSImageNameGoLeftTemplate: NSString; cvar; external;
+  NSImageNameRightFacingTriangleTemplate: NSString; cvar; external;
+  NSImageNameLeftFacingTriangleTemplate: NSString; cvar; external;
+  NSImageNameAddTemplate: NSString; cvar; external;
+  NSImageNameRemoveTemplate: NSString; cvar; external;
+  NSImageNameRevealFreestandingTemplate: NSString; cvar; external;
+  NSImageNameFollowLinkFreestandingTemplate: NSString; cvar; external;
+  NSImageNameEnterFullScreenTemplate: NSString; cvar; external;
+  NSImageNameExitFullScreenTemplate: NSString; cvar; external;
+  NSImageNameStopProgressTemplate: NSString; cvar; external;
+  NSImageNameStopProgressFreestandingTemplate: NSString; cvar; external;
+  NSImageNameRefreshTemplate: NSString; cvar; external;
+  NSImageNameRefreshFreestandingTemplate: NSString; cvar; external;
+  NSImageNameBonjour: NSString; cvar; external;
+  NSImageNameComputer: NSString; cvar; external;
+  NSImageNameFolderBurnable: NSString; cvar; external;
+  NSImageNameFolderSmart: NSString; cvar; external;
+  NSImageNameFolder: NSString; cvar; external;
+  NSImageNameNetwork: NSString; cvar; external;
+  NSImageNameDotMac: NSString; cvar; external;
+  NSImageNameMobileMe: NSString; cvar; external;
+  NSImageNameMultipleDocuments: NSString; cvar; external;
+  NSImageNameUserAccounts: NSString; cvar; external;
+  NSImageNamePreferencesGeneral: NSString; cvar; external;
+  NSImageNameAdvanced: NSString; cvar; external;
+  NSImageNameInfo: NSString; cvar; external;
+  NSImageNameFontPanel: NSString; cvar; external;
+  NSImageNameColorPanel: NSString; cvar; external;
+  NSImageNameUser: NSString; cvar; external;
+  NSImageNameUserGroup: NSString; cvar; external;
+  NSImageNameEveryone: NSString; cvar; external;
+  NSImageNameUserGuest: NSString; cvar; external;
+  NSImageNameMenuOnStateTemplate: NSString; cvar; external;
+  NSImageNameMenuMixedStateTemplate: NSString; cvar; external;
+  NSImageNameApplicationIcon: NSString; cvar; external;
+  NSImageNameTrashEmpty: NSString; cvar; external;
+  NSImageNameTrashFull: NSString; cvar; external;
+  NSImageNameHomeTemplate: NSString; cvar; external;
+  NSImageNameBookmarksTemplate: NSString; cvar; external;
+  NSImageNameCaution: NSString; cvar; external;
+  NSImageNameStatusAvailable: NSString; cvar; external;
+  NSImageNameStatusPartiallyAvailable: NSString; cvar; external;
+  NSImageNameStatusUnavailable: NSString; cvar; external;
+  NSImageNameStatusNone: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSImageDelegateProtocol = objcprotocol;
   NSImage = objcclass;
   NSImage = objcclass;
   NSImagePointer = ^NSImage;
   NSImagePointer = ^NSImage;
+  NSImagePtr = NSImagePointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -108,11 +129,14 @@ var
 {$define NSIMAGE_PAS_C}
 {$define NSIMAGE_PAS_C}
 
 
 { NSImage }
 { NSImage }
-  NSImage = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
+  NSImage = objcclass(NSObject)
   private
   private
-    __name: NSString;
-    __size: NSSize;
+    _name: NSString;
+    _size: NSSize;
     __flags: bitpacked record
     __flags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSImage0: cuint);
+       1: (
         scalable: 0..1;
         scalable: 0..1;
         dataRetained: 0..1;
         dataRetained: 0..1;
         uniqueWindow: 0..1;
         uniqueWindow: 0..1;
@@ -122,22 +146,22 @@ var
         useEPSOnResolutionMismatch: 0..1;
         useEPSOnResolutionMismatch: 0..1;
         colorMatchPreferred: 0..1;
         colorMatchPreferred: 0..1;
         multipleResolutionMatching: 0..1;
         multipleResolutionMatching: 0..1;
-        subImage: 0..1;
+        focusedWhilePrinting: 0..1;
         archiveByName: 0..1;
         archiveByName: 0..1;
         unboundedCacheDepth: 0..1;
         unboundedCacheDepth: 0..1;
         flipped: 0..1;
         flipped: 0..1;
         aliased: 0..1;
         aliased: 0..1;
         dirtied: 0..1;
         dirtied: 0..1;
-        cacheMode: 0..((1 shl 2)-1);
-        sampleMode: 0..((1 shl 2)-1);
-        focusedWhilePrinting: 0..1;
-        imageEffectsRequested: 0..1;
-        isTemplate: 0..1;
+        _cacheMode: 0..((1 shl 2)-1);
+        sampleMode: 0..((1 shl 3)-1);
+        reserved2: 0..1;
+        _isTemplate: 0..1;
         failedToExpand: 0..1;
         failedToExpand: 0..1;
         reserved1: 0..((1 shl 9)-1);
         reserved1: 0..((1 shl 9)-1);
+      );
       end;
       end;
-    __reps: id;
-    __imageAuxiliary: _NSImageAuxiliary;
+    _reps: id; {garbage collector: volatile }
+    _imageAuxiliary: _NSImageAuxiliary;
     
     
   public
   public
     class function alloc: NSImage; message 'alloc';
     class function alloc: NSImage; message 'alloc';
@@ -149,20 +173,13 @@ var
     function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
     function initWithContentsOfURL(url: NSURL): id; message 'initWithContentsOfURL:';
     function initByReferencingFile(fileName: NSString): id; message 'initByReferencingFile:';
     function initByReferencingFile(fileName: NSString): id; message 'initByReferencingFile:';
     function initByReferencingURL(url: NSURL): id; message 'initByReferencingURL:';
     function initByReferencingURL(url: NSURL): id; message 'initByReferencingURL:';
-    function initWithIconRef(iconRef: IconRef): id; message 'initWithIconRef:';
+    function initWithIconRef(iconRef_: IconRef): id; message 'initWithIconRef:';
     function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:';
     function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:';
+    function initWithDataIgnoringOrientation(data: NSData): id; message 'initWithDataIgnoringOrientation:';
     procedure setSize(aSize: NSSize); message 'setSize:';
     procedure setSize(aSize: NSSize); message 'setSize:';
     function size: NSSize; message 'size';
     function size: NSSize; message 'size';
     function setName(string_: NSString): Boolean; message 'setName:';
     function setName(string_: NSString): Boolean; message 'setName:';
     function name: NSString; message 'name';
     function name: NSString; message 'name';
-    procedure setScalesWhenResized(flag: Boolean); message 'setScalesWhenResized:';
-    function scalesWhenResized: Boolean; message 'scalesWhenResized';
-    procedure setDataRetained(flag: Boolean); message 'setDataRetained:';
-    function isDataRetained: Boolean; message 'isDataRetained';
-    procedure setCachedSeparately(flag: Boolean); message 'setCachedSeparately:';
-    function isCachedSeparately: Boolean; message 'isCachedSeparately';
-    procedure setCacheDepthMatchesImageDepth(flag: Boolean); message 'setCacheDepthMatchesImageDepth:';
-    function cacheDepthMatchesImageDepth: Boolean; message 'cacheDepthMatchesImageDepth';
     procedure setBackgroundColor(aColor: NSColor); message 'setBackgroundColor:';
     procedure setBackgroundColor(aColor: NSColor); message 'setBackgroundColor:';
     function backgroundColor: NSColor; message 'backgroundColor';
     function backgroundColor: NSColor; message 'backgroundColor';
     procedure setUsesEPSOnResolutionMismatch(flag: Boolean); message 'setUsesEPSOnResolutionMismatch:';
     procedure setUsesEPSOnResolutionMismatch(flag: Boolean); message 'setUsesEPSOnResolutionMismatch:';
@@ -171,14 +188,9 @@ var
     function prefersColorMatch: Boolean; message 'prefersColorMatch';
     function prefersColorMatch: Boolean; message 'prefersColorMatch';
     procedure setMatchesOnMultipleResolution(flag: Boolean); message 'setMatchesOnMultipleResolution:';
     procedure setMatchesOnMultipleResolution(flag: Boolean); message 'setMatchesOnMultipleResolution:';
     function matchesOnMultipleResolution: Boolean; message 'matchesOnMultipleResolution';
     function matchesOnMultipleResolution: Boolean; message 'matchesOnMultipleResolution';
-    procedure dissolveToPoint_fraction(point: NSPoint; aFloat: CGFloat); message 'dissolveToPoint:fraction:';
-    procedure dissolveToPoint_fromRect_fraction(point: NSPoint; rect: NSRect; aFloat: CGFloat); message 'dissolveToPoint:fromRect:fraction:';
-    procedure compositeToPoint_operation(point: NSPoint; op: NSCompositingOperation); message 'compositeToPoint:operation:';
-    procedure compositeToPoint_fromRect_operation(point: NSPoint; rect: NSRect; op: NSCompositingOperation); message 'compositeToPoint:fromRect:operation:';
-    procedure compositeToPoint_operation_fraction(point: NSPoint; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:operation:fraction:';
-    procedure compositeToPoint_fromRect_operation_fraction(point: NSPoint; rect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:fromRect:operation:fraction:';
     procedure drawAtPoint_fromRect_operation_fraction(point: NSPoint; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawAtPoint:fromRect:operation:fraction:';
     procedure drawAtPoint_fromRect_operation_fraction(point: NSPoint; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawAtPoint:fromRect:operation:fraction:';
     procedure drawInRect_fromRect_operation_fraction(rect: NSRect; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawInRect:fromRect:operation:fraction:';
     procedure drawInRect_fromRect_operation_fraction(rect: NSRect; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawInRect:fromRect:operation:fraction:';
+    procedure drawInRect_fromRect_operation_fraction_respectFlipped_hints(dstSpacePortionRect: NSRect; srcSpacePortionRect: NSRect; op: NSCompositingOperation; requestedAlpha: CGFloat; respectContextIsFlipped: Boolean; hints: NSDictionary); message 'drawInRect:fromRect:operation:fraction:respectFlipped:hints:';
     function drawRepresentation_inRect(imageRep: NSImageRep; rect: NSRect): Boolean; message 'drawRepresentation:inRect:';
     function drawRepresentation_inRect(imageRep: NSImageRep; rect: NSRect): Boolean; message 'drawRepresentation:inRect:';
     procedure recache; message 'recache';
     procedure recache; message 'recache';
     function TIFFRepresentation: NSData; message 'TIFFRepresentation';
     function TIFFRepresentation: NSData; message 'TIFFRepresentation';
@@ -189,7 +201,7 @@ var
     procedure removeRepresentation(imageRep: NSImageRep); message 'removeRepresentation:';
     procedure removeRepresentation(imageRep: NSImageRep); message 'removeRepresentation:';
     function isValid: Boolean; message 'isValid';
     function isValid: Boolean; message 'isValid';
     procedure lockFocus; message 'lockFocus';
     procedure lockFocus; message 'lockFocus';
-    procedure lockFocusOnRepresentation(imageRepresentation: NSImageRep); message 'lockFocusOnRepresentation:';
+    procedure lockFocusFlipped(flipped: Boolean); message 'lockFocusFlipped:';
     procedure unlockFocus; message 'unlockFocus';
     procedure unlockFocus; message 'unlockFocus';
     function bestRepresentationForDevice(deviceDescription: NSDictionary): NSImageRep; message 'bestRepresentationForDevice:';
     function bestRepresentationForDevice(deviceDescription: NSDictionary): NSImageRep; message 'bestRepresentationForDevice:';
     procedure setDelegate(anObject: id); message 'setDelegate:';
     procedure setDelegate(anObject: id); message 'setDelegate:';
@@ -201,8 +213,6 @@ var
     class function imageTypes: NSArray; message 'imageTypes';
     class function imageTypes: NSArray; message 'imageTypes';
     class function imageUnfilteredTypes: NSArray; message 'imageUnfilteredTypes';
     class function imageUnfilteredTypes: NSArray; message 'imageUnfilteredTypes';
     class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:';
     class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:';
-    procedure setFlipped(flag: Boolean); message 'setFlipped:';
-    function isFlipped: Boolean; message 'isFlipped';
     procedure cancelIncrementalLoad; message 'cancelIncrementalLoad';
     procedure cancelIncrementalLoad; message 'cancelIncrementalLoad';
     procedure setCacheMode(mode: NSImageCacheMode); message 'setCacheMode:';
     procedure setCacheMode(mode: NSImageCacheMode); message 'setCacheMode:';
     function cacheMode: NSImageCacheMode; message 'cacheMode';
     function cacheMode: NSImageCacheMode; message 'cacheMode';
@@ -210,7 +220,54 @@ var
     procedure setAlignmentRect(rect: NSRect); message 'setAlignmentRect:';
     procedure setAlignmentRect(rect: NSRect); message 'setAlignmentRect:';
     function isTemplate: Boolean; message 'isTemplate';
     function isTemplate: Boolean; message 'isTemplate';
     procedure setTemplate(isTemplate_: Boolean); message 'setTemplate:';
     procedure setTemplate(isTemplate_: Boolean); message 'setTemplate:';
+    function accessibilityDescription: NSString; message 'accessibilityDescription';
+    procedure setAccessibilityDescription(description_: NSString); message 'setAccessibilityDescription:';
+    function initWithCGImage_size(cgImage: CGImageRef; size_: NSSize): id; message 'initWithCGImage:size:';
+    function CGImageForProposedRect_context_hints(proposedDestRect: NSRectPtr; referenceContext: NSGraphicsContext; hints: NSDictionary): CGImageRef; message 'CGImageForProposedRect:context:hints:';
+    function bestRepresentationForRect_context_hints(rect: NSRect; referenceContext: NSGraphicsContext; hints: NSDictionary): NSImageRep; message 'bestRepresentationForRect:context:hints:';
+    function hitTestRect_withImageDestinationRect_context_hints_flipped(testRectDestSpace: NSRect; imageRectDestSpace: NSRect; context: NSGraphicsContext; hints: NSDictionary; flipped: Boolean): Boolean; message 'hitTestRect:withImageDestinationRect:context:hints:flipped:';
+  end; external;
+
+{ NSBundleImageExtensionCategory }
+  NSBundleImageExtensionCategory = objccategory(NSBundle)
+    function pathForImageResource(name: NSString): NSString; message 'pathForImageResource:';
+    function URLForImageResource(name: NSString): NSURL; message 'URLForImageResource:';
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSImageCategory }
+  NSDeprecated_NSImageCategory = objccategory(NSImage)
+    procedure setFlipped(flag: Boolean); message 'setFlipped:';
+    function isFlipped: Boolean; message 'isFlipped';
+    procedure dissolveToPoint_fraction(point: NSPoint; aFloat: CGFloat); message 'dissolveToPoint:fraction:';
+    procedure dissolveToPoint_fromRect_fraction(point: NSPoint; rect: NSRect; aFloat: CGFloat); message 'dissolveToPoint:fromRect:fraction:';
+    procedure compositeToPoint_operation(point: NSPoint; op: NSCompositingOperation); message 'compositeToPoint:operation:';
+    procedure compositeToPoint_fromRect_operation(point: NSPoint; rect: NSRect; op: NSCompositingOperation); message 'compositeToPoint:fromRect:operation:';
+    procedure compositeToPoint_operation_fraction(point: NSPoint; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:operation:fraction:';
+    procedure compositeToPoint_fromRect_operation_fraction(point: NSPoint; rect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:fromRect:operation:fraction:';
+    procedure lockFocusOnRepresentation(imageRepresentation: NSImageRep); message 'lockFocusOnRepresentation:';
+    procedure setScalesWhenResized(flag: Boolean); message 'setScalesWhenResized:';
+    function scalesWhenResized: Boolean; message 'scalesWhenResized';
+    procedure setDataRetained(flag: Boolean); message 'setDataRetained:';
+    function isDataRetained: Boolean; message 'isDataRetained';
+    procedure setCachedSeparately(flag: Boolean); message 'setCachedSeparately:';
+    function isCachedSeparately: Boolean; message 'isCachedSeparately';
+    procedure setCacheDepthMatchesImageDepth(flag: Boolean); message 'setCacheDepthMatchesImageDepth:';
+    function cacheDepthMatchesImageDepth: Boolean; message 'cacheDepthMatchesImageDepth';
+  end; external name 'NSDeprecated';
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSIMAGE_PAS_P}
+{$define NSIMAGE_PAS_P}
+  
+{ NSImageDelegate Protocol }
+  NSImageDelegateProtocol = objcprotocol
+    function imageDidNotDraw_inRect(sender: id; aRect: NSRect): NSImage; message 'imageDidNotDraw:inRect:';
+    procedure image_willLoadRepresentation(image: NSImage; rep: NSImageRep); message 'image:willLoadRepresentation:';
+    procedure image_didLoadRepresentationHeader(image: NSImage; rep: NSImageRep); message 'image:didLoadRepresentationHeader:';
+    procedure image_didLoadPartOfRepresentation_withValidRows(image: NSImage; rep: NSImageRep; rows: NSInteger); message 'image:didLoadPartOfRepresentation:withValidRows:';
+    procedure image_didLoadRepresentation_withStatus(image: NSImage; rep: NSImageRep; status: NSImageLoadStatus); message 'image:didLoadRepresentation:withStatus:';
+  end; external name 'NSImageDelegate';
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 16 - 4
packages/cocoaint/src/appkit/NSImageCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSImageCell.h }
 { Parsed from Appkit.framework NSImageCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,7 +29,9 @@ const
 { Types }
 { Types }
 type
 type
   NSImageAlignment = NSUInteger;
   NSImageAlignment = NSUInteger;
+  NSImageAlignmentPtr = ^NSImageAlignment;
   NSImageFrameStyle = NSUInteger;
   NSImageFrameStyle = NSUInteger;
+  NSImageFrameStylePtr = ^NSImageFrameStyle;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -58,6 +60,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSImageCell = objcclass;
   NSImageCell = objcclass;
   NSImageCellPointer = ^NSImageCell;
   NSImageCellPointer = ^NSImageCell;
+  NSImageCellPtr = NSImageCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -68,16 +71,20 @@ type
 { NSImageCell }
 { NSImageCell }
   NSImageCell = objcclass(NSCell, NSCopyingProtocol, NSCodingProtocol)
   NSImageCell = objcclass(NSCell, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __controlView: id;
+    _controlView: id;
     __icFlags: bitpacked record
     __icFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSImageCell0: cuint);
+       1: (
         _unused: 0..((1 shl 22)-1);
         _unused: 0..((1 shl 22)-1);
         _animates: 0..1;
         _animates: 0..1;
         _align: 0..((1 shl 4)-1);
         _align: 0..((1 shl 4)-1);
         _scale: 0..((1 shl 2)-1);
         _scale: 0..((1 shl 2)-1);
         _style: 0..((1 shl 3)-1);
         _style: 0..((1 shl 3)-1);
+      );
       end;
       end;
-    __animationState: _NSImageCellAnimationState;
-    __scaledImage: NSImage;
+    __animationState: Pointer;
+    _scaledImage: NSImage;
     
     
   public
   public
     class function alloc: NSImageCell; message 'alloc';
     class function alloc: NSImageCell; message 'alloc';
@@ -88,6 +95,11 @@ type
     procedure setImageScaling(newScaling: NSImageScaling); message 'setImageScaling:';
     procedure setImageScaling(newScaling: NSImageScaling); message 'setImageScaling:';
     function imageFrameStyle: NSImageFrameStyle; message 'imageFrameStyle';
     function imageFrameStyle: NSImageFrameStyle; message 'imageFrameStyle';
     procedure setImageFrameStyle(newStyle: NSImageFrameStyle); message 'setImageFrameStyle:';
     procedure setImageFrameStyle(newStyle: NSImageFrameStyle); message 'setImageFrameStyle:';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 24 - 12
packages/cocoaint/src/appkit/NSImageRep.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSImageRep.h }
 { Parsed from Appkit.framework NSImageRep.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -34,7 +34,7 @@ const
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSImageRepRegistryDidChangeNotification: NSString; external name '_NSImageRepRegistryDidChangeNotification';
+  NSImageRepRegistryDidChangeNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -42,6 +42,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSImageRep = objcclass;
   NSImageRep = objcclass;
   NSImageRepPointer = ^NSImageRep;
   NSImageRepPointer = ^NSImageRep;
+  NSImageRepPtr = NSImageRepPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -53,20 +54,24 @@ var
   NSImageRep = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSImageRep = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
     __repFlags: bitpacked record
     __repFlags: bitpacked record
-        hasAlpha: 0..1;
-        isOpaque: 0..1;
-        cacheParamsComputed: 0..1;
-        cacheAlphaComputed: 0..1;
+      case byte of
+       0: (_anonbitfield_NSImageRep0: cuint);
+       1: (
+        _hasAlpha: 0..1;
+        _isOpaque: 0..1;
+        cacheParamsComputed: 0..1 deprecated;
+        cacheAlphaComputed: 0..1 deprecated;
         loadState: 0..((1 shl 2)-1);
         loadState: 0..((1 shl 2)-1);
-        keepCacheWindow: 0..1;
+        keepCacheWindow: 0..1 deprecated;
         reserved: 0..1;
         reserved: 0..1;
-        bitsPerSample: 0..((1 shl 8)-1);
+        _bitsPerSample: 0..((1 shl 8)-1);
         gsaved: 0..((1 shl 16)-1);
         gsaved: 0..((1 shl 16)-1);
+      );
       end;
       end;
-    __colorSpaceName: NSString;
-    __size: NSSize;
-    __pixelsWide: cint;
-    __pixelsHigh: cint;
+    _colorSpaceName: NSString;
+    _size: NSSize;
+    _pixelsWide: cint;
+    _pixelsHigh: cint;
     
     
   public
   public
     class function alloc: NSImageRep; message 'alloc';
     class function alloc: NSImageRep; message 'alloc';
@@ -74,6 +79,7 @@ var
     function draw: Boolean; message 'draw';
     function draw: Boolean; message 'draw';
     function drawAtPoint(point: NSPoint): Boolean; message 'drawAtPoint:';
     function drawAtPoint(point: NSPoint): Boolean; message 'drawAtPoint:';
     function drawInRect(rect: NSRect): Boolean; message 'drawInRect:';
     function drawInRect(rect: NSRect): Boolean; message 'drawInRect:';
+    function drawInRect_fromRect_operation_fraction_respectFlipped_hints(dstSpacePortionRect: NSRect; srcSpacePortionRect: NSRect; op: NSCompositingOperation; requestedAlpha: CGFloat; respectContextIsFlipped: Boolean; hints: NSDictionary): Boolean; message 'drawInRect:fromRect:operation:fraction:respectFlipped:hints:';
     procedure setSize(aSize: NSSize); message 'setSize:';
     procedure setSize(aSize: NSSize); message 'setSize:';
     function size: NSSize; message 'size';
     function size: NSSize; message 'size';
     procedure setAlpha(flag: Boolean); message 'setAlpha:';
     procedure setAlpha(flag: Boolean); message 'setAlpha:';
@@ -109,6 +115,12 @@ var
     class function imageRepWithContentsOfURL(url: NSURL): id; message 'imageRepWithContentsOfURL:';
     class function imageRepWithContentsOfURL(url: NSURL): id; message 'imageRepWithContentsOfURL:';
     class function imageRepsWithPasteboard(pasteboard: NSPasteboard): NSArray; message 'imageRepsWithPasteboard:';
     class function imageRepsWithPasteboard(pasteboard: NSPasteboard): NSArray; message 'imageRepsWithPasteboard:';
     class function imageRepWithPasteboard(pasteboard: NSPasteboard): id; message 'imageRepWithPasteboard:';
     class function imageRepWithPasteboard(pasteboard: NSPasteboard): id; message 'imageRepWithPasteboard:';
+    function CGImageForProposedRect_context_hints(proposedDestRect: NSRectPtr; context: NSGraphicsContext; hints: NSDictionary): CGImageRef; message 'CGImageForProposedRect:context:hints:';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 11 - 5
packages/cocoaint/src/appkit/NSImageView.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSImageView.h }
 { Parsed from Appkit.framework NSImageView.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSImageView = objcclass;
   NSImageView = objcclass;
   NSImageViewPointer = ^NSImageView;
   NSImageViewPointer = ^NSImageView;
+  NSImageViewPtr = NSImageViewPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -44,15 +45,20 @@
   NSImageView = objcclass(NSControl)
   NSImageView = objcclass(NSControl)
   private
   private
     __ivFlags: bitpacked record
     __ivFlags: bitpacked record
-        _unused: 0..((1 shl 27)-1);
+      case byte of
+       0: (_anonbitfield_NSImageView0: cuint);
+       1: (
+        _unused: 0..((1 shl 26)-1);
+        _rejectsMultiFileDrops: 0..1;
         _compatibleScalingAndAlignment: 0..1;
         _compatibleScalingAndAlignment: 0..1;
-        _compatibleImage: 0..1;
+        _reserved: 0..1;
         _overridesDrawing: 0..1;
         _overridesDrawing: 0..1;
         _allowsCutCopyPaste: 0..1;
         _allowsCutCopyPaste: 0..1;
         _editable: 0..1;
         _editable: 0..1;
+      );
       end;
       end;
-    __target: id;
-    __action: SEL;
+    _target: id;
+    _action: SEL;
     
     
   public
   public
     class function alloc: NSImageView; message 'alloc';
     class function alloc: NSImageView; message 'alloc';

+ 38 - 23
packages/cocoaint/src/appkit/NSInputManager.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSInputManager.h }
 { Parsed from Appkit.framework NSInputManager.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -34,6 +34,7 @@
   NSTextInputProtocol = objcprotocol;
   NSTextInputProtocol = objcprotocol;
   NSInputManager = objcclass;
   NSInputManager = objcclass;
   NSInputManagerPointer = ^NSInputManager;
   NSInputManagerPointer = ^NSInputManager;
+  NSInputManagerPtr = NSInputManagerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -44,21 +45,21 @@
 { NSInputManager }
 { NSInputManager }
   NSInputManager = objcclass(NSObject, NSTextInputProtocol)
   NSInputManager = objcclass(NSObject, NSTextInputProtocol)
   private
   private
-    __currentClient: id;
-    __server: id;
-    __bundleObj: id;
-    __keybindings: id;
-    __trueName: NSString;
-    __connectionName: NSString;
-    __hostName: NSString;
-    __procToExec: NSString;
-    __visibleName: NSString;
-    __bundleName: NSString;
-    __language: NSString;
-    __image: NSImage;
-    __flags: cuint;
-    __keyBindingsName: NSString;
-    __reservedInputManager2: cint;
+    _currentClient: id;
+    _server: id;
+    _bundleObj: id;
+    _keybindings: id;
+    _trueName: NSString;
+    _connectionName: NSString;
+    _hostName: NSString;
+    _procToExec: NSString;
+    _visibleName: NSString;
+    _bundleName: NSString;
+    _language: NSString;
+    _image: NSImage;
+    _flags: cuint;
+    _keyBindingsName: NSString;
+    _reservedInputManager2: cint;
     
     
   public
   public
     class function alloc: NSInputManager; message 'alloc';
     class function alloc: NSInputManager; message 'alloc';
@@ -66,17 +67,31 @@
     class function currentInputManager: NSInputManager; message 'currentInputManager';
     class function currentInputManager: NSInputManager; message 'currentInputManager';
     class procedure cycleToNextInputLanguage(sender: id); message 'cycleToNextInputLanguage:';
     class procedure cycleToNextInputLanguage(sender: id); message 'cycleToNextInputLanguage:';
     class procedure cycleToNextInputServerInLanguage(sender: id); message 'cycleToNextInputServerInLanguage:';
     class procedure cycleToNextInputServerInLanguage(sender: id); message 'cycleToNextInputServerInLanguage:';
-    function initWithName_host(inputServerName: NSString; hostName: NSString): NSInputManager; message 'initWithName:host:';
-    function localizedInputManagerName: NSString; message 'localizedInputManagerName';
+    function initWithName_host(inputServerName: NSString; hostName: NSString): NSInputManager; message 'initWithName:host:'; deprecated 'in Mac OS X 10.6 and later';
+    function localizedInputManagerName: NSString; message 'localizedInputManagerName'; deprecated 'in Mac OS X 10.6 and later';
     procedure markedTextAbandoned(cli: id); message 'markedTextAbandoned:';
     procedure markedTextAbandoned(cli: id); message 'markedTextAbandoned:';
     procedure markedTextSelectionChanged_client(newSel: NSRange; cli: id); message 'markedTextSelectionChanged:client:';
     procedure markedTextSelectionChanged_client(newSel: NSRange; cli: id); message 'markedTextSelectionChanged:client:';
-    function wantsToInterpretAllKeystrokes: Boolean; message 'wantsToInterpretAllKeystrokes';
-    function language: NSString; message 'language';
-    function image: NSImage; message 'image';
-    function server: NSInputServer; message 'server';
+    function wantsToInterpretAllKeystrokes: Boolean; message 'wantsToInterpretAllKeystrokes'; deprecated 'in Mac OS X 10.6 and later';
+    function language: NSString; message 'language'; deprecated 'in Mac OS X 10.6 and later';
+    function image: NSImage; message 'image'; deprecated 'in Mac OS X 10.6 and later';
+    function server: NSInputServer; message 'server'; deprecated 'in Mac OS X 10.6 and later';
     function wantsToHandleMouseEvents: Boolean; message 'wantsToHandleMouseEvents';
     function wantsToHandleMouseEvents: Boolean; message 'wantsToHandleMouseEvents';
     function handleMouseEvent(theMouseEvent: NSEvent): Boolean; message 'handleMouseEvent:';
     function handleMouseEvent(theMouseEvent: NSEvent): Boolean; message 'handleMouseEvent:';
-    function wantsToDelayTextChangeNotifications: Boolean; message 'wantsToDelayTextChangeNotifications';
+    function wantsToDelayTextChangeNotifications: Boolean; message 'wantsToDelayTextChangeNotifications'; deprecated 'in Mac OS X 10.6 and later';
+
+    { Adopted Protocols }
+    procedure insertText(aString: id);
+    procedure doCommandBySelector(aSelector: SEL);
+    procedure setMarkedText_selectedRange(aString: id; selRange: NSRange);
+    procedure unmarkText;
+    function hasMarkedText: Boolean;
+    function conversationIdentifier: NSInteger;
+    function attributedSubstringFromRange(theRange: NSRange): NSAttributedString;
+    function markedRange: NSRange;
+    function selectedRange: NSRange;
+    function firstRectForCharacterRange(theRange: NSRange): NSRect;
+    function characterIndexForPoint(thePoint: NSPoint): NSUInteger;
+    function validAttributesForMarkedText: NSArray;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 42 - 21
packages/cocoaint/src/appkit/NSInputServer.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSInputServer.h }
 { Parsed from Appkit.framework NSInputServer.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -35,6 +35,7 @@
   NSInputServerMouseTrackerProtocol = objcprotocol;
   NSInputServerMouseTrackerProtocol = objcprotocol;
   NSInputServer = objcclass;
   NSInputServer = objcclass;
   NSInputServerPointer = ^NSInputServer;
   NSInputServerPointer = ^NSInputServer;
+  NSInputServerPtr = NSInputServerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -45,11 +46,31 @@
 { NSInputServer }
 { NSInputServer }
   NSInputServer = objcclass(NSObject, NSInputServiceProviderProtocol, NSInputServerMouseTrackerProtocol)
   NSInputServer = objcclass(NSObject, NSInputServiceProviderProtocol, NSInputServerMouseTrackerProtocol)
   private
   private
-    __name: NSString;
-    __delegate: id;
+    _name: NSString;
+    _delegate: id;
     
     
   public
   public
     class function alloc: NSInputServer; message 'alloc';
     class function alloc: NSInputServer; message 'alloc';
+
+    { Adopted Protocols }
+    procedure insertText_client(aString: id; sender: id);
+    procedure doCommandBySelector_client(aSelector: SEL; sender: id);
+    procedure markedTextAbandoned(sender: id);
+    procedure markedTextSelectionChanged_client(newSel: NSRange; sender: id);
+    procedure terminate(sender: id);
+    function canBeDisabled: Boolean;
+    function wantsToInterpretAllKeystrokes: Boolean;
+    function wantsToHandleMouseEvents: Boolean;
+    function wantsToDelayTextChangeNotifications: Boolean;
+    procedure inputClientBecomeActive(sender: id);
+    procedure inputClientResignActive(sender: id);
+    procedure inputClientEnabled(sender: id);
+    procedure inputClientDisabled(sender: id);
+    procedure activeConversationWillChange_fromOldConversation(sender: id; oldConversation: NSInteger);
+    procedure activeConversationChanged_toNewConversation(sender: id; newConversation: NSInteger);
+    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): Boolean;
+    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): Boolean;
+    procedure mouseUpOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id);
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}
@@ -60,28 +81,28 @@
   
   
 { NSInputServiceProvider Protocol }
 { NSInputServiceProvider Protocol }
   NSInputServiceProviderProtocol = objcprotocol
   NSInputServiceProviderProtocol = objcprotocol
-    procedure insertText_client(aString: id; sender: id); message 'insertText:client:';
-    procedure doCommandBySelector_client(aSelector: SEL; sender: id); message 'doCommandBySelector:client:';
-    procedure markedTextAbandoned(sender: id); message 'markedTextAbandoned:';
-    procedure markedTextSelectionChanged_client(newSel: NSRange; sender: id); message 'markedTextSelectionChanged:client:';
-    procedure terminate(sender: id); message 'terminate:';
-    function canBeDisabled: Boolean; message 'canBeDisabled';
-    function wantsToInterpretAllKeystrokes: Boolean; message 'wantsToInterpretAllKeystrokes';
-    function wantsToHandleMouseEvents: Boolean; message 'wantsToHandleMouseEvents';
-    function wantsToDelayTextChangeNotifications: Boolean; message 'wantsToDelayTextChangeNotifications';
-    procedure inputClientBecomeActive(sender: id); message 'inputClientBecomeActive:';
-    procedure inputClientResignActive(sender: id); message 'inputClientResignActive:';
-    procedure inputClientEnabled(sender: id); message 'inputClientEnabled:';
-    procedure inputClientDisabled(sender: id); message 'inputClientDisabled:';
-    procedure activeConversationWillChange_fromOldConversation(sender: id; oldConversation: NSInteger); message 'activeConversationWillChange:fromOldConversation:';
-    procedure activeConversationChanged_toNewConversation(sender: id; newConversation: NSInteger); message 'activeConversationChanged:toNewConversation:';
+    procedure insertText_client(aString: id; sender: id); message 'insertText:client:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure doCommandBySelector_client(aSelector: SEL; sender: id); message 'doCommandBySelector:client:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure markedTextAbandoned(sender: id); message 'markedTextAbandoned:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure markedTextSelectionChanged_client(newSel: NSRange; sender: id); message 'markedTextSelectionChanged:client:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure terminate(sender: id); message 'terminate:'; deprecated 'in Mac OS X 10.6 and later';
+    function canBeDisabled: Boolean; message 'canBeDisabled'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToInterpretAllKeystrokes: Boolean; message 'wantsToInterpretAllKeystrokes'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToHandleMouseEvents: Boolean; message 'wantsToHandleMouseEvents'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToDelayTextChangeNotifications: Boolean; message 'wantsToDelayTextChangeNotifications'; deprecated 'in Mac OS X 10.6 and later';
+    procedure inputClientBecomeActive(sender: id); message 'inputClientBecomeActive:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure inputClientResignActive(sender: id); message 'inputClientResignActive:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure inputClientEnabled(sender: id); message 'inputClientEnabled:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure inputClientDisabled(sender: id); message 'inputClientDisabled:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure activeConversationWillChange_fromOldConversation(sender: id; oldConversation: NSInteger); message 'activeConversationWillChange:fromOldConversation:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure activeConversationChanged_toNewConversation(sender: id; newConversation: NSInteger); message 'activeConversationChanged:toNewConversation:'; deprecated 'in Mac OS X 10.6 and later';
   end; external name 'NSInputServiceProvider';
   end; external name 'NSInputServiceProvider';
   
   
 { NSInputServerMouseTracker Protocol }
 { NSInputServerMouseTracker Protocol }
   NSInputServerMouseTrackerProtocol = objcprotocol
   NSInputServerMouseTrackerProtocol = objcprotocol
-    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): Boolean; message 'mouseDownOnCharacterIndex:atCoordinate:withModifier:client:';
-    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): Boolean; message 'mouseDraggedOnCharacterIndex:atCoordinate:withModifier:client:';
-    procedure mouseUpOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id); message 'mouseUpOnCharacterIndex:atCoordinate:withModifier:client:';
+    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): Boolean; message 'mouseDownOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
+    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): Boolean; message 'mouseDraggedOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
+    procedure mouseUpOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id); message 'mouseUpOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
   end; external name 'NSInputServerMouseTracker';
   end; external name 'NSInputServerMouseTracker';
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 21 - 3
packages/cocoaint/src/appkit/NSInterfaceStyle.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSInterfaceStyle.h }
 { Parsed from Appkit.framework NSInterfaceStyle.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -17,6 +17,7 @@ const
 { Types }
 { Types }
 type
 type
   NSInterfaceStyle = NSUInteger;
   NSInterfaceStyle = NSUInteger;
+  NSInterfaceStylePtr = ^NSInterfaceStyle;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -33,7 +34,7 @@ type
 {$define NSINTERFACESTYLE_PAS_F}
 {$define NSINTERFACESTYLE_PAS_F}
 
 
 { Functions }
 { Functions }
-function NSInterfaceStyleForKey(keyPointer: NSString; responderPointer: NSResponder): NSInterfaceStyle; cdecl; external name 'NSInterfaceStyleForKey';
+function NSInterfaceStyleForKey(key: NSString; responder: NSResponder): NSInterfaceStyle; cdecl; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -44,7 +45,24 @@ function NSInterfaceStyleForKey(keyPointer: NSString; responderPointer: NSRespon
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSInterfaceStyleDefault: NSString; external name '_NSInterfaceStyleDefault';
+  NSInterfaceStyleDefault: NSString; cvar; external;
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSINTERFACESTYLE_PAS_C}
+{$define NSINTERFACESTYLE_PAS_C}
+
+{ NSInterfaceStyleCategory }
+  NSInterfaceStyleCategory = objccategory(NSResponder)
+    function interfaceStyle: NSInterfaceStyle; message 'interfaceStyle';
+    procedure setInterfaceStyle(interfaceStyle: NSInterfaceStyle); message 'setInterfaceStyle:';
+  end; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 153 - 112
packages/cocoaint/src/appkit/NSKeyValueBinding.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSKeyValueBinding.h }
 { Parsed from Appkit.framework NSKeyValueBinding.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -21,7 +21,7 @@
 {$define NSKEYVALUEBINDING_PAS_F}
 {$define NSKEYVALUEBINDING_PAS_F}
 
 
 { Functions }
 { Functions }
-function NSIsControllerMarker(object_: id): Boolean; cdecl; external name 'NSIsControllerMarker';
+function NSIsControllerMarker(object_: id): Boolean; cdecl; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -32,119 +32,160 @@ function NSIsControllerMarker(object_: id): Boolean; cdecl; external name 'NSIsC
 
 
 { External symbols }
 { External symbols }
 var
 var
-  NSMultipleValuesMarker: id; external name '_NSMultipleValuesMarker';
-  NSNoSelectionMarker: id; external name '_NSNoSelectionMarker';
-  NSNotApplicableMarker: id; external name '_NSNotApplicableMarker';
+  NSMultipleValuesMarker: id; cvar; external;
+  NSNoSelectionMarker: id; cvar; external;
+  NSNotApplicableMarker: id; cvar; external;
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSObservedObjectKey: NSString; external name '_NSObservedObjectKey';
-  NSObservedKeyPathKey: NSString; external name '_NSObservedKeyPathKey';
-  NSOptionsKey: NSString; external name '_NSOptionsKey';
-  NSAlignmentBinding: NSString; external name '_NSAlignmentBinding';
-  NSAlternateImageBinding: NSString; external name '_NSAlternateImageBinding';
-  NSAlternateTitleBinding: NSString; external name '_NSAlternateTitleBinding';
-  NSAnimateBinding: NSString; external name '_NSAnimateBinding';
-  NSAnimationDelayBinding: NSString; external name '_NSAnimationDelayBinding';
-  NSArgumentBinding: NSString; external name '_NSArgumentBinding';
-  NSAttributedStringBinding: NSString; external name '_NSAttributedStringBinding';
-  NSContentArrayBinding: NSString; external name '_NSContentArrayBinding';
-  NSContentArrayForMultipleSelectionBinding: NSString; external name '_NSContentArrayForMultipleSelectionBinding';
-  NSContentBinding: NSString; external name '_NSContentBinding';
-  NSContentDictionaryBinding: NSString; external name '_NSContentDictionaryBinding';
-  NSContentHeightBinding: NSString; external name '_NSContentHeightBinding';
-  NSContentObjectBinding: NSString; external name '_NSContentObjectBinding';
-  NSContentObjectsBinding: NSString; external name '_NSContentObjectsBinding';
-  NSContentSetBinding: NSString; external name '_NSContentSetBinding';
-  NSContentValuesBinding: NSString; external name '_NSContentValuesBinding';
-  NSContentWidthBinding: NSString; external name '_NSContentWidthBinding';
-  NSCriticalValueBinding: NSString; external name '_NSCriticalValueBinding';
-  NSDataBinding: NSString; external name '_NSDataBinding';
-  NSDisplayPatternTitleBinding: NSString; external name '_NSDisplayPatternTitleBinding';
-  NSDisplayPatternValueBinding: NSString; external name '_NSDisplayPatternValueBinding';
-  NSDocumentEditedBinding: NSString; external name '_NSDocumentEditedBinding';
-  NSDoubleClickArgumentBinding: NSString; external name '_NSDoubleClickArgumentBinding';
-  NSDoubleClickTargetBinding: NSString; external name '_NSDoubleClickTargetBinding';
-  NSEditableBinding: NSString; external name '_NSEditableBinding';
-  NSEnabledBinding: NSString; external name '_NSEnabledBinding';
-  NSExcludedKeysBinding: NSString; external name '_NSExcludedKeysBinding';
-  NSFilterPredicateBinding: NSString; external name '_NSFilterPredicateBinding';
-  NSFontBinding: NSString; external name '_NSFontBinding';
-  NSFontBoldBinding: NSString; external name '_NSFontBoldBinding';
-  NSFontFamilyNameBinding: NSString; external name '_NSFontFamilyNameBinding';
-  NSFontItalicBinding: NSString; external name '_NSFontItalicBinding';
-  NSFontNameBinding: NSString; external name '_NSFontNameBinding';
-  NSFontSizeBinding: NSString; external name '_NSFontSizeBinding';
-  NSHeaderTitleBinding: NSString; external name '_NSHeaderTitleBinding';
-  NSHiddenBinding: NSString; external name '_NSHiddenBinding';
-  NSImageBinding: NSString; external name '_NSImageBinding';
-  NSIncludedKeysBinding: NSString; external name '_NSIncludedKeysBinding';
-  NSInitialKeyBinding: NSString; external name '_NSInitialKeyBinding';
-  NSInitialValueBinding: NSString; external name '_NSInitialValueBinding';
-  NSIsIndeterminateBinding: NSString; external name '_NSIsIndeterminateBinding';
-  NSLabelBinding: NSString; external name '_NSLabelBinding';
-  NSLocalizedKeyDictionaryBinding: NSString; external name '_NSLocalizedKeyDictionaryBinding';
-  NSManagedObjectContextBinding: NSString; external name '_NSManagedObjectContextBinding';
-  NSMaximumRecentsBinding: NSString; external name '_NSMaximumRecentsBinding';
-  NSMaxValueBinding: NSString; external name '_NSMaxValueBinding';
-  NSMaxWidthBinding: NSString; external name '_NSMaxWidthBinding';
-  NSMinValueBinding: NSString; external name '_NSMinValueBinding';
-  NSMinWidthBinding: NSString; external name '_NSMinWidthBinding';
-  NSMixedStateImageBinding: NSString; external name '_NSMixedStateImageBinding';
-  NSOffStateImageBinding: NSString; external name '_NSOffStateImageBinding';
-  NSOnStateImageBinding: NSString; external name '_NSOnStateImageBinding';
-  NSPredicateBinding: NSString; external name '_NSPredicateBinding';
-  NSRecentSearchesBinding: NSString; external name '_NSRecentSearchesBinding';
-  NSRepresentedFilenameBinding: NSString; external name '_NSRepresentedFilenameBinding';
-  NSRowHeightBinding: NSString; external name '_NSRowHeightBinding';
-  NSSelectedIdentifierBinding: NSString; external name '_NSSelectedIdentifierBinding';
-  NSSelectedIndexBinding: NSString; external name '_NSSelectedIndexBinding';
-  NSSelectedLabelBinding: NSString; external name '_NSSelectedLabelBinding';
-  NSSelectedObjectBinding: NSString; external name '_NSSelectedObjectBinding';
-  NSSelectedObjectsBinding: NSString; external name '_NSSelectedObjectsBinding';
-  NSSelectedTagBinding: NSString; external name '_NSSelectedTagBinding';
-  NSSelectedValueBinding: NSString; external name '_NSSelectedValueBinding';
-  NSSelectedValuesBinding: NSString; external name '_NSSelectedValuesBinding';
-  NSSelectionIndexesBinding: NSString; external name '_NSSelectionIndexesBinding';
-  NSSelectionIndexPathsBinding: NSString; external name '_NSSelectionIndexPathsBinding';
-  NSSortDescriptorsBinding: NSString; external name '_NSSortDescriptorsBinding';
-  NSTargetBinding: NSString; external name '_NSTargetBinding';
-  NSTextColorBinding: NSString; external name '_NSTextColorBinding';
-  NSTitleBinding: NSString; external name '_NSTitleBinding';
-  NSToolTipBinding: NSString; external name '_NSToolTipBinding';
-  NSTransparentBinding: NSString; external name '_NSTransparentBinding';
-  NSValueBinding: NSString; external name '_NSValueBinding';
-  NSValuePathBinding: NSString; external name '_NSValuePathBinding';
-  NSValueURLBinding: NSString; external name '_NSValueURLBinding';
-  NSVisibleBinding: NSString; external name '_NSVisibleBinding';
-  NSWarningValueBinding: NSString; external name '_NSWarningValueBinding';
-  NSWidthBinding: NSString; external name '_NSWidthBinding';
-  NSAllowsEditingMultipleValuesSelectionBindingOption: NSString; external name '_NSAllowsEditingMultipleValuesSelectionBindingOption';
-  NSAllowsNullArgumentBindingOption: NSString; external name '_NSAllowsNullArgumentBindingOption';
-  NSAlwaysPresentsApplicationModalAlertsBindingOption: NSString; external name '_NSAlwaysPresentsApplicationModalAlertsBindingOption';
-  NSConditionallySetsEditableBindingOption: NSString; external name '_NSConditionallySetsEditableBindingOption';
-  NSConditionallySetsEnabledBindingOption: NSString; external name '_NSConditionallySetsEnabledBindingOption';
-  NSConditionallySetsHiddenBindingOption: NSString; external name '_NSConditionallySetsHiddenBindingOption';
-  NSContinuouslyUpdatesValueBindingOption: NSString; external name '_NSContinuouslyUpdatesValueBindingOption';
-  NSCreatesSortDescriptorBindingOption: NSString; external name '_NSCreatesSortDescriptorBindingOption';
-  NSDeletesObjectsOnRemoveBindingsOption: NSString; external name '_NSDeletesObjectsOnRemoveBindingsOption';
-  NSDisplayNameBindingOption: NSString; external name '_NSDisplayNameBindingOption';
-  NSDisplayPatternBindingOption: NSString; external name '_NSDisplayPatternBindingOption';
-  NSContentPlacementTagBindingOption: NSString; external name '_NSContentPlacementTagBindingOption';
-  NSHandlesContentAsCompoundValueBindingOption: NSString; external name '_NSHandlesContentAsCompoundValueBindingOption';
-  NSInsertsNullPlaceholderBindingOption: NSString; external name '_NSInsertsNullPlaceholderBindingOption';
-  NSInvokesSeparatelyWithArrayObjectsBindingOption: NSString; external name '_NSInvokesSeparatelyWithArrayObjectsBindingOption';
-  NSMultipleValuesPlaceholderBindingOption: NSString; external name '_NSMultipleValuesPlaceholderBindingOption';
-  NSNoSelectionPlaceholderBindingOption: NSString; external name '_NSNoSelectionPlaceholderBindingOption';
-  NSNotApplicablePlaceholderBindingOption: NSString; external name '_NSNotApplicablePlaceholderBindingOption';
-  NSNullPlaceholderBindingOption: NSString; external name '_NSNullPlaceholderBindingOption';
-  NSRaisesForNotApplicableKeysBindingOption: NSString; external name '_NSRaisesForNotApplicableKeysBindingOption';
-  NSPredicateFormatBindingOption: NSString; external name '_NSPredicateFormatBindingOption';
-  NSSelectorNameBindingOption: NSString; external name '_NSSelectorNameBindingOption';
-  NSSelectsAllWhenSettingContentBindingOption: NSString; external name '_NSSelectsAllWhenSettingContentBindingOption';
-  NSValidatesImmediatelyBindingOption: NSString; external name '_NSValidatesImmediatelyBindingOption';
-  NSValueTransformerNameBindingOption: NSString; external name '_NSValueTransformerNameBindingOption';
-  NSValueTransformerBindingOption: NSString; external name '_NSValueTransformerBindingOption';
+  NSObservedObjectKey: NSString; cvar; external;
+  NSObservedKeyPathKey: NSString; cvar; external;
+  NSOptionsKey: NSString; cvar; external;
+  NSAlignmentBinding: NSString; cvar; external;
+  NSAlternateImageBinding: NSString; cvar; external;
+  NSAlternateTitleBinding: NSString; cvar; external;
+  NSAnimateBinding: NSString; cvar; external;
+  NSAnimationDelayBinding: NSString; cvar; external;
+  NSArgumentBinding: NSString; cvar; external;
+  NSAttributedStringBinding: NSString; cvar; external;
+  NSContentArrayBinding: NSString; cvar; external;
+  NSContentArrayForMultipleSelectionBinding: NSString; cvar; external;
+  NSContentBinding: NSString; cvar; external;
+  NSContentDictionaryBinding: NSString; cvar; external;
+  NSContentHeightBinding: NSString; cvar; external;
+  NSContentObjectBinding: NSString; cvar; external;
+  NSContentObjectsBinding: NSString; cvar; external;
+  NSContentSetBinding: NSString; cvar; external;
+  NSContentValuesBinding: NSString; cvar; external;
+  NSContentWidthBinding: NSString; cvar; external;
+  NSCriticalValueBinding: NSString; cvar; external;
+  NSDataBinding: NSString; cvar; external;
+  NSDisplayPatternTitleBinding: NSString; cvar; external;
+  NSDisplayPatternValueBinding: NSString; cvar; external;
+  NSDocumentEditedBinding: NSString; cvar; external;
+  NSDoubleClickArgumentBinding: NSString; cvar; external;
+  NSDoubleClickTargetBinding: NSString; cvar; external;
+  NSEditableBinding: NSString; cvar; external;
+  NSEnabledBinding: NSString; cvar; external;
+  NSExcludedKeysBinding: NSString; cvar; external;
+  NSFilterPredicateBinding: NSString; cvar; external;
+  NSFontBinding: NSString; cvar; external;
+  NSFontBoldBinding: NSString; cvar; external;
+  NSFontFamilyNameBinding: NSString; cvar; external;
+  NSFontItalicBinding: NSString; cvar; external;
+  NSFontNameBinding: NSString; cvar; external;
+  NSFontSizeBinding: NSString; cvar; external;
+  NSHeaderTitleBinding: NSString; cvar; external;
+  NSHiddenBinding: NSString; cvar; external;
+  NSImageBinding: NSString; cvar; external;
+  NSIncludedKeysBinding: NSString; cvar; external;
+  NSInitialKeyBinding: NSString; cvar; external;
+  NSInitialValueBinding: NSString; cvar; external;
+  NSIsIndeterminateBinding: NSString; cvar; external;
+  NSLabelBinding: NSString; cvar; external;
+  NSLocalizedKeyDictionaryBinding: NSString; cvar; external;
+  NSManagedObjectContextBinding: NSString; cvar; external;
+  NSMaximumRecentsBinding: NSString; cvar; external;
+  NSMaxValueBinding: NSString; cvar; external;
+  NSMaxWidthBinding: NSString; cvar; external;
+  NSMinValueBinding: NSString; cvar; external;
+  NSMinWidthBinding: NSString; cvar; external;
+  NSMixedStateImageBinding: NSString; cvar; external;
+  NSOffStateImageBinding: NSString; cvar; external;
+  NSOnStateImageBinding: NSString; cvar; external;
+  NSPredicateBinding: NSString; cvar; external;
+  NSRecentSearchesBinding: NSString; cvar; external;
+  NSRepresentedFilenameBinding: NSString; cvar; external;
+  NSRowHeightBinding: NSString; cvar; external;
+  NSSelectedIdentifierBinding: NSString; cvar; external;
+  NSSelectedIndexBinding: NSString; cvar; external;
+  NSSelectedLabelBinding: NSString; cvar; external;
+  NSSelectedObjectBinding: NSString; cvar; external;
+  NSSelectedObjectsBinding: NSString; cvar; external;
+  NSSelectedTagBinding: NSString; cvar; external;
+  NSSelectedValueBinding: NSString; cvar; external;
+  NSSelectedValuesBinding: NSString; cvar; external;
+  NSSelectionIndexesBinding: NSString; cvar; external;
+  NSSelectionIndexPathsBinding: NSString; cvar; external;
+  NSSortDescriptorsBinding: NSString; cvar; external;
+  NSTargetBinding: NSString; cvar; external;
+  NSTextColorBinding: NSString; cvar; external;
+  NSTitleBinding: NSString; cvar; external;
+  NSToolTipBinding: NSString; cvar; external;
+  NSTransparentBinding: NSString; cvar; external;
+  NSValueBinding: NSString; cvar; external;
+  NSValuePathBinding: NSString; cvar; external;
+  NSValueURLBinding: NSString; cvar; external;
+  NSVisibleBinding: NSString; cvar; external;
+  NSWarningValueBinding: NSString; cvar; external;
+  NSWidthBinding: NSString; cvar; external;
+  NSAllowsEditingMultipleValuesSelectionBindingOption: NSString; cvar; external;
+  NSAllowsNullArgumentBindingOption: NSString; cvar; external;
+  NSAlwaysPresentsApplicationModalAlertsBindingOption: NSString; cvar; external;
+  NSConditionallySetsEditableBindingOption: NSString; cvar; external;
+  NSConditionallySetsEnabledBindingOption: NSString; cvar; external;
+  NSConditionallySetsHiddenBindingOption: NSString; cvar; external;
+  NSContinuouslyUpdatesValueBindingOption: NSString; cvar; external;
+  NSCreatesSortDescriptorBindingOption: NSString; cvar; external;
+  NSDeletesObjectsOnRemoveBindingsOption: NSString; cvar; external;
+  NSDisplayNameBindingOption: NSString; cvar; external;
+  NSDisplayPatternBindingOption: NSString; cvar; external;
+  NSContentPlacementTagBindingOption: NSString; cvar; external;
+  NSHandlesContentAsCompoundValueBindingOption: NSString; cvar; external;
+  NSInsertsNullPlaceholderBindingOption: NSString; cvar; external;
+  NSInvokesSeparatelyWithArrayObjectsBindingOption: NSString; cvar; external;
+  NSMultipleValuesPlaceholderBindingOption: NSString; cvar; external;
+  NSNoSelectionPlaceholderBindingOption: NSString; cvar; external;
+  NSNotApplicablePlaceholderBindingOption: NSString; cvar; external;
+  NSNullPlaceholderBindingOption: NSString; cvar; external;
+  NSRaisesForNotApplicableKeysBindingOption: NSString; cvar; external;
+  NSPredicateFormatBindingOption: NSString; cvar; external;
+  NSSelectorNameBindingOption: NSString; cvar; external;
+  NSSelectsAllWhenSettingContentBindingOption: NSString; cvar; external;
+  NSValidatesImmediatelyBindingOption: NSString; cvar; external;
+  NSValueTransformerNameBindingOption: NSString; cvar; external;
+  NSValueTransformerBindingOption: NSString; cvar; external;
+
+{$endif}
+{$endif}
+
+{$ifdef FORWARD}
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSKEYVALUEBINDING_PAS_C}
+{$define NSKEYVALUEBINDING_PAS_C}
+
+{ NSKeyValueBindingCreationCategory }
+  NSKeyValueBindingCreationCategory = objccategory(NSObject)
+    class procedure exposeBinding(binding: NSString); message 'exposeBinding:';
+    function exposedBindings: NSArray; message 'exposedBindings';
+    function valueClassForBinding(binding: NSString): Pobjc_class; message 'valueClassForBinding:';
+    procedure bind_toObject_withKeyPath_options(binding: NSString; observable: id; keyPath: NSString; options: NSDictionary); message 'bind:toObject:withKeyPath:options:';
+    procedure unbind(binding: NSString); message 'unbind:';
+    function infoForBinding(binding: NSString): NSDictionary; message 'infoForBinding:';
+    function optionDescriptionsForBinding(aBinding: NSString): NSArray; message 'optionDescriptionsForBinding:';
+  end; external;
+
+{ NSPlaceholdersCategory }
+  NSPlaceholdersCategory = objccategory(NSObject)
+    class procedure setDefaultPlaceholder_forMarker_withBinding(placeholder: id; marker: id; binding: NSString); message 'setDefaultPlaceholder:forMarker:withBinding:';
+    class function defaultPlaceholderForMarker_withBinding(marker: id; binding: NSString): id; message 'defaultPlaceholderForMarker:withBinding:';
+  end; external;
+
+{ NSEditorRegistrationCategory }
+  NSEditorRegistrationCategory = objccategory(NSObject)
+    procedure objectDidBeginEditing(editor: id); message 'objectDidBeginEditing:';
+    procedure objectDidEndEditing(editor: id); message 'objectDidEndEditing:';
+  end; external;
+
+{ NSEditorCategory }
+  NSEditorCategory = objccategory(NSObject)
+    procedure discardEditing; message 'discardEditing';
+    function commitEditing: Boolean; message 'commitEditing';
+    procedure commitEditingWithDelegate_didCommitSelector_contextInfo(delegate: id; didCommitSelector: SEL; contextInfo: Pointer); message 'commitEditingWithDelegate:didCommitSelector:contextInfo:';
+  end; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 85 - 57
packages/cocoaint/src/appkit/NSLayoutManager.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSLayoutManager.h }
 { Parsed from Appkit.framework NSLayoutManager.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -32,7 +32,9 @@ const
 { Types }
 { Types }
 type
 type
   NSGlyphInscription = NSUInteger;
   NSGlyphInscription = NSUInteger;
+  NSGlyphInscriptionPtr = ^NSGlyphInscription;
   NSTypesetterBehavior = NSInteger;
   NSTypesetterBehavior = NSInteger;
+  NSTypesetterBehaviorPtr = ^NSTypesetterBehavior;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -59,8 +61,10 @@ type
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSLayoutManagerDelegateProtocol = objcprotocol;
   NSLayoutManager = objcclass;
   NSLayoutManager = objcclass;
   NSLayoutManagerPointer = ^NSLayoutManager;
   NSLayoutManagerPointer = ^NSLayoutManager;
+  NSLayoutManagerPtr = NSLayoutManagerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -71,25 +75,28 @@ type
 { NSLayoutManager }
 { NSLayoutManager }
   NSLayoutManager = objcclass(NSObject, NSCodingProtocol)
   NSLayoutManager = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __textStorage: NSTextStorage;
-    __glyphGenerator: NSGlyphGenerator;
-    __typesetter: NSTypesetter;
-    __textContainers: NSMutableArray;
-    __containerUsedRects: NSStorage;
-    __glyphs: NSStorage;
-    __containerRuns: NSRunStorage;
-    __fragmentRuns: NSRunStorage;
-    __glyphLocations: NSRunStorage;
-    __glyphRotationRuns: NSRunStorage;
-    __extraLineFragmentRect: NSRect;
-    __extraLineFragmentUsedRect: NSRect;
-    __extraLineFragmentContainer: NSTextContainer;
-    __glyphHoles: NSSortedArray;
-    __layoutHoles: NSSortedArray;
+    _textStorage: NSTextStorage;
+    _glyphGenerator: NSGlyphGenerator;
+    _typesetter: NSTypesetter;
+    _textContainers: NSMutableArray;
+    _containerUsedRects: NSStorage;
+    _glyphs: NSStorage;
+    _containerRuns: NSRunStorage;
+    _fragmentRuns: NSRunStorage;
+    _glyphLocations: NSRunStorage;
+    _glyphRotationRuns: NSRunStorage;
+    _extraLineFragmentRect: NSRect;
+    _extraLineFragmentUsedRect: NSRect;
+    _extraLineFragmentContainer: NSTextContainer;
+    _glyphHoles: NSSortedArray;
+    _layoutHoles: NSSortedArray;
     __lmFlags: bitpacked record
     __lmFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSLayoutManager0: cuint);
+       1: (
         containersAreFull: 0..1;
         containersAreFull: 0..1;
         glyphsMightDrawOutsideLines: 0..1;
         glyphsMightDrawOutsideLines: 0..1;
-        backgroundLayoutEnabled: 0..1;
+        _backgroundLayoutEnabled: 0..1;
         resizingInProgress: 0..1;
         resizingInProgress: 0..1;
         allowScreenFonts: 0..1;
         allowScreenFonts: 0..1;
         cachedRectArrayInUse: 0..1;
         cachedRectArrayInUse: 0..1;
@@ -109,7 +116,7 @@ type
         hasNonGeneratedGlyphData: 0..1;
         hasNonGeneratedGlyphData: 0..1;
         loggedBGLayoutException: 0..1;
         loggedBGLayoutException: 0..1;
         isLayoutRequestedFromSubthread: 0..1;
         isLayoutRequestedFromSubthread: 0..1;
-        defaultAttachmentScaling: 0..((1 shl 2)-1);
+        _defaultAttachmentScaling: 0..((1 shl 2)-1);
         isInUILayoutMode: 0..1;
         isInUILayoutMode: 0..1;
         seenRightToLeft: 0..1;
         seenRightToLeft: 0..1;
         ignoresViewTransformations: 0..1;
         ignoresViewTransformations: 0..1;
@@ -117,34 +124,35 @@ type
         flipsIfNeeded: 0..1;
         flipsIfNeeded: 0..1;
         allowNonContig: 0..1;
         allowNonContig: 0..1;
         useNonContig: 0..1;
         useNonContig: 0..1;
+      );
       end;
       end;
-    __delegate: id;
-    __textViewResizeDisableStack: cushort;
-    __displayInvalidationDisableStack: cushort;
-    __deferredDisplayCharRange: NSRange;
-    __firstTextView: NSTextView;
-    __cachedRectArray: NSRect; {garbage collector: __strong }
-    __cachedRectArrayCapacity: NSUInteger;
-    __glyphBuffer: char; {garbage collector: __strong }
-    __glyphBufferSize: NSUInteger;
-    __cachedLocationNominalGlyphRange: NSRange;
-    __cachedLocationGlyphIndex: NSUInteger;
-    __cachedLocation: NSPoint;
-    __cachedFontCharRange: NSRange;
-    __cachedFont: NSFont;
-    __firstUnlaidGlyphIndex: NSUInteger;
-    __firstUnlaidCharIndex: NSUInteger;
-    __rulerAccView: NSBox;
-    __rulerAccViewAlignmentButtons: id;
-    __rulerAccViewSpacing: id;
-    __rulerAccViewLeftTabWell: NSTabWell;
-    __rulerAccViewRightTabWell: NSTabWell;
-    __rulerAccViewCenterTabWell: NSTabWell;
-    __rulerAccViewDecimalTabWell: NSTabWell;
-    __rulerAccViewStyles: id;
-    __rulerAccViewLists: id;
-    __newlyFilledGlyphRange: NSRange;
-    __extraData: id;
+    _delegate: id;
+    _textViewResizeDisableStack: cushort;
+    _displayInvalidationDisableStack: cushort;
+    _deferredDisplayCharRange: NSRange;
+    _firstTextView: NSTextView;
+    _cachedRectArray: NSRectPtr; {garbage collector: __strong }
+    _cachedRectArrayCapacity: NSUInteger;
+    _glyphBuffer: PChar; {garbage collector: __strong }
+    _glyphBufferSize: NSUInteger;
+    _cachedLocationNominalGlyphRange: NSRange;
+    _cachedLocationGlyphIndex: NSUInteger;
+    _cachedLocation: NSPoint;
+    _cachedFontCharRange: NSRange;
+    _cachedFont: NSFont;
+    _firstUnlaidGlyphIndex: NSUInteger;
+    _firstUnlaidCharIndex: NSUInteger;
+    _rulerAccView: NSBox;
+    _rulerAccViewAlignmentButtons: id;
+    _rulerAccViewSpacing: id;
+    _rulerAccViewLeftTabWell: NSTabWell;
+    _rulerAccViewRightTabWell: NSTabWell;
+    _rulerAccViewCenterTabWell: NSTabWell;
+    _rulerAccViewDecimalTabWell: NSTabWell;
+    _rulerAccViewStyles: id;
+    _rulerAccViewLists: id;
+    _newlyFilledGlyphRange: NSRange;
+    _extraData: id;
     
     
   public
   public
     class function alloc: NSLayoutManager; message 'alloc';
     class function alloc: NSLayoutManager; message 'alloc';
@@ -196,7 +204,7 @@ type
     procedure ensureLayoutForGlyphRange(glyphRange: NSRange); message 'ensureLayoutForGlyphRange:';
     procedure ensureLayoutForGlyphRange(glyphRange: NSRange); message 'ensureLayoutForGlyphRange:';
     procedure ensureLayoutForTextContainer(container: NSTextContainer); message 'ensureLayoutForTextContainer:';
     procedure ensureLayoutForTextContainer(container: NSTextContainer); message 'ensureLayoutForTextContainer:';
     procedure ensureLayoutForBoundingRect_inTextContainer(bounds: NSRect; container: NSTextContainer); message 'ensureLayoutForBoundingRect:inTextContainer:';
     procedure ensureLayoutForBoundingRect_inTextContainer(bounds: NSRect; container: NSTextContainer); message 'ensureLayoutForBoundingRect:inTextContainer:';
-    procedure insertGlyphs_length_forStartingGlyphAtIndex_characterIndex(glyphs: NSGlyphPointer; length: NSUInteger; glyphIndex: NSUInteger; charIndex: NSUInteger); message 'insertGlyphs:length:forStartingGlyphAtIndex:characterIndex:';
+    procedure insertGlyphs_length_forStartingGlyphAtIndex_characterIndex(glyphs: NSGlyphPtr; length: NSUInteger; glyphIndex: NSUInteger; charIndex: NSUInteger); message 'insertGlyphs:length:forStartingGlyphAtIndex:characterIndex:';
     procedure insertGlyph_atGlyphIndex_characterIndex(glyph: NSGlyph; glyphIndex: NSUInteger; charIndex: NSUInteger); message 'insertGlyph:atGlyphIndex:characterIndex:';
     procedure insertGlyph_atGlyphIndex_characterIndex(glyph: NSGlyph; glyphIndex: NSUInteger; charIndex: NSUInteger); message 'insertGlyph:atGlyphIndex:characterIndex:';
     procedure replaceGlyphAtIndex_withGlyph(glyphIndex: NSUInteger; newGlyph: NSGlyph); message 'replaceGlyphAtIndex:withGlyph:';
     procedure replaceGlyphAtIndex_withGlyph(glyphIndex: NSUInteger; newGlyph: NSGlyph); message 'replaceGlyphAtIndex:withGlyph:';
     procedure deleteGlyphsInRange(glyphRange: NSRange); message 'deleteGlyphsInRange:';
     procedure deleteGlyphsInRange(glyphRange: NSRange); message 'deleteGlyphsInRange:';
@@ -210,18 +218,18 @@ type
     function characterIndexForGlyphAtIndex(glyphIndex: NSUInteger): NSUInteger; message 'characterIndexForGlyphAtIndex:';
     function characterIndexForGlyphAtIndex(glyphIndex: NSUInteger): NSUInteger; message 'characterIndexForGlyphAtIndex:';
     function glyphIndexForCharacterAtIndex(charIndex: NSUInteger): NSUInteger; message 'glyphIndexForCharacterAtIndex:';
     function glyphIndexForCharacterAtIndex(charIndex: NSUInteger): NSUInteger; message 'glyphIndexForCharacterAtIndex:';
     function intAttribute_forGlyphAtIndex(attributeTag: NSInteger; glyphIndex: NSUInteger): NSInteger; message 'intAttribute:forGlyphAtIndex:';
     function intAttribute_forGlyphAtIndex(attributeTag: NSInteger; glyphIndex: NSUInteger): NSInteger; message 'intAttribute:forGlyphAtIndex:';
-    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphRange: NSRange; glyphBuffer: NSGlyphPointer; charIndexBuffer: NSUIntegerPointer; inscribeBuffer: NSGlyphInscriptionPointer; elasticBuffer: pboolean): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
-    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits_bidiLevels(glyphRange: NSRange; glyphBuffer: NSGlyphPointer; charIndexBuffer: NSUIntegerPointer; inscribeBuffer: NSGlyphInscriptionPointer; elasticBuffer: pboolean; bidiLevelBuffer: Pointer): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:bidiLevels:';
-    function getGlyphs_range(glyphArray: NSGlyphPointer; glyphRange: NSRange): NSUInteger; message 'getGlyphs:range:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pboolean): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits_bidiLevels(glyphRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pboolean; bidiLevelBuffer: PByte): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:bidiLevels:';
+    function getGlyphs_range(glyphArray: NSGlyphPtr; glyphRange: NSRange): NSUInteger; message 'getGlyphs:range:';
     procedure setTextContainer_forGlyphRange(container: NSTextContainer; glyphRange: NSRange); message 'setTextContainer:forGlyphRange:';
     procedure setTextContainer_forGlyphRange(container: NSTextContainer; glyphRange: NSRange); message 'setTextContainer:forGlyphRange:';
     procedure setLineFragmentRect_forGlyphRange_usedRect(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect); message 'setLineFragmentRect:forGlyphRange:usedRect:';
     procedure setLineFragmentRect_forGlyphRange_usedRect(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect); message 'setLineFragmentRect:forGlyphRange:usedRect:';
     procedure setExtraLineFragmentRect_usedRect_textContainer(fragmentRect: NSRect; usedRect: NSRect; container: NSTextContainer); message 'setExtraLineFragmentRect:usedRect:textContainer:';
     procedure setExtraLineFragmentRect_usedRect_textContainer(fragmentRect: NSRect; usedRect: NSRect; container: NSTextContainer); message 'setExtraLineFragmentRect:usedRect:textContainer:';
     procedure setLocation_forStartOfGlyphRange(location: NSPoint; glyphRange: NSRange); message 'setLocation:forStartOfGlyphRange:';
     procedure setLocation_forStartOfGlyphRange(location: NSPoint; glyphRange: NSRange); message 'setLocation:forStartOfGlyphRange:';
-    procedure setLocations_startingGlyphIndexes_count_forGlyphRange(locations: NSPointArray; glyphIndexes: NSUIntegerPointer; count: NSUInteger; glyphRange: NSRange); message 'setLocations:startingGlyphIndexes:count:forGlyphRange:';
+    procedure setLocations_startingGlyphIndexes_count_forGlyphRange(locations: NSPointArray; glyphIndexes: NSUIntegerPtr; count: NSUInteger; glyphRange: NSRange); message 'setLocations:startingGlyphIndexes:count:forGlyphRange:';
     procedure setNotShownAttribute_forGlyphAtIndex(flag: Boolean; glyphIndex: NSUInteger); message 'setNotShownAttribute:forGlyphAtIndex:';
     procedure setNotShownAttribute_forGlyphAtIndex(flag: Boolean; glyphIndex: NSUInteger); message 'setNotShownAttribute:forGlyphAtIndex:';
     procedure setDrawsOutsideLineFragment_forGlyphAtIndex(flag: Boolean; glyphIndex: NSUInteger); message 'setDrawsOutsideLineFragment:forGlyphAtIndex:';
     procedure setDrawsOutsideLineFragment_forGlyphAtIndex(flag: Boolean; glyphIndex: NSUInteger); message 'setDrawsOutsideLineFragment:forGlyphAtIndex:';
     procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
     procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
-    procedure getFirstUnlaidCharacterIndex_glyphIndex(charIndex: NSUIntegerPointer; glyphIndex: NSUIntegerPointer); message 'getFirstUnlaidCharacterIndex:glyphIndex:';
+    procedure getFirstUnlaidCharacterIndex_glyphIndex(charIndex: NSUIntegerPtr; glyphIndex: NSUIntegerPtr); message 'getFirstUnlaidCharacterIndex:glyphIndex:';
     function firstUnlaidCharacterIndex: NSUInteger; message 'firstUnlaidCharacterIndex';
     function firstUnlaidCharacterIndex: NSUInteger; message 'firstUnlaidCharacterIndex';
     function firstUnlaidGlyphIndex: NSUInteger; message 'firstUnlaidGlyphIndex';
     function firstUnlaidGlyphIndex: NSUInteger; message 'firstUnlaidGlyphIndex';
     function textContainerForGlyphAtIndex_effectiveRange(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer): NSTextContainer; message 'textContainerForGlyphAtIndex:effectiveRange:';
     function textContainerForGlyphAtIndex_effectiveRange(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer): NSTextContainer; message 'textContainerForGlyphAtIndex:effectiveRange:';
@@ -248,15 +256,16 @@ type
     function characterRangeForGlyphRange_actualGlyphRange(glyphRange: NSRange; actualGlyphRange: NSRangePointer): NSRange; message 'characterRangeForGlyphRange:actualGlyphRange:';
     function characterRangeForGlyphRange_actualGlyphRange(glyphRange: NSRange; actualGlyphRange: NSRangePointer): NSRange; message 'characterRangeForGlyphRange:actualGlyphRange:';
     function glyphRangeForTextContainer(container: NSTextContainer): NSRange; message 'glyphRangeForTextContainer:';
     function glyphRangeForTextContainer(container: NSTextContainer): NSRange; message 'glyphRangeForTextContainer:';
     function rangeOfNominallySpacedGlyphsContainingIndex(glyphIndex: NSUInteger): NSRange; message 'rangeOfNominallySpacedGlyphsContainingIndex:';
     function rangeOfNominallySpacedGlyphsContainingIndex(glyphIndex: NSUInteger): NSRange; message 'rangeOfNominallySpacedGlyphsContainingIndex:';
-    function rectArrayForCharacterRange_withinSelectedCharacterRange_inTextContainer_rectCount(charRange: NSRange; selCharRange: NSRange; container: NSTextContainer; rectCount: NSUIntegerPointer): NSRectArray; message 'rectArrayForCharacterRange:withinSelectedCharacterRange:inTextContainer:rectCount:';
-    function rectArrayForGlyphRange_withinSelectedGlyphRange_inTextContainer_rectCount(glyphRange: NSRange; selGlyphRange: NSRange; container: NSTextContainer; rectCount: NSUIntegerPointer): NSRectArray; message 'rectArrayForGlyphRange:withinSelectedGlyphRange:inTextContainer:rectCount:';
+    function rectArrayForCharacterRange_withinSelectedCharacterRange_inTextContainer_rectCount(charRange: NSRange; selCharRange: NSRange; container: NSTextContainer; rectCount: NSUIntegerPtr): NSRectArray; message 'rectArrayForCharacterRange:withinSelectedCharacterRange:inTextContainer:rectCount:';
+    function rectArrayForGlyphRange_withinSelectedGlyphRange_inTextContainer_rectCount(glyphRange: NSRange; selGlyphRange: NSRange; container: NSTextContainer; rectCount: NSUIntegerPtr): NSRectArray; message 'rectArrayForGlyphRange:withinSelectedGlyphRange:inTextContainer:rectCount:';
     function boundingRectForGlyphRange_inTextContainer(glyphRange: NSRange; container: NSTextContainer): NSRect; message 'boundingRectForGlyphRange:inTextContainer:';
     function boundingRectForGlyphRange_inTextContainer(glyphRange: NSRange; container: NSTextContainer): NSRect; message 'boundingRectForGlyphRange:inTextContainer:';
     function glyphRangeForBoundingRect_inTextContainer(bounds: NSRect; container: NSTextContainer): NSRange; message 'glyphRangeForBoundingRect:inTextContainer:';
     function glyphRangeForBoundingRect_inTextContainer(bounds: NSRect; container: NSTextContainer): NSRange; message 'glyphRangeForBoundingRect:inTextContainer:';
     function glyphRangeForBoundingRectWithoutAdditionalLayout_inTextContainer(bounds: NSRect; container: NSTextContainer): NSRange; message 'glyphRangeForBoundingRectWithoutAdditionalLayout:inTextContainer:';
     function glyphRangeForBoundingRectWithoutAdditionalLayout_inTextContainer(bounds: NSRect; container: NSTextContainer): NSRange; message 'glyphRangeForBoundingRectWithoutAdditionalLayout:inTextContainer:';
-    function glyphIndexForPoint_inTextContainer_fractionOfDistanceThroughGlyph(point: NSPoint; container: NSTextContainer; partialFraction: psingle): NSUInteger; message 'glyphIndexForPoint:inTextContainer:fractionOfDistanceThroughGlyph:';
+    function glyphIndexForPoint_inTextContainer_fractionOfDistanceThroughGlyph(point: NSPoint; container: NSTextContainer; partialFraction: CGFloatPtr): NSUInteger; message 'glyphIndexForPoint:inTextContainer:fractionOfDistanceThroughGlyph:';
     function glyphIndexForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): NSUInteger; message 'glyphIndexForPoint:inTextContainer:';
     function glyphIndexForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): NSUInteger; message 'glyphIndexForPoint:inTextContainer:';
     function fractionOfDistanceThroughGlyphForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): CGFloat; message 'fractionOfDistanceThroughGlyphForPoint:inTextContainer:';
     function fractionOfDistanceThroughGlyphForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): CGFloat; message 'fractionOfDistanceThroughGlyphForPoint:inTextContainer:';
-    function getLineFragmentInsertionPointsForCharacterAtIndex_alternatePositions_inDisplayOrder_positions_characterIndexes(charIndex: NSUInteger; aFlag: Boolean; dFlag: Boolean; positions: psingle; charIndexes: NSUIntegerPointer): NSUInteger; message 'getLineFragmentInsertionPointsForCharacterAtIndex:alternatePositions:inDisplayOrder:positions:characterIndexes:';
+    function characterIndexForPoint_inTextContainer_fractionOfDistanceBetweenInsertionPoints(point: NSPoint; container: NSTextContainer; partialFraction: CGFloatPtr): NSUInteger; message 'characterIndexForPoint:inTextContainer:fractionOfDistanceBetweenInsertionPoints:';
+    function getLineFragmentInsertionPointsForCharacterAtIndex_alternatePositions_inDisplayOrder_positions_characterIndexes(charIndex: NSUInteger; aFlag: Boolean; dFlag: Boolean; positions: CGFloatPtr; charIndexes: NSUIntegerPtr): NSUInteger; message 'getLineFragmentInsertionPointsForCharacterAtIndex:alternatePositions:inDisplayOrder:positions:characterIndexes:';
     function temporaryAttributesAtCharacterIndex_effectiveRange(charIndex: NSUInteger; effectiveCharRange: NSRangePointer): NSDictionary; message 'temporaryAttributesAtCharacterIndex:effectiveRange:';
     function temporaryAttributesAtCharacterIndex_effectiveRange(charIndex: NSUInteger; effectiveCharRange: NSRangePointer): NSDictionary; message 'temporaryAttributesAtCharacterIndex:effectiveRange:';
     procedure setTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'setTemporaryAttributes:forCharacterRange:';
     procedure setTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'setTemporaryAttributes:forCharacterRange:';
     procedure addTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'addTemporaryAttributes:forCharacterRange:';
     procedure addTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'addTemporaryAttributes:forCharacterRange:';
@@ -271,7 +280,13 @@ type
     function usesFontLeading: Boolean; message 'usesFontLeading';
     function usesFontLeading: Boolean; message 'usesFontLeading';
     procedure setUsesFontLeading(flag: Boolean); message 'setUsesFontLeading:';
     procedure setUsesFontLeading(flag: Boolean); message 'setUsesFontLeading:';
 
 
-    { Category: NSTextViewSupport }
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSTextViewSupportCategory }
+  NSTextViewSupportCategory = objccategory(NSLayoutManager)
     function rulerMarkersForTextView_paragraphStyle_ruler(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView): NSArray; message 'rulerMarkersForTextView:paragraphStyle:ruler:';
     function rulerMarkersForTextView_paragraphStyle_ruler(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView): NSArray; message 'rulerMarkersForTextView:paragraphStyle:ruler:';
     function rulerAccessoryViewForTextView_paragraphStyle_ruler_enabled(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView; isEnabled: Boolean): NSView; message 'rulerAccessoryViewForTextView:paragraphStyle:ruler:enabled:';
     function rulerAccessoryViewForTextView_paragraphStyle_ruler_enabled(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView; isEnabled: Boolean): NSView; message 'rulerAccessoryViewForTextView:paragraphStyle:ruler:enabled:';
     function layoutManagerOwnsFirstResponderInWindow(window: NSWindow): Boolean; message 'layoutManagerOwnsFirstResponderInWindow:';
     function layoutManagerOwnsFirstResponderInWindow(window: NSWindow): Boolean; message 'layoutManagerOwnsFirstResponderInWindow:';
@@ -279,8 +294,9 @@ type
     function textViewForBeginningOfSelection: NSTextView; message 'textViewForBeginningOfSelection';
     function textViewForBeginningOfSelection: NSTextView; message 'textViewForBeginningOfSelection';
     procedure drawBackgroundForGlyphRange_atPoint(glyphsToShow: NSRange; origin: NSPoint); message 'drawBackgroundForGlyphRange:atPoint:';
     procedure drawBackgroundForGlyphRange_atPoint(glyphsToShow: NSRange; origin: NSPoint); message 'drawBackgroundForGlyphRange:atPoint:';
     procedure drawGlyphsForGlyphRange_atPoint(glyphsToShow: NSRange; origin: NSPoint); message 'drawGlyphsForGlyphRange:atPoint:';
     procedure drawGlyphsForGlyphRange_atPoint(glyphsToShow: NSRange; origin: NSPoint); message 'drawGlyphsForGlyphRange:atPoint:';
-    procedure showPackedGlyphs_length_glyphRange_atPoint_font_color_printingAdjustment(glyphs: Pointer; glyphLen: NSUInteger; glyphRange: NSRange; point: NSPoint; font: NSFont; color: NSColor; printingAdjustment: NSSize); message 'showPackedGlyphs:length:glyphRange:atPoint:font:color:printingAdjustment:';
+    procedure showPackedGlyphs_length_glyphRange_atPoint_font_color_printingAdjustment(glyphs: PChar; glyphLen: NSUInteger; glyphRange: NSRange; point: NSPoint; font: NSFont; color: NSColor; printingAdjustment: NSSize); message 'showPackedGlyphs:length:glyphRange:atPoint:font:color:printingAdjustment:';
     procedure showAttachmentCell_inRect_characterIndex(cell: NSCell; rect: NSRect; attachmentIndex: NSUInteger); message 'showAttachmentCell:inRect:characterIndex:';
     procedure showAttachmentCell_inRect_characterIndex(cell: NSCell; rect: NSRect; attachmentIndex: NSUInteger); message 'showAttachmentCell:inRect:characterIndex:';
+    procedure fillBackgroundRectArray_count_forCharacterRange_color(rectArray: NSRectArray; rectCount: NSUInteger; charRange: NSRange; color: NSColor); message 'fillBackgroundRectArray:count:forCharacterRange:color:';
     procedure drawUnderlineForGlyphRange_underlineType_baselineOffset_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; underlineVal: NSInteger; baselineOffset: CGFloat; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'drawUnderlineForGlyphRange:underlineType:baselineOffset:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
     procedure drawUnderlineForGlyphRange_underlineType_baselineOffset_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; underlineVal: NSInteger; baselineOffset: CGFloat; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'drawUnderlineForGlyphRange:underlineType:baselineOffset:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
     procedure underlineGlyphRange_underlineType_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; underlineVal: NSInteger; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'underlineGlyphRange:underlineType:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
     procedure underlineGlyphRange_underlineType_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; underlineVal: NSInteger; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'underlineGlyphRange:underlineType:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
     procedure drawStrikethroughForGlyphRange_strikethroughType_baselineOffset_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; strikethroughVal: NSInteger; baselineOffset: CGFloat; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'drawStrikethroughForGlyphRange:strikethroughType:baselineOffset:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
     procedure drawStrikethroughForGlyphRange_strikethroughType_baselineOffset_lineFragmentRect_lineFragmentGlyphRange_containerOrigin(glyphRange: NSRange; strikethroughVal: NSInteger; baselineOffset: CGFloat; lineRect: NSRect; lineGlyphRange: NSRange; containerOrigin: NSPoint); message 'drawStrikethroughForGlyphRange:strikethroughType:baselineOffset:lineFragmentRect:lineFragmentGlyphRange:containerOrigin:';
@@ -289,3 +305,15 @@ type
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSLAYOUTMANAGER_PAS_P}
+{$define NSLAYOUTMANAGER_PAS_P}
+  
+{ NSLayoutManagerDelegate Protocol }
+  NSLayoutManagerDelegateProtocol = objcprotocol
+    procedure layoutManagerDidInvalidateLayout(sender: NSLayoutManager); message 'layoutManagerDidInvalidateLayout:';
+    procedure layoutManager_didCompleteLayoutForTextContainer_atEnd(layoutManager: NSLayoutManager; textContainer: NSTextContainer; layoutFinishedFlag: Boolean); message 'layoutManager:didCompleteLayoutForTextContainer:atEnd:';
+    function layoutManager_shouldUseTemporaryAttributes_forDrawingToScreen_atCharacterIndex_effectiveRange(layoutManager: NSLayoutManager; attrs: NSDictionary; toScreen: Boolean; charIndex: NSUInteger; effectiveCharRange: NSRangePointer): NSDictionary; message 'layoutManager:shouldUseTemporaryAttributes:forDrawingToScreen:atCharacterIndex:effectiveRange:';
+  end; external name 'NSLayoutManagerDelegate';
+{$endif}
+{$endif}

+ 2 - 1
packages/cocoaint/src/appkit/NSLevelIndicator.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSLevelIndicator.h }
 { Parsed from Appkit.framework NSLevelIndicator.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:08 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSLevelIndicator = objcclass;
   NSLevelIndicator = objcclass;
   NSLevelIndicatorPointer = ^NSLevelIndicator;
   NSLevelIndicatorPointer = ^NSLevelIndicator;
+  NSLevelIndicatorPtr = NSLevelIndicatorPointer;
 
 
 {$endif}
 {$endif}
 
 

+ 20 - 14
packages/cocoaint/src/appkit/NSLevelIndicatorCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSLevelIndicatorCell.h }
 { Parsed from Appkit.framework NSLevelIndicatorCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:08 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -17,6 +17,7 @@ const
 { Types }
 { Types }
 type
 type
   NSLevelIndicatorStyle = NSUInteger;
   NSLevelIndicatorStyle = NSUInteger;
+  NSLevelIndicatorStylePtr = ^NSLevelIndicatorStyle;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -45,6 +46,7 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSLevelIndicatorCell = objcclass;
   NSLevelIndicatorCell = objcclass;
   NSLevelIndicatorCellPointer = ^NSLevelIndicatorCell;
   NSLevelIndicatorCellPointer = ^NSLevelIndicatorCell;
+  NSLevelIndicatorCellPtr = NSLevelIndicatorCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -55,24 +57,28 @@ type
 { NSLevelIndicatorCell }
 { NSLevelIndicatorCell }
   NSLevelIndicatorCell = objcclass(NSActionCell)
   NSLevelIndicatorCell = objcclass(NSActionCell)
   private
   private
-    __value: double;
-    __minValue: double;
-    __maxValue: double;
-    __warningValue: double;
-    __criticalValue: double;
-    __numberOfTickMarks: cint;
-    __numberOfMajorTickMarks: cint;
+    _value: double;
+    _minValue: double;
+    _maxValue: double;
+    _warningValue: double;
+    _criticalValue: double;
+    _numberOfTickMarks: cint;
+    _numberOfMajorTickMarks: cint;
     __liFlags: bitpacked record
     __liFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSLevelIndicatorCell0: cuint);
+       1: (
         indicatorStyle: 0..((1 shl 4)-1);
         indicatorStyle: 0..((1 shl 4)-1);
-        tickMarkPosition: 0..1;
+        _tickMarkPosition: 0..1;
         selectable: 0..1;
         selectable: 0..1;
         reserved: 0..((1 shl 26)-1);
         reserved: 0..((1 shl 26)-1);
+      );
       end;
       end;
-    __cellFrame: NSRect;
-    __reserved1: cint;
-    __reserved2: cint;
-    __reserved3: cint;
-    __reserved4: cint;
+    _cellFrame: NSRect;
+    _reserved1: cint;
+    _reserved2: cint;
+    _reserved3: cint;
+    _reserved4: cint;
     
     
   public
   public
     class function alloc: NSLevelIndicatorCell; message 'alloc';
     class function alloc: NSLevelIndicatorCell; message 'alloc';

+ 55 - 32
packages/cocoaint/src/appkit/NSMatrix.inc

@@ -1,15 +1,11 @@
 { Parsed from Appkit.framework NSMatrix.h }
 { Parsed from Appkit.framework NSMatrix.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
 {$ifndef NSMATRIX_PAS_T}
 {$ifndef NSMATRIX_PAS_T}
 {$define NSMATRIX_PAS_T}
 {$define NSMATRIX_PAS_T}
 
 
-{ Callbacks }
-type
-  NSMatrixCompare = function (param1: id; param2: id; param3: Pointer): NSInteger; cdecl;
-
 { Constants }
 { Constants }
 
 
 const
 const
@@ -21,6 +17,12 @@ const
 { Types }
 { Types }
 type
 type
   NSMatrixMode = NSUInteger;
   NSMatrixMode = NSUInteger;
+  NSMatrixModePtr = ^NSMatrixMode;
+
+{ Callbacks }
+type
+  NSMatrixCompare = function (param1: id; param2: id; param3: Pointer): NSInteger; cdecl;
+
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -31,7 +33,7 @@ type
 
 
 { Records }
 { Records }
 type
 type
-  __MFlags = bitpacked record
+  __MFlags = record
 {$ifdef fpc_big_endian}
 {$ifdef fpc_big_endian}
     highlightMode: 0..1;
     highlightMode: 0..1;
     radioMode: 0..1;
     radioMode: 0..1;
@@ -59,9 +61,13 @@ type
     tmpAllowNonVisibleCellsToBecomeFirstResponder: 0..1;
     tmpAllowNonVisibleCellsToBecomeFirstResponder: 0..1;
     needsRedrawBeforeFirstLiveResizeCache: 0..1;
     needsRedrawBeforeFirstLiveResizeCache: 0..1;
     browserOptimizationsEnabled: 0..1;
     browserOptimizationsEnabled: 0..1;
-    reservedMatrix: 0..((1 shl 6)-1);
+    drawingContextMenuHighlight: 0..1;
+    drawingContextMenuHighlightOnAllSelectedRows: 0..1;
+    reservedMatrix: 0..((1 shl 4)-1);
 {$else}
 {$else}
-    reservedMatrix: 0..((1 shl 6)-1);
+    reservedMatrix: 0..((1 shl 4)-1);
+    drawingContextMenuHighlightOnAllSelectedRows: 0..1;
+    drawingContextMenuHighlight: 0..1;
     browserOptimizationsEnabled: 0..1;
     browserOptimizationsEnabled: 0..1;
     needsRedrawBeforeFirstLiveResizeCache: 0..1;
     needsRedrawBeforeFirstLiveResizeCache: 0..1;
     tmpAllowNonVisibleCellsToBecomeFirstResponder: 0..1;
     tmpAllowNonVisibleCellsToBecomeFirstResponder: 0..1;
@@ -91,6 +97,7 @@ type
 {$endif}
 {$endif}
   end;
   end;
 _MFlags = __MFlags;
 _MFlags = __MFlags;
+__MFlagsPtr = ^__MFlags;
 
 
 
 
 {$endif}
 {$endif}
@@ -111,8 +118,10 @@ _MFlags = __MFlags;
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSMatrixDelegateProtocol = objcprotocol;
   NSMatrix = objcclass;
   NSMatrix = objcclass;
   NSMatrixPointer = ^NSMatrix;
   NSMatrixPointer = ^NSMatrix;
+  NSMatrixPtr = NSMatrixPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -123,25 +132,25 @@ _MFlags = __MFlags;
 { NSMatrix }
 { NSMatrix }
   NSMatrix = objcclass(NSControl, NSUserInterfaceValidationsProtocol)
   NSMatrix = objcclass(NSControl, NSUserInterfaceValidationsProtocol)
   private
   private
-    __target: id;
-    __action: SEL;
-    __doubleAction: SEL;
-    __errorAction: SEL;
-    __delegate: id;
-    __selectedCell: id;
-    __selectedRow: NSInteger;
-    __selectedCol: NSInteger;
-    __numRows: NSInteger;
-    __numCols: NSInteger;
-    __cellSize: NSSize;
-    __intercell: NSSize;
-    __font: id;
-    __protoCell: id;
-    __cellClass: id;
-    __backgroundColor: NSColor;
-    __private: id;
-    __cells: NSMutableArray;
-    __mFlags: _MFlags;
+    _target: id;
+    _action: SEL;
+    _doubleAction: SEL;
+    _errorAction: SEL;
+    _delegate: id;
+    _selectedCell: id;
+    _selectedRow: NSInteger;
+    _selectedCol: NSInteger;
+    _numRows: NSInteger;
+    _numCols: NSInteger;
+    _cellSize: NSSize;
+    _intercell: NSSize;
+    _font: id;
+    _protoCell: id;
+    _cellClass: id;
+    _backgroundColor: NSColor;
+    _private: id;
+    _cells: NSMutableArray;
+    _mFlags: _MFlags;
     
     
   public
   public
     class function alloc: NSMatrix; message 'alloc';
     class function alloc: NSMatrix; message 'alloc';
@@ -188,13 +197,13 @@ _MFlags = __MFlags;
     procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
     procedure setDrawsBackground(flag: Boolean); message 'setDrawsBackground:';
     function drawsBackground: Boolean; message 'drawsBackground';
     function drawsBackground: Boolean; message 'drawsBackground';
     procedure setState_atRow_column(value: NSInteger; row: NSInteger; col: NSInteger); message 'setState:atRow:column:';
     procedure setState_atRow_column(value: NSInteger; row: NSInteger; col: NSInteger); message 'setState:atRow:column:';
-    procedure getNumberOfRows_columns(rowCount: NSIntegerPointer; colCount: NSIntegerPointer); message 'getNumberOfRows:columns:';
+    procedure getNumberOfRows_columns(rowCount: NSIntegerPtr; colCount: NSIntegerPtr); message 'getNumberOfRows:columns:';
     function numberOfRows: NSInteger; message 'numberOfRows';
     function numberOfRows: NSInteger; message 'numberOfRows';
     function numberOfColumns: NSInteger; message 'numberOfColumns';
     function numberOfColumns: NSInteger; message 'numberOfColumns';
     function cellAtRow_column(row: NSInteger; col: NSInteger): id; message 'cellAtRow:column:';
     function cellAtRow_column(row: NSInteger; col: NSInteger): id; message 'cellAtRow:column:';
     function cellFrameAtRow_column(row: NSInteger; col: NSInteger): NSRect; message 'cellFrameAtRow:column:';
     function cellFrameAtRow_column(row: NSInteger; col: NSInteger): NSRect; message 'cellFrameAtRow:column:';
-    function getRow_column_ofCell(row: NSIntegerPointer; col: NSIntegerPointer; aCell: NSCell): Boolean; message 'getRow:column:ofCell:';
-    function getRow_column_forPoint(row: NSIntegerPointer; col: NSIntegerPointer; aPoint: NSPoint): Boolean; message 'getRow:column:forPoint:';
+    function getRow_column_ofCell(row: NSIntegerPtr; col: NSIntegerPtr; aCell: NSCell): Boolean; message 'getRow:column:ofCell:';
+    function getRow_column_forPoint(row: NSIntegerPtr; col: NSIntegerPtr; aPoint: NSPoint): Boolean; message 'getRow:column:forPoint:';
     procedure renewRows_columns(newRows: NSInteger; newCols: NSInteger); message 'renewRows:columns:';
     procedure renewRows_columns(newRows: NSInteger; newCols: NSInteger); message 'renewRows:columns:';
     procedure putCell_atRow_column(newCell: NSCell; row: NSInteger; col: NSInteger); message 'putCell:atRow:column:';
     procedure putCell_atRow_column(newCell: NSCell; row: NSInteger; col: NSInteger); message 'putCell:atRow:column:';
     procedure addRow; message 'addRow';
     procedure addRow; message 'addRow';
@@ -238,12 +247,26 @@ _MFlags = __MFlags;
     procedure setToolTip_forCell(toolTipString: NSString; cell_: NSCell); message 'setToolTip:forCell:';
     procedure setToolTip_forCell(toolTipString: NSString; cell_: NSCell); message 'setToolTip:forCell:';
     function toolTipForCell(cell_: NSCell): NSString; message 'toolTipForCell:';
     function toolTipForCell(cell_: NSCell): NSString; message 'toolTipForCell:';
 
 
-    { Category: NSKeyboardUI }
+    { Adopted Protocols }
+    function validateUserInterfaceItem(anItem: id): Boolean;
+  end; external;
+
+{ NSKeyboardUI_NSMatrixCategory }
+  NSKeyboardUI_NSMatrixCategory = objccategory(NSMatrix)
     procedure setTabKeyTraversesCells(flag: Boolean); message 'setTabKeyTraversesCells:';
     procedure setTabKeyTraversesCells(flag: Boolean); message 'setTabKeyTraversesCells:';
     function tabKeyTraversesCells: Boolean; message 'tabKeyTraversesCells';
     function tabKeyTraversesCells: Boolean; message 'tabKeyTraversesCells';
     procedure setKeyCell(keyCell_: NSCell); message 'setKeyCell:';
     procedure setKeyCell(keyCell_: NSCell); message 'setKeyCell:';
     function keyCell: id; message 'keyCell';
     function keyCell: id; message 'keyCell';
-  end; external;
+  end; external name 'NSKeyboardUI';
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSMATRIX_PAS_P}
+{$define NSMATRIX_PAS_P}
+  
+{ NSMatrixDelegate Protocol }
+  NSMatrixDelegateProtocol = objcprotocol
+  end; external name 'NSMatrixDelegate';
+{$endif}
+{$endif}

+ 110 - 42
packages/cocoaint/src/appkit/NSMenu.inc

@@ -1,11 +1,26 @@
 { Parsed from Appkit.framework NSMenu.h }
 { Parsed from Appkit.framework NSMenu.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
 {$ifndef NSMENU_PAS_T}
 {$ifndef NSMENU_PAS_T}
 {$define NSMENU_PAS_T}
 {$define NSMENU_PAS_T}
 
 
+{ Constants }
+
+const
+  NSMenuPropertyItemTitle = 1 shl 0;
+  NSMenuPropertyItemAttributedTitle = 1 shl 1;
+  NSMenuPropertyItemKeyEquivalent = 1 shl 2;
+  NSMenuPropertyItemImage = 1 shl 3;
+  NSMenuPropertyItemEnabled = 1 shl 4;
+  NSMenuPropertyItemAccessibilityDescription = 1 shl 5;
+
+{ Types }
+type
+  NSMenuProperties = NSUInteger;
+  NSMenuPropertiesPtr = ^NSMenuProperties;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
@@ -29,20 +44,22 @@
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSMenuWillSendActionNotification: NSString; external name '_NSMenuWillSendActionNotification';
-  NSMenuDidSendActionNotification: NSString; external name '_NSMenuDidSendActionNotification';
-  NSMenuDidAddItemNotification: NSString; external name '_NSMenuDidAddItemNotification';
-  NSMenuDidRemoveItemNotification: NSString; external name '_NSMenuDidRemoveItemNotification';
-  NSMenuDidChangeItemNotification: NSString; external name '_NSMenuDidChangeItemNotification';
-  NSMenuDidBeginTrackingNotification: NSString; external name '_NSMenuDidBeginTrackingNotification';
-  NSMenuDidEndTrackingNotification: NSString; external name '_NSMenuDidEndTrackingNotification';
+  NSMenuWillSendActionNotification: NSString; cvar; external;
+  NSMenuDidSendActionNotification: NSString; cvar; external;
+  NSMenuDidAddItemNotification: NSString; cvar; external;
+  NSMenuDidRemoveItemNotification: NSString; cvar; external;
+  NSMenuDidChangeItemNotification: NSString; cvar; external;
+  NSMenuDidBeginTrackingNotification: NSString; cvar; external;
+  NSMenuDidEndTrackingNotification: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
 {$ifdef FORWARD}
 {$ifdef FORWARD}
+  NSMenuDelegateProtocol = objcprotocol;
   NSMenu = objcclass;
   NSMenu = objcclass;
   NSMenuPointer = ^NSMenu;
   NSMenuPointer = ^NSMenu;
+  NSMenuPtr = NSMenuPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -53,42 +70,45 @@ var
 { NSMenu }
 { NSMenu }
   NSMenu = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   NSMenu = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol)
   private
   private
-    __supermenu: NSMenu;
-    __title: NSString;
-    __itemArray: id;
-    __menuImpl: id;
+    _supermenu: NSMenu;
+    _title: NSString;
+    _itemArray: id;
+    _extra: id;
     __mFlags: bitpacked record
     __mFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSMenu0: cuint);
+       1: (
         noAutoenable: 0..1;
         noAutoenable: 0..1;
-        menuChangedMessagesDisabled: 0..1;
-        needsMenuChangedMessage: 0..1;
-        suppressAutoenable: 0..1;
+        inMain: 0..1;
+        internalPerformAction: 0..1;
+        condenseSeparators: 0..1;
         disabled: 0..1;
         disabled: 0..1;
         ownedByPopUp: 0..1;
         ownedByPopUp: 0..1;
         delegateNeedsUpdate: 0..1;
         delegateNeedsUpdate: 0..1;
         delegateUpdateItem: 0..1;
         delegateUpdateItem: 0..1;
         delegateHasKeyEquiv: 0..1;
         delegateHasKeyEquiv: 0..1;
         delegateHasAltKeyEquiv: 0..1;
         delegateHasAltKeyEquiv: 0..1;
-        keyEquivalentMapIsDirty: 0..1;
         excludeMarkColumn: 0..1;
         excludeMarkColumn: 0..1;
         isContextualMenu: 0..1;
         isContextualMenu: 0..1;
-        RESERVED: 0..((1 shl 19)-1);
-        
+        cmPluginMode: 0..((1 shl 2)-1);
+        invertedCMPluginTypes: 0..((1 shl 2)-1);
+        allowsDifferentSelection: 0..1;
+        RESERVED: 0..((1 shl 15)-1);
+      );
       end;
       end;
-    __name: NSString;
+    _name: NSString;
     
     
   public
   public
     class function alloc: NSMenu; message 'alloc';
     class function alloc: NSMenu; message 'alloc';
 
 
-    class procedure setMenuZone(aZone: NSZonePointer); message 'setMenuZone:';
-    class function menuZone: NSZone; message 'menuZone';
+    function initWithTitle(aTitle: NSString): id; message 'initWithTitle:';
+    procedure setTitle(aString: NSString); message 'setTitle:';
+    function title: NSString; message 'title';
     class procedure popUpContextMenu_withEvent_forView(menu: NSMenu; event: NSEvent; view: NSView); message 'popUpContextMenu:withEvent:forView:';
     class procedure popUpContextMenu_withEvent_forView(menu: NSMenu; event: NSEvent; view: NSView); message 'popUpContextMenu:withEvent:forView:';
     class procedure popUpContextMenu_withEvent_forView_withFont(menu: NSMenu; event: NSEvent; view: NSView; font: NSFont); message 'popUpContextMenu:withEvent:forView:withFont:';
     class procedure popUpContextMenu_withEvent_forView_withFont(menu: NSMenu; event: NSEvent; view: NSView; font: NSFont); message 'popUpContextMenu:withEvent:forView:withFont:';
+    function popUpMenuPositioningItem_atLocation_inView(item: NSMenuItem; location: NSPoint; view: NSView): Boolean; message 'popUpMenuPositioningItem:atLocation:inView:';
     class procedure setMenuBarVisible(visible: Boolean); message 'setMenuBarVisible:';
     class procedure setMenuBarVisible(visible: Boolean); message 'setMenuBarVisible:';
     class function menuBarVisible: Boolean; message 'menuBarVisible';
     class function menuBarVisible: Boolean; message 'menuBarVisible';
-    function initWithTitle(aTitle: NSString): id; message 'initWithTitle:';
-    procedure setTitle(aString: NSString); message 'setTitle:';
-    function title: NSString; message 'title';
-    procedure setSupermenu(supermenu_: NSMenu); message 'setSupermenu:';
     function supermenu: NSMenu; message 'supermenu';
     function supermenu: NSMenu; message 'supermenu';
     procedure insertItem_atIndex(newItem: NSMenuItem; index: NSInteger); message 'insertItem:atIndex:';
     procedure insertItem_atIndex(newItem: NSMenuItem; index: NSInteger); message 'insertItem:atIndex:';
     procedure addItem(newItem: NSMenuItem); message 'addItem:';
     procedure addItem(newItem: NSMenuItem); message 'addItem:';
@@ -97,6 +117,7 @@ var
     procedure removeItemAtIndex(index: NSInteger); message 'removeItemAtIndex:';
     procedure removeItemAtIndex(index: NSInteger); message 'removeItemAtIndex:';
     procedure removeItem(item: NSMenuItem); message 'removeItem:';
     procedure removeItem(item: NSMenuItem); message 'removeItem:';
     procedure setSubmenu_forItem(aMenu: NSMenu; anItem: NSMenuItem); message 'setSubmenu:forItem:';
     procedure setSubmenu_forItem(aMenu: NSMenu; anItem: NSMenuItem); message 'setSubmenu:forItem:';
+    procedure removeAllItems; message 'removeAllItems';
     function itemArray: NSArray; message 'itemArray';
     function itemArray: NSArray; message 'itemArray';
     function numberOfItems: NSInteger; message 'numberOfItems';
     function numberOfItems: NSInteger; message 'numberOfItems';
     function indexOfItem(index: NSMenuItem): NSInteger; message 'indexOfItem:';
     function indexOfItem(index: NSMenuItem): NSInteger; message 'indexOfItem:';
@@ -105,40 +126,87 @@ var
     function indexOfItemWithRepresentedObject(object_: id): NSInteger; message 'indexOfItemWithRepresentedObject:';
     function indexOfItemWithRepresentedObject(object_: id): NSInteger; message 'indexOfItemWithRepresentedObject:';
     function indexOfItemWithSubmenu(submenu: NSMenu): NSInteger; message 'indexOfItemWithSubmenu:';
     function indexOfItemWithSubmenu(submenu: NSMenu): NSInteger; message 'indexOfItemWithSubmenu:';
     function indexOfItemWithTarget_andAction(target: id; actionSelector: SEL): NSInteger; message 'indexOfItemWithTarget:andAction:';
     function indexOfItemWithTarget_andAction(target: id; actionSelector: SEL): NSInteger; message 'indexOfItemWithTarget:andAction:';
-    function itemAtIndex(index: NSInteger): NSMenuItem; message 'itemAtIndex:';
     function itemWithTitle(aTitle: NSString): NSMenuItem; message 'itemWithTitle:';
     function itemWithTitle(aTitle: NSString): NSMenuItem; message 'itemWithTitle:';
     function itemWithTag(tag: NSInteger): NSMenuItem; message 'itemWithTag:';
     function itemWithTag(tag: NSInteger): NSMenuItem; message 'itemWithTag:';
     procedure setAutoenablesItems(flag: Boolean); message 'setAutoenablesItems:';
     procedure setAutoenablesItems(flag: Boolean); message 'setAutoenablesItems:';
     function autoenablesItems: Boolean; message 'autoenablesItems';
     function autoenablesItems: Boolean; message 'autoenablesItems';
-    function performKeyEquivalent(theEvent: NSEvent): Boolean; message 'performKeyEquivalent:';
     procedure update; message 'update';
     procedure update; message 'update';
-    procedure setMenuChangedMessagesEnabled(flag: Boolean); message 'setMenuChangedMessagesEnabled:';
-    function menuChangedMessagesEnabled: Boolean; message 'menuChangedMessagesEnabled';
+    function performKeyEquivalent(theEvent: NSEvent): Boolean; message 'performKeyEquivalent:';
     procedure itemChanged(item: NSMenuItem); message 'itemChanged:';
     procedure itemChanged(item: NSMenuItem); message 'itemChanged:';
-    procedure helpRequested(eventPtr: NSEventPointer); message 'helpRequested:';
-    procedure setMenuRepresentation(menuRep: id); message 'setMenuRepresentation:';
-    function menuRepresentation: id; message 'menuRepresentation';
-    procedure setContextMenuRepresentation(menuRep: id); message 'setContextMenuRepresentation:';
-    function contextMenuRepresentation: id; message 'contextMenuRepresentation';
-    procedure setTearOffMenuRepresentation(menuRep: id); message 'setTearOffMenuRepresentation:';
-    function tearOffMenuRepresentation: id; message 'tearOffMenuRepresentation';
-    function isTornOff: Boolean; message 'isTornOff';
-    function attachedMenu: NSMenu; message 'attachedMenu';
-    function isAttached: Boolean; message 'isAttached';
-    procedure sizeToFit; message 'sizeToFit';
-    function locationForSubmenu(aSubmenu: NSMenu): NSPoint; message 'locationForSubmenu:';
     procedure performActionForItemAtIndex(index: NSInteger); message 'performActionForItemAtIndex:';
     procedure performActionForItemAtIndex(index: NSInteger); message 'performActionForItemAtIndex:';
     procedure setDelegate(anObject: id); message 'setDelegate:';
     procedure setDelegate(anObject: id); message 'setDelegate:';
     function delegate: id; message 'delegate';
     function delegate: id; message 'delegate';
     function menuBarHeight: CGFloat; message 'menuBarHeight';
     function menuBarHeight: CGFloat; message 'menuBarHeight';
     procedure cancelTracking; message 'cancelTracking';
     procedure cancelTracking; message 'cancelTracking';
+    procedure cancelTrackingWithoutAnimation; message 'cancelTrackingWithoutAnimation';
     function highlightedItem: NSMenuItem; message 'highlightedItem';
     function highlightedItem: NSMenuItem; message 'highlightedItem';
+    function minimumWidth: CGFloat; message 'minimumWidth';
+    procedure setMinimumWidth(width: CGFloat); message 'setMinimumWidth:';
+    function size: NSSize; message 'size';
+    function font: NSFont; message 'font';
+    procedure setFont(font_: NSFont); message 'setFont:';
+    function allowsContextMenuPlugIns: Boolean; message 'allowsContextMenuPlugIns';
+    procedure setAllowsContextMenuPlugIns(allows: Boolean); message 'setAllowsContextMenuPlugIns:';
     procedure setShowsStateColumn(showsState: Boolean); message 'setShowsStateColumn:';
     procedure setShowsStateColumn(showsState: Boolean); message 'setShowsStateColumn:';
     function showsStateColumn: Boolean; message 'showsStateColumn';
     function showsStateColumn: Boolean; message 'showsStateColumn';
+    class function menuZone: NSZonePtr; message 'menuZone';
+    procedure setMenuChangedMessagesEnabled(flag: Boolean); message 'setMenuChangedMessagesEnabled:';
+    function menuChangedMessagesEnabled: Boolean; message 'menuChangedMessagesEnabled';
+    procedure helpRequested(eventPtr: NSEvent); message 'helpRequested:';
+    function isTornOff: Boolean; message 'isTornOff';
 
 
-    { Category: NSSubmenuAction }
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSSubmenuActionCategory }
+  NSSubmenuActionCategory = objccategory(NSMenu)
     procedure submenuAction(sender: id); message 'submenuAction:';
     procedure submenuAction(sender: id); message 'submenuAction:';
   end; external;
   end; external;
 
 
+{ NSMenuValidationCategory }
+  NSMenuValidationCategory = objccategory(NSObject)
+    function validateMenuItem(menuItem: NSMenuItem): Boolean; message 'validateMenuItem:';
+  end; external;
+
+{ NSMenuPropertiesToUpdateCategory }
+  NSMenuPropertiesToUpdateCategory = objccategory(NSMenu)
+    function propertiesToUpdate: NSMenuProperties; message 'propertiesToUpdate';
+  end; external;
+
+{ NSDeprecated_NSMenuCategory }
+  NSDeprecated_NSMenuCategory = objccategory(NSMenu)
+    procedure setMenuRepresentation(menuRep: id); message 'setMenuRepresentation:'; deprecated 'in Mac OS X 10.2 and later';
+    function menuRepresentation: id; message 'menuRepresentation'; deprecated 'in Mac OS X 10.2 and later';
+    procedure setContextMenuRepresentation(menuRep: id); message 'setContextMenuRepresentation:'; deprecated 'in Mac OS X 10.2 and later';
+    function contextMenuRepresentation: id; message 'contextMenuRepresentation'; deprecated 'in Mac OS X 10.2 and later';
+    procedure setTearOffMenuRepresentation(menuRep: id); message 'setTearOffMenuRepresentation:'; deprecated 'in Mac OS X 10.2 and later';
+    function tearOffMenuRepresentation: id; message 'tearOffMenuRepresentation'; deprecated 'in Mac OS X 10.2 and later';
+    class procedure setMenuZone(aZone: NSZonePtr); message 'setMenuZone:'; deprecated 'in Mac OS X 10.2 and later';
+    function attachedMenu: NSMenu; message 'attachedMenu'; deprecated 'in Mac OS X 10.2 and later';
+    function isAttached: Boolean; message 'isAttached'; deprecated 'in Mac OS X 10.2 and later';
+    procedure sizeToFit; message 'sizeToFit'; deprecated 'in Mac OS X 10.2 and later';
+    function locationForSubmenu(aSubmenu: NSMenu): NSPoint; message 'locationForSubmenu:'; deprecated 'in Mac OS X 10.2 and later';
+  end; external name 'NSDeprecated';
+
+{$endif}
+{$endif}
+{$ifdef PROTOCOLS}
+{$ifndef NSMENU_PAS_P}
+{$define NSMENU_PAS_P}
+  
+{ NSMenuDelegate Protocol }
+  NSMenuDelegateProtocol = objcprotocol
+    procedure menuNeedsUpdate(menu: NSMenu); message 'menuNeedsUpdate:';
+    function numberOfItemsInMenu(menu: NSMenu): NSInteger; message 'numberOfItemsInMenu:';
+    function menu_updateItem_atIndex_shouldCancel(menu: NSMenu; item: NSMenuItem; index: NSInteger; shouldCancel: Boolean): Boolean; message 'menu:updateItem:atIndex:shouldCancel:';
+    function menuHasKeyEquivalent_forEvent_target_action(menu: NSMenu; event: NSEvent; target: idPtr; action: SELPtr): Boolean; message 'menuHasKeyEquivalent:forEvent:target:action:';
+    procedure menuWillOpen(menu: NSMenu); message 'menuWillOpen:';
+    procedure menuDidClose(menu: NSMenu); message 'menuDidClose:';
+    procedure menu_willHighlightItem(menu: NSMenu; item: NSMenuItem); message 'menu:willHighlightItem:';
+    function confinementRectForMenu_onScreen(menu: NSMenu; screen: NSScreen): NSRect; message 'confinementRectForMenu:onScreen:';
+  end; external name 'NSMenuDelegate';
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 46 - 20
packages/cocoaint/src/appkit/NSMenuItem.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSMenuItem.h }
 { Parsed from Appkit.framework NSMenuItem.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSMenuItem = objcclass;
   NSMenuItem = objcclass;
   NSMenuItemPointer = ^NSMenuItem;
   NSMenuItemPointer = ^NSMenuItem;
+  NSMenuItemPtr = NSMenuItemPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,30 +44,40 @@
 { NSMenuItem }
 { NSMenuItem }
   NSMenuItem = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol, NSValidatedUserInterfaceItemProtocol)
   NSMenuItem = objcclass(NSObject, NSCopyingProtocol, NSCodingProtocol, NSValidatedUserInterfaceItemProtocol)
   private
   private
-    __menu: NSMenu;
-    __title: NSString;
-    __keyEquivalent: NSString;
-    __keyEquivalentModifierMask: NSUInteger;
-    __mnemonicLocation: NSInteger;
-    __state: NSInteger;
-    __image: NSImage;
-    __onStateImage: NSImage;
-    __offStateImage: NSImage;
-    __mixedStateImage: NSImage;
-    __target: id;
-    __action: SEL;
-    __tag: NSInteger;
-    __extraData: id;
+    _menu: NSMenu;
+    _title: NSString;
+    _keyEquivalent: NSString;
+    _keyEquivalentModifierMask: NSUInteger;
+    _userKEGenerationCount: NSInteger;
+    _state: NSInteger;
+    _image: NSImage;
+    _submenu: NSMenu;
+    _uiid: NSString;
+    _repObject: id;
+    _target: id;
+    _action: SEL;
+    _tag: NSInteger;
+    _extraData: id;
     __miFlags: bitpacked record
     __miFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSMenuItem0: cuint);
+       1: (
         disabled: 0..1;
         disabled: 0..1;
         isSeparator: 0..1;
         isSeparator: 0..1;
         hidden: 0..1;
         hidden: 0..1;
         alternate: 0..1;
         alternate: 0..1;
         indent: 0..((1 shl 4)-1);
         indent: 0..((1 shl 4)-1);
-        changed: 0..((1 shl 16)-1);
+        keShareMode: 0..((1 shl 3)-1);
+        RESERVED1: 0..((1 shl 13)-1);
         highlighted: 0..1;
         highlighted: 0..1;
         limitedView: 0..1;
         limitedView: 0..1;
-        RESERVED: 0..((1 shl 6)-1);
+        nextItemIsAlternate: 0..1;
+        blockKE: 0..1;
+        ignoredForAccessibility: 0..1;
+        hiddenActiveKE: 0..1;
+        noRepeatKEs: 0..1;
+        RESERVED: 0..1;
+      );
       end;
       end;
     
     
   public
   public
@@ -81,6 +92,7 @@
     function hasSubmenu: Boolean; message 'hasSubmenu';
     function hasSubmenu: Boolean; message 'hasSubmenu';
     procedure setSubmenu(submenu_: NSMenu); message 'setSubmenu:';
     procedure setSubmenu(submenu_: NSMenu); message 'setSubmenu:';
     function submenu: NSMenu; message 'submenu';
     function submenu: NSMenu; message 'submenu';
+    function parentItem: NSMenuItem; message 'parentItem';
     procedure setTitle(aString: NSString); message 'setTitle:';
     procedure setTitle(aString: NSString); message 'setTitle:';
     function title: NSString; message 'title';
     function title: NSString; message 'title';
     procedure setAttributedTitle(string_: NSAttributedString); message 'setAttributedTitle:';
     procedure setAttributedTitle(string_: NSAttributedString); message 'setAttributedTitle:';
@@ -91,9 +103,6 @@
     procedure setKeyEquivalentModifierMask(mask: NSUInteger); message 'setKeyEquivalentModifierMask:';
     procedure setKeyEquivalentModifierMask(mask: NSUInteger); message 'setKeyEquivalentModifierMask:';
     function keyEquivalentModifierMask: NSUInteger; message 'keyEquivalentModifierMask';
     function keyEquivalentModifierMask: NSUInteger; message 'keyEquivalentModifierMask';
     function userKeyEquivalent: NSString; message 'userKeyEquivalent';
     function userKeyEquivalent: NSString; message 'userKeyEquivalent';
-    procedure setMnemonicLocation(location: NSUInteger); message 'setMnemonicLocation:';
-    function mnemonicLocation: NSUInteger; message 'mnemonicLocation';
-    function mnemonic: NSString; message 'mnemonic';
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
     procedure setTitleWithMnemonic(stringWithAmpersand: NSString); message 'setTitleWithMnemonic:';
     procedure setImage(menuImage: NSImage); message 'setImage:';
     procedure setImage(menuImage: NSImage); message 'setImage:';
     function image: NSImage; message 'image';
     function image: NSImage; message 'image';
@@ -127,7 +136,24 @@
     function isHiddenOrHasHiddenAncestor: Boolean; message 'isHiddenOrHasHiddenAncestor';
     function isHiddenOrHasHiddenAncestor: Boolean; message 'isHiddenOrHasHiddenAncestor';
     procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
     procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
     function toolTip: NSString; message 'toolTip';
     function toolTip: NSString; message 'toolTip';
+
+    { Adopted Protocols }
+    function copyWithZone(zone_: NSZonePtr): id;
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
+  end; external;
+
+{ NSViewEnclosingMenuItemCategory }
+  NSViewEnclosingMenuItemCategory = objccategory(NSView)
+    function enclosingMenuItem: NSMenuItem; message 'enclosingMenuItem';
   end; external;
   end; external;
 
 
+{ NSDeprecated_NSMenuItemCategory }
+  NSDeprecated_NSMenuItemCategory = objccategory(NSMenuItem)
+    procedure setMnemonicLocation(location: NSUInteger); message 'setMnemonicLocation:'; deprecated 'in Mac OS X 10.6 and later';
+    function mnemonicLocation: NSUInteger; message 'mnemonicLocation'; deprecated 'in Mac OS X 10.6 and later';
+    function mnemonic: NSString; message 'mnemonic'; deprecated 'in Mac OS X 10.6 and later';
+  end; external name 'NSDeprecated';
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}

+ 16 - 10
packages/cocoaint/src/appkit/NSMenuItemCell.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSMenuItemCell.h }
 { Parsed from Appkit.framework NSMenuItemCell.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSMenuItemCell = objcclass;
   NSMenuItemCell = objcclass;
   NSMenuItemCellPointer = ^NSMenuItemCell;
   NSMenuItemCellPointer = ^NSMenuItemCell;
+  NSMenuItemCellPtr = NSMenuItemCellPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,18 +44,23 @@
 { NSMenuItemCell }
 { NSMenuItemCell }
   NSMenuItemCell = objcclass(NSButtonCell)
   NSMenuItemCell = objcclass(NSButtonCell)
   private
   private
-    __extraData: id;
-    __stateImageSize: NSSize;
-    __imageSize: NSSize;
-    __titleSize: NSSize;
-    __keyEquivalentSize: NSSize;
-    __size: NSSize;
+    _extraData: id;
+    _stateImageSize: NSSize;
+    _imageSize: NSSize;
+    _titleSize: NSSize;
+    _keyEquivalentSize: NSSize;
+    _size: NSSize;
     __micFlags: bitpacked record
     __micFlags: bitpacked record
-        needsSizing: 0..1;
+      case byte of
+       0: (_anonbitfield_NSMenuItemCell0: cuint);
+       1: (
+        _needsSizing: 0..1;
         reserved: 0..1;
         reserved: 0..1;
-        needsDisplay: 0..1;
+        _needsDisplay: 0..1;
         keyEquivGlyphWidth: 0..((1 shl 16)-1);
         keyEquivGlyphWidth: 0..((1 shl 16)-1);
-        RESERVED_: 0..((1 shl 13)-1);
+        uniqueAgainstMain: 0..1;
+        _RESERVED: 0..((1 shl 12)-1);
+      );
       end;
       end;
     
     
   public
   public

+ 25 - 20
packages/cocoaint/src/appkit/NSMenuView.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSMenuView.h }
 { Parsed from Appkit.framework NSMenuView.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSMenuView = objcclass;
   NSMenuView = objcclass;
   NSMenuViewPointer = ^NSMenuView;
   NSMenuViewPointer = ^NSMenuView;
+  NSMenuViewPtr = NSMenuViewPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,27 +44,30 @@
 { NSMenuView }
 { NSMenuView }
   NSMenuView = objcclass(NSView)
   NSMenuView = objcclass(NSView)
   private
   private
-    __menu: NSMenu;
-    __cells: NSMutableArray;
-    __stateImageWidth: CGFloat;
-    __imageAndTitleWidth: CGFloat;
-    __keyEquivalentWidth: CGFloat;
-    __extents: CGFloat;
-    __extentsCapacity: cuint;
-    __highlightedItemIndex: cint;
-    __submenuPopupTimer: Pointer;
-    __attachedMenuView: NSMenuView;
-    __scrollArrowHeight: CGFloat;
-    __maxWinHeight: CGFloat;
-    __font: NSFont;
-    __minSize: NSSize;
-    __horizontalEdgePad: CGFloat;
-    _trackingState: Pointer;
-    __scrollingView: id;
+    _menu: NSMenu;
+    _cells: NSMutableArray;
+    _stateImageWidth: CGFloat;
+    _imageAndTitleWidth: CGFloat;
+    _keyEquivalentWidth: CGFloat;
+    _extents: CGFloatPtr;
+    _extentsCapacity: cuint;
+    _highlightedItemIndex: cint;
+    _submenuPopupTimer: Pointer;
+    _attachedMenuView: NSMenuView;
+    _scrollArrowHeight: CGFloat;
+    _maxWinHeight: CGFloat;
+    _font: NSFont;
+    _minSize: NSSize;
+    _horizontalEdgePad: CGFloat;
+    trackingState: Pointer;
+    _scrollingView: id;
     __mvFlags: bitpacked record
     __mvFlags: bitpacked record
-        needsSizing: 0..1;
+      case byte of
+       0: (_anonbitfield_NSMenuView0: cuint);
+       1: (
+        _needsSizing: 0..1;
         releasingWindow: 0..1;
         releasingWindow: 0..1;
-        isHorizontal: 0..1;
+        _isHorizontal: 0..1;
         disableSizing: 0..1;
         disableSizing: 0..1;
         attachedSubmenuWhileMouseWasUp: 0..1;
         attachedSubmenuWhileMouseWasUp: 0..1;
         needsToCreateCells: 0..1;
         needsToCreateCells: 0..1;
@@ -74,6 +78,7 @@
         savedHODState: 0..1;
         savedHODState: 0..1;
         drawCenter: 0..1;
         drawCenter: 0..1;
         RESERVED: 0..((1 shl 5)-1);
         RESERVED: 0..((1 shl 5)-1);
+      );
       end;
       end;
     
     
   public
   public

+ 23 - 14
packages/cocoaint/src/appkit/NSMovie.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSMovie.h }
 { Parsed from Appkit.framework NSMovie.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSMovie = objcclass;
   NSMovie = objcclass;
   NSMoviePointer = ^NSMovie;
   NSMoviePointer = ^NSMovie;
+  NSMoviePtr = NSMoviePointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,26 +44,34 @@
 { NSMovie }
 { NSMovie }
   NSMovie = objcclass(NSObject, NSCodingProtocol)
   NSMovie = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __movie: Pointer;
-    __url: NSURL;
+    _movie: Pointer;
+    _url: NSURL;
     __movieFlags: bitpacked record
     __movieFlags: bitpacked record
-        dispose_: 0..1;
+      case byte of
+       0: (_anonbitfield_NSMovie0: cint);
+       1: (
+        _dispose: 0..1;
         reserved: 0..((1 shl 31)-1);
         reserved: 0..((1 shl 31)-1);
+      );
       end;
       end;
-    __reserved1: clong;
-    __reserved2: clong;
+    _reserved1: clong;
+    _reserved2: clong;
     
     
   public
   public
     class function alloc: NSMovie; message 'alloc';
     class function alloc: NSMovie; message 'alloc';
 
 
-    function initWithMovie(movie: Pointer): id; message 'initWithMovie:';
-    function initWithURL_byReference(URL_: NSURL; byRef: Boolean): id; message 'initWithURL:byReference:';
-    function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:';
-    function QTMovie: Pointer; message 'QTMovie';
-    function URL: NSURL; message 'URL';
-    class function movieUnfilteredFileTypes: NSArray; message 'movieUnfilteredFileTypes';
-    class function movieUnfilteredPasteboardTypes: NSArray; message 'movieUnfilteredPasteboardTypes';
-    class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:';
+    function initWithMovie(movie: Pointer): id; message 'initWithMovie:'; deprecated 'in Mac OS X 10.5 and later';
+    function initWithURL_byReference(url: NSURL; byRef: Boolean): id; message 'initWithURL:byReference:'; deprecated 'in Mac OS X 10.5 and later';
+    function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:'; deprecated 'in Mac OS X 10.5 and later';
+    function QTMovie_: Pointer; message 'QTMovie'; deprecated 'in Mac OS X 10.5 and later';
+    function URL: NSURL; message 'URL'; deprecated 'in Mac OS X 10.5 and later';
+    class function movieUnfilteredFileTypes: NSArray; message 'movieUnfilteredFileTypes'; deprecated 'in Mac OS X 10.5 and later';
+    class function movieUnfilteredPasteboardTypes: NSArray; message 'movieUnfilteredPasteboardTypes'; deprecated 'in Mac OS X 10.5 and later';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): Boolean; message 'canInitWithPasteboard:'; deprecated 'in Mac OS X 10.5 and later';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 60 - 50
packages/cocoaint/src/appkit/NSMovieView.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSMovieView.h }
 { Parsed from Appkit.framework NSMovieView.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -16,6 +16,7 @@ const
 { Types }
 { Types }
 type
 type
   NSQTMovieLoopMode = NSUInteger;
   NSQTMovieLoopMode = NSUInteger;
+  NSQTMovieLoopModePtr = ^NSQTMovieLoopMode;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -27,14 +28,19 @@ type
 { Records }
 { Records }
 type
 type
   __MVFlags = bitpacked record
   __MVFlags = bitpacked record
-    editable: 0..1;
-    loopMode: 0..((1 shl 3)-1);
-    playsEveryFrame: 0..1;
-    playsSelectionOnly: 0..1;
-    controllerVisible: 0..1;
-    reserved: 0..((1 shl 25)-1);
+    case byte of
+    0: (_anonbitfield_NSMovieView0: cuint);
+    1: (
+          editable: 0..1;
+          loopMode: 0..((1 shl 3)-1);
+          playsEveryFrame: 0..1;
+          playsSelectionOnly: 0..1;
+          controllerVisible: 0..1;
+          reserved: 0..((1 shl 25)-1);
+       );
   end;
   end;
 _MVFlags = __MVFlags;
 _MVFlags = __MVFlags;
+__MVFlagsPtr = ^__MVFlags;
 
 
 
 
 {$endif}
 {$endif}
@@ -57,6 +63,7 @@ _MVFlags = __MVFlags;
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSMovieView = objcclass;
   NSMovieView = objcclass;
   NSMovieViewPointer = ^NSMovieView;
   NSMovieViewPointer = ^NSMovieView;
+  NSMovieViewPtr = NSMovieViewPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -67,54 +74,57 @@ _MVFlags = __MVFlags;
 { NSMovieView }
 { NSMovieView }
   NSMovieView = objcclass(NSView, NSUserInterfaceValidationsProtocol)
   NSMovieView = objcclass(NSView, NSUserInterfaceValidationsProtocol)
   private
   private
-    __fMovie: NSMovie;
-    __fRate: single;
-    __fVolume: single;
-    __fFlags: _MVFlags;
-    __fAuxData: Pointer;
-    __fReserved1: culong;
-    __fReserved2: culong;
-    __fReserved3: culong;
+    _fMovie: NSMovie;
+    _fRate: single;
+    _fVolume: single;
+    _fFlags: _MVFlags;
+    _fAuxData: Pointer;
+    _fReserved1: culong;
+    _fReserved2: culong;
+    _fReserved3: culong;
     
     
   public
   public
     class function alloc: NSMovieView; message 'alloc';
     class function alloc: NSMovieView; message 'alloc';
 
 
-    procedure setMovie(movie_: NSMovie); message 'setMovie:';
-    function movie: NSMovie; message 'movie';
-    function movieController: Pointer; message 'movieController';
-    function movieRect: NSRect; message 'movieRect';
-    procedure start(sender: id); message 'start:';
-    procedure stop(sender: id); message 'stop:';
-    function isPlaying: Boolean; message 'isPlaying';
-    procedure gotoPosterFrame(sender: id); message 'gotoPosterFrame:';
-    procedure gotoBeginning(sender: id); message 'gotoBeginning:';
-    procedure gotoEnd(sender: id); message 'gotoEnd:';
-    procedure stepForward(sender: id); message 'stepForward:';
-    procedure stepBack(sender: id); message 'stepBack:';
-    procedure setRate(rate_: single); message 'setRate:';
-    function rate: single; message 'rate';
-    procedure setVolume(volume_: single); message 'setVolume:';
-    function volume: single; message 'volume';
-    procedure setMuted(mute: Boolean); message 'setMuted:';
-    function isMuted: Boolean; message 'isMuted';
-    procedure setLoopMode(mode: NSQTMovieLoopMode); message 'setLoopMode:';
-    function loopMode: NSQTMovieLoopMode; message 'loopMode';
-    procedure setPlaysSelectionOnly(flag: Boolean); message 'setPlaysSelectionOnly:';
-    function playsSelectionOnly: Boolean; message 'playsSelectionOnly';
-    procedure setPlaysEveryFrame(flag: Boolean); message 'setPlaysEveryFrame:';
-    function playsEveryFrame: Boolean; message 'playsEveryFrame';
-    procedure showController_adjustingSize(show: Boolean; adjustSize: Boolean); message 'showController:adjustingSize:';
-    function isControllerVisible: Boolean; message 'isControllerVisible';
-    procedure resizeWithMagnification(magnification: CGFloat); message 'resizeWithMagnification:';
-    function sizeForMagnification(magnification: CGFloat): NSSize; message 'sizeForMagnification:';
-    procedure setEditable(editable: Boolean); message 'setEditable:';
-    function isEditable: Boolean; message 'isEditable';
-    procedure cut(sender: id); message 'cut:';
-    procedure copy_(sender: id); message 'copy:';
-    procedure paste(sender: id); message 'paste:';
+    procedure setMovie(movie: NSMovie); message 'setMovie:'; deprecated 'in Mac OS X 10.5 and later';
+    function movie: NSMovie; message 'movie'; deprecated 'in Mac OS X 10.5 and later';
+    function movieController: Pointer; message 'movieController'; deprecated 'in Mac OS X 10.5 and later';
+    function movieRect: NSRect; message 'movieRect'; deprecated 'in Mac OS X 10.5 and later';
+    procedure start(sender: id); message 'start:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure stop(sender: id); message 'stop:'; deprecated 'in Mac OS X 10.5 and later';
+    function isPlaying: Boolean; message 'isPlaying'; deprecated 'in Mac OS X 10.5 and later';
+    procedure gotoPosterFrame(sender: id); message 'gotoPosterFrame:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure gotoBeginning(sender: id); message 'gotoBeginning:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure gotoEnd(sender: id); message 'gotoEnd:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure stepForward(sender: id); message 'stepForward:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure stepBack(sender: id); message 'stepBack:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setRate(rate: single); message 'setRate:'; deprecated 'in Mac OS X 10.5 and later';
+    function rate: single; message 'rate'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setVolume(volume: single); message 'setVolume:'; deprecated 'in Mac OS X 10.5 and later';
+    function volume: single; message 'volume'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setMuted(mute: Boolean); message 'setMuted:'; deprecated 'in Mac OS X 10.5 and later';
+    function isMuted: Boolean; message 'isMuted'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setLoopMode(mode: NSQTMovieLoopMode); message 'setLoopMode:'; deprecated 'in Mac OS X 10.5 and later';
+    function loopMode: NSQTMovieLoopMode; message 'loopMode'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setPlaysSelectionOnly(flag: Boolean); message 'setPlaysSelectionOnly:'; deprecated 'in Mac OS X 10.5 and later';
+    function playsSelectionOnly: Boolean; message 'playsSelectionOnly'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setPlaysEveryFrame(flag: Boolean); message 'setPlaysEveryFrame:'; deprecated 'in Mac OS X 10.5 and later';
+    function playsEveryFrame: Boolean; message 'playsEveryFrame'; deprecated 'in Mac OS X 10.5 and later';
+    procedure showController_adjustingSize(show: Boolean; adjustSize: Boolean); message 'showController:adjustingSize:'; deprecated 'in Mac OS X 10.5 and later';
+    function isControllerVisible: Boolean; message 'isControllerVisible'; deprecated 'in Mac OS X 10.5 and later';
+    procedure resizeWithMagnification(magnification: CGFloat); message 'resizeWithMagnification:'; deprecated 'in Mac OS X 10.5 and later';
+    function sizeForMagnification(magnification: CGFloat): NSSize; message 'sizeForMagnification:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setEditable(editable: Boolean); message 'setEditable:'; deprecated 'in Mac OS X 10.5 and later';
+    function isEditable: Boolean; message 'isEditable'; deprecated 'in Mac OS X 10.5 and later';
+    procedure cut(sender: id); message 'cut:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure copy_(sender: id); message 'copy:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure paste(sender: id); message 'paste:'; deprecated 'in Mac OS X 10.5 and later';
     procedure delete(sender: id); message 'delete:';
     procedure delete(sender: id); message 'delete:';
-    procedure selectAll(sender: id); message 'selectAll:';
-    procedure clear(sender: id); message 'clear:';
+    procedure selectAll(sender: id); message 'selectAll:'; deprecated 'in Mac OS X 10.5 and later';
+    procedure clear(sender: id); message 'clear:'; deprecated 'in Mac OS X 10.5 and later';
+
+    { Adopted Protocols }
+    function validateUserInterfaceItem(anItem: id): Boolean;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 18 - 9
packages/cocoaint/src/appkit/NSNib.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSNib.h }
 { Parsed from Appkit.framework NSNib.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,8 +29,8 @@
 
 
 { External string constants }
 { External string constants }
 var
 var
-  NSNibOwner: NSString; external name '_NSNibOwner';
-  NSNibTopLevelObjects: NSString; external name '_NSNibTopLevelObjects';
+  NSNibOwner: NSString; cvar; external;
+  NSNibTopLevelObjects: NSString; cvar; external;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -38,6 +38,7 @@ var
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSNib = objcclass;
   NSNib = objcclass;
   NSNibPointer = ^NSNib;
   NSNibPointer = ^NSNib;
+  NSNibPtr = NSNibPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -48,16 +49,20 @@ var
 { NSNib }
 { NSNib }
   NSNib = objcclass(NSObject, NSCodingProtocol)
   NSNib = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __data: NSData;
-    __images: NSArray;
-    __sounds: NSArray;
-    __bundle: NSBundle;
+    _data: NSData;
+    _images: NSArray;
+    _sounds: NSArray;
+    _bundle: NSBundle;
     __flags: bitpacked record
     __flags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSNib0: cuint);
+       1: (
         _isKeyed: 0..1;
         _isKeyed: 0..1;
         _reserved: 0..((1 shl 31)-1);
         _reserved: 0..((1 shl 31)-1);
+      );
       end;
       end;
-    _reserved1: id;
-    _reserved2: id;
+    _path: NSString;
+    reserved2: id;
     
     
   public
   public
     class function alloc: NSNib; message 'alloc';
     class function alloc: NSNib; message 'alloc';
@@ -66,6 +71,10 @@ var
     function initWithNibNamed_bundle(nibName: NSString; bundle: NSBundle): id; message 'initWithNibNamed:bundle:';
     function initWithNibNamed_bundle(nibName: NSString; bundle: NSBundle): id; message 'initWithNibNamed:bundle:';
     function instantiateNibWithExternalNameTable(externalNameTable: NSDictionary): Boolean; message 'instantiateNibWithExternalNameTable:';
     function instantiateNibWithExternalNameTable(externalNameTable: NSDictionary): Boolean; message 'instantiateNibWithExternalNameTable:';
     function instantiateNibWithOwner_topLevelObjects(owner: id; topLevelObjects: NSArrayPointer): Boolean; message 'instantiateNibWithOwner:topLevelObjects:';
     function instantiateNibWithOwner_topLevelObjects(owner: id; topLevelObjects: NSArrayPointer): Boolean; message 'instantiateNibWithOwner:topLevelObjects:';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 {$endif}
 {$endif}

+ 23 - 1
packages/cocoaint/src/appkit/NSNibLoading.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSNibLoading.h }
 { Parsed from Appkit.framework NSNibLoading.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -29,3 +29,25 @@
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
+
+{$ifdef FORWARD}
+
+{$endif}
+
+{$ifdef CLASSES}
+{$ifndef NSNIBLOADING_PAS_C}
+{$define NSNIBLOADING_PAS_C}
+
+{ NSNibLoadingCategory }
+  NSNibLoadingCategory = objccategory(NSBundle)
+    class function loadNibFile_externalNameTable_withZone(fileName: NSString; context: NSDictionary; zone_: NSZonePtr): Boolean; message 'loadNibFile:externalNameTable:withZone:';
+    class function loadNibNamed_owner(nibName: NSString; owner: id): Boolean; message 'loadNibNamed:owner:';
+  end; external;
+
+{ NSNibAwakingCategory }
+  NSNibAwakingCategory = objccategory(NSObject)
+    procedure awakeFromNib; message 'awakeFromNib';
+  end; external;
+
+{$endif}
+{$endif}

+ 18 - 11
packages/cocoaint/src/appkit/NSObjectController.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSObjectController.h }
 { Parsed from Appkit.framework NSObjectController.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -33,6 +33,7 @@
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSObjectController = objcclass;
   NSObjectController = objcclass;
   NSObjectControllerPointer = ^NSObjectController;
   NSObjectControllerPointer = ^NSObjectController;
+  NSObjectControllerPtr = NSObjectControllerPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -43,9 +44,12 @@
 { NSObjectController }
 { NSObjectController }
   NSObjectController = objcclass(NSController)
   NSObjectController = objcclass(NSController)
   private
   private
-    __reserved3: Pointer;
-    __managedProxy: id;
+    _reserved3: Pointer;
+    _managedProxy: id;
     __objectControllerFlags: bitpacked record
     __objectControllerFlags: bitpacked record
+      case byte of
+       0: (_anonbitfield_NSObjectController0: cuint);
+       1: (
         _editable: 0..1;
         _editable: 0..1;
         _automaticallyPreparesContent: 0..1;
         _automaticallyPreparesContent: 0..1;
         _hasLoadedData: 0..1;
         _hasLoadedData: 0..1;
@@ -55,12 +59,13 @@
         _hasFetched: 0..1;
         _hasFetched: 0..1;
         _batches: 0..1;
         _batches: 0..1;
         _reservedObjectController: 0..((1 shl 24)-1);
         _reservedObjectController: 0..((1 shl 24)-1);
+      );
       end;
       end;
-    __objectClassName: NSString;
-    __objectClass: Pobjc_class;
-    __contentObjectArray: NSArray;
-    __content: id;
-    __objectHandler: id;
+    _objectClassName: NSString;
+    _objectClass: Pobjc_class;
+    _contentObjectArray: NSArray;
+    _content: id;
+    _objectHandler: id;
     
     
   public
   public
     class function alloc: NSObjectController; message 'alloc';
     class function alloc: NSObjectController; message 'alloc';
@@ -85,15 +90,17 @@
     procedure remove(sender: id); message 'remove:';
     procedure remove(sender: id); message 'remove:';
     function canRemove: Boolean; message 'canRemove';
     function canRemove: Boolean; message 'canRemove';
     function validateUserInterfaceItem(item: id): Boolean; message 'validateUserInterfaceItem:';
     function validateUserInterfaceItem(item: id): Boolean; message 'validateUserInterfaceItem:';
+  end; external;
 
 
-    { Category: NSManagedController }
+{ NSManagedControllerCategory }
+  NSManagedControllerCategory = objccategory(NSObjectController)
     function managedObjectContext: NSManagedObjectContext; message 'managedObjectContext';
     function managedObjectContext: NSManagedObjectContext; message 'managedObjectContext';
-    procedure setManagedObjectContext(managedObjectContext_: NSManagedObjectContextPointer); message 'setManagedObjectContext:';
+    procedure setManagedObjectContext(managedObjectContext_: NSManagedObjectContext); message 'setManagedObjectContext:';
     function entityName: NSString; message 'entityName';
     function entityName: NSString; message 'entityName';
     procedure setEntityName(entityName_: NSString); message 'setEntityName:';
     procedure setEntityName(entityName_: NSString); message 'setEntityName:';
     function fetchPredicate: NSPredicate; message 'fetchPredicate';
     function fetchPredicate: NSPredicate; message 'fetchPredicate';
     procedure setFetchPredicate(predicate: NSPredicate); message 'setFetchPredicate:';
     procedure setFetchPredicate(predicate: NSPredicate); message 'setFetchPredicate:';
-    function fetchWithRequest_merge_error(fetchRequest: NSFetchRequestPointer; merge: Boolean; error: NSErrorPointer): Boolean; message 'fetchWithRequest:merge:error:';
+    function fetchWithRequest_merge_error(fetchRequest: NSFetchRequest; merge: Boolean; error: NSErrorPointer): Boolean; message 'fetchWithRequest:merge:error:';
     procedure fetch(sender: id); message 'fetch:';
     procedure fetch(sender: id); message 'fetch:';
     procedure setUsesLazyFetching(enabled: Boolean); message 'setUsesLazyFetching:';
     procedure setUsesLazyFetching(enabled: Boolean); message 'setUsesLazyFetching:';
     function usesLazyFetching: Boolean; message 'usesLazyFetching';
     function usesLazyFetching: Boolean; message 'usesLazyFetching';

+ 46 - 23
packages/cocoaint/src/appkit/NSOpenGL.inc

@@ -1,5 +1,5 @@
 { Parsed from Appkit.framework NSOpenGL.h }
 { Parsed from Appkit.framework NSOpenGL.h }
-{ Version FrameworkParser: 1.3. PasCocoa 0.3, Objective-P 0.4 - Thu Oct 1 18:54:07 ICT 2009 }
+{ Version: 2.1.2 - Wed Dec 8 10:06:06 CET 2010 }
 
 
 
 
 {$ifdef TYPES}
 {$ifdef TYPES}
@@ -10,6 +10,13 @@
 const
 const
   NSOPENGL_CURRENT_VERSION = 1;
   NSOPENGL_CURRENT_VERSION = 1;
 
 
+{ Types }
+type
+  
+  NSOpenGLGlobalOption = culong;
+  
+  NSOpenGLContextParameter = culong;
+
 { Constants }
 { Constants }
 
 
 const
 const
@@ -52,7 +59,9 @@ const
   NSOpenGLPFACompliant = 83;
   NSOpenGLPFACompliant = 83;
   NSOpenGLPFAScreenMask = 84;
   NSOpenGLPFAScreenMask = 84;
   NSOpenGLPFAPixelBuffer = 90;
   NSOpenGLPFAPixelBuffer = 90;
+  NSOpenGLPFARemotePixelBuffer = 91;
   NSOpenGLPFAAllowOfflineRenderers = 96;
   NSOpenGLPFAAllowOfflineRenderers = 96;
+  NSOpenGLPFAAcceleratedCompute = 97;
   NSOpenGLPFAVirtualScreenCount = 128;
   NSOpenGLPFAVirtualScreenCount = 128;
 
 
 const
 const
@@ -66,16 +75,14 @@ const
 
 
 { Types }
 { Types }
 type
 type
-  NSOpenGLGlobalOption = culong;
-  NSOpenGLContextParameter = culong;
-
-{ Types }
-type
-  NSOpenGLPixelFormatAttribute = cardinal;
-  _CGLPixelFormatObject = Pointer;
+  NSOpenGLPixelFormatAttribute = cuint32;
+  NSOpenGLPixelFormatAttributePtr = ^NSOpenGLPixelFormatAttribute;
+  _CGLPixelFormatObject = record end;
   NSOpenGLPixelFormatAuxiliary = _CGLPixelFormatObject;
   NSOpenGLPixelFormatAuxiliary = _CGLPixelFormatObject;
-  _CGLContextObject = Pointer;
+  NSOpenGLPixelFormatAuxiliaryPtr = ^NSOpenGLPixelFormatAuxiliary;
+  _CGLContextObject = record end;
   NSOpenGLContextAuxiliary = _CGLContextObject;
   NSOpenGLContextAuxiliary = _CGLContextObject;
+  NSOpenGLContextAuxiliaryPtr = ^NSOpenGLContextAuxiliary;
 
 
 {$endif}
 {$endif}
 {$endif}
 {$endif}
@@ -91,6 +98,11 @@ type
 {$ifndef NSOPENGL_PAS_F}
 {$ifndef NSOPENGL_PAS_F}
 {$define NSOPENGL_PAS_F}
 {$define NSOPENGL_PAS_F}
 
 
+{ Functions }
+procedure NSOpenGLSetOption(pname: NSOpenGLGlobalOption; param: GLint); cdecl; external;
+procedure NSOpenGLGetOption(pname: NSOpenGLGlobalOption; param: GLintPtr); cdecl; external;
+procedure NSOpenGLGetVersion(major: GLintPtr; minor: GLintPtr); cdecl; external;
+
 {$endif}
 {$endif}
 {$endif}
 {$endif}
 
 
@@ -104,10 +116,13 @@ type
 {$ifdef FORWARD}
 {$ifdef FORWARD}
   NSOpenGLPixelFormat = objcclass;
   NSOpenGLPixelFormat = objcclass;
   NSOpenGLPixelFormatPointer = ^NSOpenGLPixelFormat;
   NSOpenGLPixelFormatPointer = ^NSOpenGLPixelFormat;
+  NSOpenGLPixelFormatPtr = NSOpenGLPixelFormatPointer;
   NSOpenGLPixelBuffer = objcclass;
   NSOpenGLPixelBuffer = objcclass;
   NSOpenGLPixelBufferPointer = ^NSOpenGLPixelBuffer;
   NSOpenGLPixelBufferPointer = ^NSOpenGLPixelBuffer;
+  NSOpenGLPixelBufferPtr = NSOpenGLPixelBufferPointer;
   NSOpenGLContext = objcclass;
   NSOpenGLContext = objcclass;
   NSOpenGLContextPointer = ^NSOpenGLContext;
   NSOpenGLContextPointer = ^NSOpenGLContext;
+  NSOpenGLContextPtr = NSOpenGLContextPointer;
 
 
 {$endif}
 {$endif}
 
 
@@ -118,35 +133,42 @@ type
 { NSOpenGLPixelFormat }
 { NSOpenGLPixelFormat }
   NSOpenGLPixelFormat = objcclass(NSObject, NSCodingProtocol)
   NSOpenGLPixelFormat = objcclass(NSObject, NSCodingProtocol)
   private
   private
-    __pixelFormatAuxiliary: NSOpenGLPixelFormatAuxiliary;
-    __pixelAttributes: NSData;
-    __reserved1: NSInteger;
-    __reserved2: NSInteger;
-    __reserved3: NSInteger;
+    _pixelFormatAuxiliary: NSOpenGLPixelFormatAuxiliaryPtr;
+    _pixelAttributes: NSData;
+    _reserved1: NSInteger;
+    _reserved2: NSInteger;
+    _reserved3: NSInteger;
     
     
   public
   public
     class function alloc: NSOpenGLPixelFormat; message 'alloc';
     class function alloc: NSOpenGLPixelFormat; message 'alloc';
 
 
-    function initWithAttributes(attribs: NSOpenGLPixelFormatAttributePointer): id; message 'initWithAttributes:';
+    function initWithAttributes(attribs: NSOpenGLPixelFormatAttributePtr): id; message 'initWithAttributes:';
     function initWithData(attribs: NSData): id; message 'initWithData:';
     function initWithData(attribs: NSData): id; message 'initWithData:';
+    function initWithCGLPixelFormatObj(format: Pointer): id; message 'initWithCGLPixelFormatObj:';
     function attributes: NSData; message 'attributes';
     function attributes: NSData; message 'attributes';
     procedure setAttributes(attribs: NSData); message 'setAttributes:';
     procedure setAttributes(attribs: NSData); message 'setAttributes:';
-    procedure getValues_forAttribute_forVirtualScreen(vals: GLintPointer; attrib: NSOpenGLPixelFormatAttribute; screen: GLint); message 'getValues:forAttribute:forVirtualScreen:';
+    procedure getValues_forAttribute_forVirtualScreen(vals: GLintPtr; attrib: NSOpenGLPixelFormatAttribute; screen: GLint); message 'getValues:forAttribute:forVirtualScreen:';
     function numberOfVirtualScreens: GLint; message 'numberOfVirtualScreens';
     function numberOfVirtualScreens: GLint; message 'numberOfVirtualScreens';
     function CGLPixelFormatObj: Pointer; message 'CGLPixelFormatObj';
     function CGLPixelFormatObj: Pointer; message 'CGLPixelFormatObj';
+
+    { Adopted Protocols }
+    procedure encodeWithCoder(aCoder: NSCoder);
+    function initWithCoder(aDecoder: NSCoder): id;
   end; external;
   end; external;
 
 
 { NSOpenGLPixelBuffer }
 { NSOpenGLPixelBuffer }
   NSOpenGLPixelBuffer = objcclass(NSObject)
   NSOpenGLPixelBuffer = objcclass(NSObject)
   private
   private
-    __pixelBufferAuxiliary: _CGLPBufferObject;
-    __reserved1: Pointer;
-    __reserved2: Pointer;
+    __pixelBufferAuxiliary: Pointer;
+    _reserved1: Pointer;
+    _reserved2: Pointer;
     
     
   public
   public
     class function alloc: NSOpenGLPixelBuffer; message 'alloc';
     class function alloc: NSOpenGLPixelBuffer; message 'alloc';
 
 
     function initWithTextureTarget_textureInternalFormat_textureMaxMipMapLevel_pixelsWide_pixelsHigh(target: GLenum; format: GLenum; maxLevel: GLint; pixelsWide_: GLsizei; pixelsHigh_: GLsizei): id; message 'initWithTextureTarget:textureInternalFormat:textureMaxMipMapLevel:pixelsWide:pixelsHigh:';
     function initWithTextureTarget_textureInternalFormat_textureMaxMipMapLevel_pixelsWide_pixelsHigh(target: GLenum; format: GLenum; maxLevel: GLint; pixelsWide_: GLsizei; pixelsHigh_: GLsizei): id; message 'initWithTextureTarget:textureInternalFormat:textureMaxMipMapLevel:pixelsWide:pixelsHigh:';
+    function initWithCGLPBufferObj(pbuffer: Pointer): id; message 'initWithCGLPBufferObj:';
+    function CGLPBufferObj: Pointer; message 'CGLPBufferObj';
     function pixelsWide: GLsizei; message 'pixelsWide';
     function pixelsWide: GLsizei; message 'pixelsWide';
     function pixelsHigh: GLsizei; message 'pixelsHigh';
     function pixelsHigh: GLsizei; message 'pixelsHigh';
     function textureTarget: GLenum; message 'textureTarget';
     function textureTarget: GLenum; message 'textureTarget';
@@ -157,13 +179,14 @@ type
 { NSOpenGLContext }
 { NSOpenGLContext }
   NSOpenGLContext = objcclass(NSObject)
   NSOpenGLContext = objcclass(NSObject)
   private
   private
-    __view: NSView;
-    __contextAuxiliary: NSOpenGLContextAuxiliary;
+    _view: NSView;
+    _contextAuxiliary: NSOpenGLContextAuxiliaryPtr;
     
     
   public
   public
     class function alloc: NSOpenGLContext; message 'alloc';
     class function alloc: NSOpenGLContext; message 'alloc';
 
 
     function initWithFormat_shareContext(format: NSOpenGLPixelFormat; share: NSOpenGLContext): id; message 'initWithFormat:shareContext:';
     function initWithFormat_shareContext(format: NSOpenGLPixelFormat; share: NSOpenGLContext): id; message 'initWithFormat:shareContext:';
+    function initWithCGLContextObj(context: Pointer): id; message 'initWithCGLContextObj:';
     procedure setView(view_: NSView); message 'setView:';
     procedure setView(view_: NSView); message 'setView:';
     function view: NSView; message 'view';
     function view: NSView; message 'view';
     procedure setFullScreen; message 'setFullScreen';
     procedure setFullScreen; message 'setFullScreen';
@@ -175,8 +198,8 @@ type
     class procedure clearCurrentContext; message 'clearCurrentContext';
     class procedure clearCurrentContext; message 'clearCurrentContext';
     class function currentContext: NSOpenGLContext; message 'currentContext';
     class function currentContext: NSOpenGLContext; message 'currentContext';
     procedure copyAttributesFromContext_withMask(context: NSOpenGLContext; mask: GLbitfield); message 'copyAttributesFromContext:withMask:';
     procedure copyAttributesFromContext_withMask(context: NSOpenGLContext; mask: GLbitfield); message 'copyAttributesFromContext:withMask:';
-    procedure setValues_forParameter(vals: GLintPointer; param: NSOpenGLContextParameter); message 'setValues:forParameter:';
-    procedure getValues_forParameter(vals: GLintPointer; param: NSOpenGLContextParameter); message 'getValues:forParameter:';
+    procedure setValues_forParameter(vals: GLintPtr; param: NSOpenGLContextParameter); message 'setValues:forParameter:';
+    procedure getValues_forParameter(vals: GLintPtr; param: NSOpenGLContextParameter); message 'getValues:forParameter:';
     procedure setCurrentVirtualScreen(screen: GLint); message 'setCurrentVirtualScreen:';
     procedure setCurrentVirtualScreen(screen: GLint); message 'setCurrentVirtualScreen:';
     function currentVirtualScreen: GLint; message 'currentVirtualScreen';
     function currentVirtualScreen: GLint; message 'currentVirtualScreen';
     procedure createTexture_fromView_internalFormat(target: GLenum; view_: NSView; format: GLenum); message 'createTexture:fromView:internalFormat:';
     procedure createTexture_fromView_internalFormat(target: GLenum; view_: NSView; format: GLenum); message 'createTexture:fromView:internalFormat:';

Some files were not shown because too many files changed in this diff