* reparsed with latest script version, which adds "optional" sections to

protocols where required git-svn-id: trunk@16924 -
2025-04-17 03:39:28 +02:00 · 2011-02-16 18:48:22 +00:00 · 2011-02-16 18:48:22 +00:00 · 06ae2896ea
commit 06ae2896ea
parent b3ee4ea4eb
47 changed files with 63 additions and 0 deletions
--- a/packages/cocoaint/src/appkit/NSAlert.inc
+++ b/packages/cocoaint/src/appkit/NSAlert.inc
@ -130,6 +130,7 @@ type
  
 { NSAlertDelegate Protocol }
  NSAlertDelegateProtocol = objcprotocol external name 'NSAlertDelegate'
+  optional
    function alertShowHelp(alert: NSAlert): Boolean; message 'alertShowHelp:';
  end;
 {$endif}
--- a/packages/cocoaint/src/appkit/NSAnimation.inc
+++ b/packages/cocoaint/src/appkit/NSAnimation.inc
@ -189,6 +189,7 @@ var
  
 { NSAnimationDelegate Protocol }
  NSAnimationDelegateProtocol = objcprotocol external name 'NSAnimationDelegate'
+  optional
    function animationShouldStart(animation: NSAnimation): Boolean; message 'animationShouldStart:';
    procedure animationDidStop(animation: NSAnimation); message 'animationDidStop:';
    procedure animationDidEnd(animation: NSAnimation); message 'animationDidEnd:';
@ -198,6 +199,7 @@ var
  
 { NSAnimatablePropertyContainer Protocol }
  NSAnimatablePropertyContainerProtocol = objcprotocol external name 'NSAnimatablePropertyContainer'
+  optional
    function animator: id; message 'animator';
    function animations: NSDictionary; message 'animations';
    procedure setAnimations(dict: NSDictionary); message 'setAnimations:';
--- a/packages/cocoaint/src/appkit/NSApplication.inc
+++ b/packages/cocoaint/src/appkit/NSApplication.inc
@ -351,6 +351,7 @@ var
  
 { NSApplicationDelegate Protocol }
  NSApplicationDelegateProtocol = objcprotocol external name 'NSApplicationDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSBrowser.inc
+++ b/packages/cocoaint/src/appkit/NSBrowser.inc
@ -289,6 +289,7 @@ var
  
 { NSBrowserDelegate Protocol }
  NSBrowserDelegateProtocol = objcprotocol external name 'NSBrowserDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSCollectionView.inc
+++ b/packages/cocoaint/src/appkit/NSCollectionView.inc
@ -171,6 +171,7 @@ const
  
 { NSCollectionViewDelegate Protocol }
  NSCollectionViewDelegateProtocol = objcprotocol external name 'NSCollectionViewDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSComboBox.inc
+++ b/packages/cocoaint/src/appkit/NSComboBox.inc
@ -101,6 +101,7 @@ var
  
 { NSComboBoxDataSource Protocol }
  NSComboBoxDataSourceProtocol = objcprotocol external name 'NSComboBoxDataSource'
+  optional
    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:';
@ -109,6 +110,7 @@ var
  
 { NSComboBoxDelegate Protocol }
  NSComboBoxDelegateProtocol = objcprotocol external name 'NSComboBoxDelegate'
+  optional
    procedure comboBoxWillPopUp(notification: NSNotification); message 'comboBoxWillPopUp:';
    procedure comboBoxWillDismiss(notification: NSNotification); message 'comboBoxWillDismiss:';
    procedure comboBoxSelectionDidChange(notification: NSNotification); message 'comboBoxSelectionDidChange:';
--- a/packages/cocoaint/src/appkit/NSComboBoxCell.inc
+++ b/packages/cocoaint/src/appkit/NSComboBoxCell.inc
@ -79,6 +79,7 @@
  
 { NSComboBoxCellDataSource Protocol }
  NSComboBoxCellDataSourceProtocol = objcprotocol external name 'NSComboBoxCellDataSource'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSControl.inc
+++ b/packages/cocoaint/src/appkit/NSControl.inc
@ -160,6 +160,7 @@ var
  
 { NSControlTextEditingDelegate Protocol }
  NSControlTextEditingDelegateProtocol = objcprotocol external name 'NSControlTextEditingDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSDatePickerCell.inc
+++ b/packages/cocoaint/src/appkit/NSDatePickerCell.inc
@ -141,6 +141,7 @@ type
  
 { NSDatePickerCellDelegate Protocol }
  NSDatePickerCellDelegateProtocol = objcprotocol external name 'NSDatePickerCellDelegate'
+  optional
    procedure datePickerCell_validateProposedDateValue_timeInterval(aDatePickerCell: NSDatePickerCell; proposedDateValue: NSDatePointer; proposedTimeInterval: NSTimeIntervalPtr); message 'datePickerCell:validateProposedDateValue:timeInterval:';
  end;
 {$endif}
--- a/packages/cocoaint/src/appkit/NSDockTile.inc
+++ b/packages/cocoaint/src/appkit/NSDockTile.inc
@ -84,7 +84,9 @@ const
  
 { NSDockTilePlugIn Protocol }
  NSDockTilePlugInProtocol = objcprotocol external name 'NSDockTilePlugIn'
+  required
    procedure setDockTile(dockTile: NSDockTile); message 'setDockTile:';
+  optional
    function dockMenu: NSMenu; message 'dockMenu';
  end;
 {$endif}
--- a/packages/cocoaint/src/appkit/NSDrawer.inc
+++ b/packages/cocoaint/src/appkit/NSDrawer.inc
@ -126,6 +126,7 @@ var
  
 { NSDrawerDelegate Protocol }
  NSDrawerDelegateProtocol = objcprotocol external name 'NSDrawerDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSImage.inc
+++ b/packages/cocoaint/src/appkit/NSImage.inc
@ -259,6 +259,7 @@ var
  
 { NSImageDelegate Protocol }
  NSImageDelegateProtocol = objcprotocol external name 'NSImageDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSLayoutManager.inc
+++ b/packages/cocoaint/src/appkit/NSLayoutManager.inc
@ -307,6 +307,7 @@ type
  
 { NSLayoutManagerDelegate Protocol }
  NSLayoutManagerDelegateProtocol = objcprotocol external name 'NSLayoutManagerDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSMenu.inc
+++ b/packages/cocoaint/src/appkit/NSMenu.inc
@ -195,6 +195,7 @@ var
  
 { NSMenuDelegate Protocol }
  NSMenuDelegateProtocol = objcprotocol external name 'NSMenuDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/appkit/NSOutlineView.inc
+++ b/packages/cocoaint/src/appkit/NSOutlineView.inc
@ -209,6 +209,7 @@ var
  
 { NSOutlineViewDataSource Protocol }
  NSOutlineViewDataSourceProtocol = objcprotocol external name 'NSOutlineViewDataSource'
+  optional
    function outlineView_child_ofItem(outlineView: NSOutlineView; index: NSInteger; item: id): id; message 'outlineView:child:ofItem:';
    function outlineView_isItemExpandable(outlineView: NSOutlineView; item: id): Boolean; message 'outlineView:isItemExpandable:';
    function outlineView_numberOfChildrenOfItem(outlineView: NSOutlineView; item: id): NSInteger; message 'outlineView:numberOfChildrenOfItem:';
@ -225,6 +226,7 @@ var
  
 { NSOutlineViewDelegate Protocol }
  NSOutlineViewDelegateProtocol = objcprotocol external name 'NSOutlineViewDelegate'
+  optional
    procedure outlineView_willDisplayCell_forTableColumn_item(outlineView: NSOutlineView; cell: id; tableColumn: NSTableColumn; item: id); message 'outlineView:willDisplayCell:forTableColumn:item:';
    function outlineView_shouldEditTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): Boolean; message 'outlineView:shouldEditTableColumn:item:';
    function selectionShouldChangeInOutlineView(outlineView: NSOutlineView): Boolean; message 'selectionShouldChangeInOutlineView:';
--- a/packages/cocoaint/src/appkit/NSPasteboard.inc
+++ b/packages/cocoaint/src/appkit/NSPasteboard.inc
@ -187,14 +187,19 @@ var
  
 { NSPasteboardWriting Protocol }
  NSPasteboardWritingProtocol = objcprotocol external name 'NSPasteboardWriting'
+  required
    function writableTypesForPasteboard(pasteboard: NSPasteboard): NSArray; message 'writableTypesForPasteboard:';
+  optional
    function writingOptionsForType_pasteboard(type_: NSString; pasteboard: NSPasteboard): NSPasteboardWritingOptions; message 'writingOptionsForType:pasteboard:';
+  required
    function pasteboardPropertyListForType(type_: NSString): id; message 'pasteboardPropertyListForType:';
  end;
  
 { NSPasteboardReading Protocol }
  NSPasteboardReadingProtocol = objcprotocol external name 'NSPasteboardReading'
+  required
    class function readableTypesForPasteboard(pasteboard: NSPasteboard): NSArray; message 'readableTypesForPasteboard:';
+  optional
    class function readingOptionsForType_pasteboard(type_: NSString; pasteboard: NSPasteboard): NSPasteboardReadingOptions; message 'readingOptionsForType:pasteboard:';
    function initWithPasteboardPropertyList_ofType(propertyList: id; type_: NSString): id; message 'initWithPasteboardPropertyList:ofType:';
  end;
--- a/packages/cocoaint/src/appkit/NSPasteboardItem.inc
+++ b/packages/cocoaint/src/appkit/NSPasteboardItem.inc
@ -77,7 +77,9 @@
  
 { NSPasteboardItemDataProvider Protocol }
  NSPasteboardItemDataProviderProtocol = objcprotocol external name 'NSPasteboardItemDataProvider'
+  required
    procedure pasteboard_item_provideDataForType(pasteboard: NSPasteboard; item: NSPasteboardItem; type_: NSString); message 'pasteboard:item:provideDataForType:';
+  optional
    procedure pasteboardFinishedWithDataProvider(pasteboard: NSPasteboard); message 'pasteboardFinishedWithDataProvider:';
  end;
 {$endif}
--- a/packages/cocoaint/src/appkit/NSPathCell.inc
+++ b/packages/cocoaint/src/appkit/NSPathCell.inc
@ -121,6 +121,7 @@ type
  
 { NSPathCellDelegate Protocol }
  NSPathCellDelegateProtocol = objcprotocol external name 'NSPathCellDelegate'
+  optional
    procedure pathCell_willDisplayOpenPanel(pathCell: NSPathCell; openPanel: NSOpenPanel); message 'pathCell:willDisplayOpenPanel:';
    procedure pathCell_willPopUpMenu(pathCell: NSPathCell; menu: NSMenu); message 'pathCell:willPopUpMenu:';
  end;
--- a/packages/cocoaint/src/appkit/NSPathControl.inc
+++ b/packages/cocoaint/src/appkit/NSPathControl.inc
@ -76,6 +76,7 @@
  
 { NSPathControlDelegate Protocol }
  NSPathControlDelegateProtocol = objcprotocol external name 'NSPathControlDelegate'
+  optional
    function pathControl_shouldDragPathComponentCell_withPasteboard(pathControl: NSPathControl; pathComponentCell: NSPathComponentCell; pasteboard: NSPasteboard): Boolean; message 'pathControl:shouldDragPathComponentCell:withPasteboard:';
    function pathControl_validateDrop(pathControl: NSPathControl; info: NSDraggingInfoProtocol): NSDragOperation; message 'pathControl:validateDrop:';
    function pathControl_acceptDrop(pathControl: NSPathControl; info: NSDraggingInfoProtocol): Boolean; message 'pathControl:acceptDrop:';
--- a/packages/cocoaint/src/appkit/NSPrintPanel.inc
+++ b/packages/cocoaint/src/appkit/NSPrintPanel.inc
@ -123,6 +123,7 @@ var
 { NSPrintPanelAccessorizing Protocol }
  NSPrintPanelAccessorizingProtocol = objcprotocol external name 'NSPrintPanelAccessorizing'
    function localizedSummaryItems: NSArray; message 'localizedSummaryItems';
+  optional
    function keyPathsForValuesAffectingPreview: NSSet; message 'keyPathsForValuesAffectingPreview';
  end;
 {$endif}
--- a/packages/cocoaint/src/appkit/NSRuleEditor.inc
+++ b/packages/cocoaint/src/appkit/NSRuleEditor.inc
@ -173,9 +173,11 @@ var
  
 { NSRuleEditorDelegate Protocol }
  NSRuleEditorDelegateProtocol = objcprotocol external name 'NSRuleEditorDelegate'
+  required
    function ruleEditor_numberOfChildrenForCriterion_withRowType(editor: NSRuleEditor; criterion: id; rowType: NSRuleEditorRowType): NSInteger; message 'ruleEditor:numberOfChildrenForCriterion:withRowType:';
    function ruleEditor_child_forCriterion_withRowType(editor: NSRuleEditor; index: NSInteger; criterion: id; rowType: NSRuleEditorRowType): id; message 'ruleEditor:child:forCriterion:withRowType:';
    function ruleEditor_displayValueForCriterion_inRow(editor: NSRuleEditor; criterion: id; row: NSInteger): id; message 'ruleEditor:displayValueForCriterion:inRow:';
+  optional
    function ruleEditor_predicatePartsForCriterion_withDisplayValue_inRow(editor: NSRuleEditor; criterion: id; value: id; row: NSInteger): NSDictionary; message 'ruleEditor:predicatePartsForCriterion:withDisplayValue:inRow:';
    procedure ruleEditorRowsDidChange(notification: NSNotification); message 'ruleEditorRowsDidChange:';
  end;
--- a/packages/cocoaint/src/appkit/NSSavePanel.inc
+++ b/packages/cocoaint/src/appkit/NSSavePanel.inc
@ -172,6 +172,7 @@ __SPFlagsPtr = ^__SPFlags;
  
 { NSOpenSavePanelDelegate Protocol }
  NSOpenSavePanelDelegateProtocol = objcprotocol external name 'NSOpenSavePanelDelegate'
+  optional
    function panel_shouldEnableURL(sender: id; url: NSURL): Boolean; message 'panel:shouldEnableURL:';
    function panel_validateURL_error(sender: id; url: NSURL; outError: NSErrorPointer): Boolean; message 'panel:validateURL:error:';
    procedure panel_didChangeToDirectoryURL(sender: id; url: NSURL); message 'panel:didChangeToDirectoryURL:';
--- a/packages/cocoaint/src/appkit/NSSound.inc
+++ b/packages/cocoaint/src/appkit/NSSound.inc
@ -102,6 +102,7 @@ var
  
 { NSSoundDelegate Protocol }
  NSSoundDelegateProtocol = objcprotocol external name 'NSSoundDelegate'
+  optional
    procedure sound_didFinishPlaying(sound: NSSound; aBool: Boolean); message 'sound:didFinishPlaying:';
  end;
 {$endif}
--- a/packages/cocoaint/src/appkit/NSSpeechRecognizer.inc
+++ b/packages/cocoaint/src/appkit/NSSpeechRecognizer.inc
@ -69,6 +69,7 @@
  
 { NSSpeechRecognizerDelegate Protocol }
  NSSpeechRecognizerDelegateProtocol = objcprotocol external name 'NSSpeechRecognizerDelegate'
+  optional
    procedure speechRecognizer_didRecognizeCommand(sender: NSSpeechRecognizer; command: id); message 'speechRecognizer:didRecognizeCommand:';
  end;
 {$endif}
--- a/packages/cocoaint/src/appkit/NSSpeechSynthesizer.inc
+++ b/packages/cocoaint/src/appkit/NSSpeechSynthesizer.inc
@ -153,6 +153,7 @@ var
  
 { NSSpeechSynthesizerDelegate Protocol }
  NSSpeechSynthesizerDelegateProtocol = objcprotocol external name 'NSSpeechSynthesizerDelegate'
+  optional
    procedure speechSynthesizer_didFinishSpeaking(sender: NSSpeechSynthesizer; finishedSpeaking: Boolean); message 'speechSynthesizer:didFinishSpeaking:';
    procedure speechSynthesizer_willSpeakWord_ofString(sender: NSSpeechSynthesizer; characterRange: NSRange; string_: NSString); message 'speechSynthesizer:willSpeakWord:ofString:';
    procedure speechSynthesizer_willSpeakPhoneme(sender: NSSpeechSynthesizer; phonemeOpcode: cshort); message 'speechSynthesizer:willSpeakPhoneme:';
--- a/packages/cocoaint/src/appkit/NSSplitView.inc
+++ b/packages/cocoaint/src/appkit/NSSplitView.inc
@ -95,6 +95,7 @@ var
  
 { NSSplitViewDelegate Protocol }
  NSSplitViewDelegateProtocol = objcprotocol external name 'NSSplitViewDelegate'
+  optional
    function splitView_canCollapseSubview(splitView: NSSplitView; subview: NSView): Boolean; message 'splitView:canCollapseSubview:';
    function splitView_shouldCollapseSubview_forDoubleClickOnDividerAtIndex(splitView: NSSplitView; subview: NSView; dividerIndex: NSInteger): Boolean; message 'splitView:shouldCollapseSubview:forDoubleClickOnDividerAtIndex:';
    function splitView_constrainMinCoordinate_ofSubviewAt(splitView: NSSplitView; proposedMinimumPosition: CGFloat; dividerIndex: NSInteger): CGFloat; message 'splitView:constrainMinCoordinate:ofSubviewAt:';
--- a/packages/cocoaint/src/appkit/NSTabView.inc
+++ b/packages/cocoaint/src/appkit/NSTabView.inc
@ -150,6 +150,7 @@ type
  
 { NSTabViewDelegate Protocol }
  NSTabViewDelegateProtocol = objcprotocol external name 'NSTabViewDelegate'
+  optional
    function tabView_shouldSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem): Boolean; message 'tabView:shouldSelectTabViewItem:';
    procedure tabView_willSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem); message 'tabView:willSelectTabViewItem:';
    procedure tabView_didSelectTabViewItem(tabView: NSTabView; tabViewItem: NSTabViewItem); message 'tabView:didSelectTabViewItem:';
--- a/packages/cocoaint/src/appkit/NSTableView.inc
+++ b/packages/cocoaint/src/appkit/NSTableView.inc
@ -339,6 +339,7 @@ var
  
 { NSTableViewDelegate Protocol }
  NSTableViewDelegateProtocol = objcprotocol external name 'NSTableViewDelegate'
+  optional
    procedure tableView_willDisplayCell_forTableColumn_row(tableView: NSTableView; cell: id; tableColumn: NSTableColumn; row: NSInteger); message 'tableView:willDisplayCell:forTableColumn:row:';
    function tableView_shouldEditTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: NSInteger): Boolean; message 'tableView:shouldEditTableColumn:row:';
    function selectionShouldChangeInTableView(tableView: NSTableView): Boolean; message 'selectionShouldChangeInTableView:';
@ -367,6 +368,7 @@ var
  
 { NSTableViewDataSource Protocol }
  NSTableViewDataSourceProtocol = objcprotocol external name 'NSTableViewDataSource'
+  optional
    function numberOfRowsInTableView(tableView: NSTableView): NSInteger; message 'numberOfRowsInTableView:';
    function tableView_objectValueForTableColumn_row(tableView: NSTableView; tableColumn: NSTableColumn; row: NSInteger): id; message 'tableView:objectValueForTableColumn:row:';
    procedure tableView_setObjectValue_forTableColumn_row(tableView: NSTableView; object_: id; tableColumn: NSTableColumn; row: NSInteger); message 'tableView:setObjectValue:forTableColumn:row:';
--- a/packages/cocoaint/src/appkit/NSText.inc
+++ b/packages/cocoaint/src/appkit/NSText.inc
@ -185,6 +185,7 @@ var
  
 { NSTextDelegate Protocol }
  NSTextDelegateProtocol = objcprotocol external name 'NSTextDelegate'
+  optional
    function textShouldBeginEditing(textObject: NSText): Boolean; message 'textShouldBeginEditing:';
    function textShouldEndEditing(textObject: NSText): Boolean; message 'textShouldEndEditing:';
    procedure textDidBeginEditing(notification: NSNotification); message 'textDidBeginEditing:';
--- a/packages/cocoaint/src/appkit/NSTextInputClient.inc
+++ b/packages/cocoaint/src/appkit/NSTextInputClient.inc
@ -38,6 +38,7 @@
  
 { NSTextInputClient Protocol }
  NSTextInputClientProtocol = objcprotocol external name 'NSTextInputClient'
+  required
    procedure insertText_replacementRange(aString: id; replacementRange: NSRange); message 'insertText:replacementRange:';
    procedure setMarkedText_selectedRange_replacementRange(aString: id; selectedRange: NSRange; replacementRange: NSRange); message 'setMarkedText:selectedRange:replacementRange:';
    procedure unmarkText; message 'unmarkText';
@ -48,6 +49,7 @@
    function validAttributesForMarkedText: NSArray; message 'validAttributesForMarkedText';
    function firstRectForCharacterRange_actualRange(aRange: NSRange; actualRange: NSRangePointer): NSRect; message 'firstRectForCharacterRange:actualRange:';
    function characterIndexForPoint(aPoint: NSPoint): NSUInteger; message 'characterIndexForPoint:';
+  optional
    function attributedString: NSAttributedString; message 'attributedString';
    function fractionOfDistanceThroughGlyphForPoint(aPoint: NSPoint): CGFloat; message 'fractionOfDistanceThroughGlyphForPoint:';
    function baselineDeltaForCharacterAtIndex(anIndex: NSUInteger): CGFloat; message 'baselineDeltaForCharacterAtIndex:';
--- a/packages/cocoaint/src/appkit/NSTextStorage.inc
+++ b/packages/cocoaint/src/appkit/NSTextStorage.inc
@ -95,6 +95,7 @@ var
  
 { NSTextStorageDelegate Protocol }
  NSTextStorageDelegateProtocol = objcprotocol external name 'NSTextStorageDelegate'
+  optional
    procedure textStorageWillProcessEditing(notification: NSNotification); message 'textStorageWillProcessEditing:';
    procedure textStorageDidProcessEditing(notification: NSNotification); message 'textStorageDidProcessEditing:';
  end;
--- a/packages/cocoaint/src/appkit/NSTextView.inc
+++ b/packages/cocoaint/src/appkit/NSTextView.inc
@ -314,6 +314,7 @@ var
  
 { NSTextViewDelegate Protocol }
  NSTextViewDelegateProtocol = objcprotocol external name 'NSTextViewDelegate'
+  optional
    function textView_clickedOnLink_atIndex(textView: NSTextView; link: id; charIndex: NSUInteger): Boolean; message 'textView:clickedOnLink:atIndex:';
    procedure textView_clickedOnCell_inRect_atIndex(textView: NSTextView; cell: NSTextAttachmentCellProtocol; cellFrame: NSRect; charIndex: NSUInteger); message 'textView:clickedOnCell:inRect:atIndex:';
    procedure textView_doubleClickedOnCell_inRect_atIndex(textView: NSTextView; cell: NSTextAttachmentCellProtocol; cellFrame: NSRect; charIndex: NSUInteger); message 'textView:doubleClickedOnCell:inRect:atIndex:';
--- a/packages/cocoaint/src/appkit/NSTokenField.inc
+++ b/packages/cocoaint/src/appkit/NSTokenField.inc
@ -64,6 +64,7 @@
  
 { NSTokenFieldDelegate Protocol }
  NSTokenFieldDelegateProtocol = objcprotocol external name 'NSTokenFieldDelegate'
+  optional
    function tokenField_completionsForSubstring_indexOfToken_indexOfSelectedItem(tokenField: NSTokenField; substring: NSString; tokenIndex: NSInteger; selectedIndex: NSIntegerPtr): NSArray; message 'tokenField:completionsForSubstring:indexOfToken:indexOfSelectedItem:';
    function tokenField_shouldAddObjects_atIndex(tokenField: NSTokenField; tokens: NSArray; index: NSUInteger): NSArray; message 'tokenField:shouldAddObjects:atIndex:';
    function tokenField_displayStringForRepresentedObject(tokenField: NSTokenField; representedObject: id): NSString; message 'tokenField:displayStringForRepresentedObject:';
--- a/packages/cocoaint/src/appkit/NSTokenFieldCell.inc
+++ b/packages/cocoaint/src/appkit/NSTokenFieldCell.inc
@ -103,6 +103,7 @@ type
  
 { NSTokenFieldCellDelegate Protocol }
  NSTokenFieldCellDelegateProtocol = objcprotocol external name 'NSTokenFieldCellDelegate'
+  optional
    function tokenFieldCell_completionsForSubstring_indexOfToken_indexOfSelectedItem(tokenFieldCell: NSTokenFieldCell; substring: NSString; tokenIndex: NSInteger; selectedIndex: NSIntegerPtr): NSArray; message 'tokenFieldCell:completionsForSubstring:indexOfToken:indexOfSelectedItem:';
    function tokenFieldCell_shouldAddObjects_atIndex(tokenFieldCell: NSTokenFieldCell; tokens: NSArray; index: NSUInteger): NSArray; message 'tokenFieldCell:shouldAddObjects:atIndex:';
    function tokenFieldCell_displayStringForRepresentedObject(tokenFieldCell: NSTokenFieldCell; representedObject: id): NSString; message 'tokenFieldCell:displayStringForRepresentedObject:';
--- a/packages/cocoaint/src/appkit/NSToolbar.inc
+++ b/packages/cocoaint/src/appkit/NSToolbar.inc
@ -154,6 +154,7 @@ var
  
 { NSToolbarDelegate Protocol }
  NSToolbarDelegateProtocol = objcprotocol external name 'NSToolbarDelegate'
+  optional
    function toolbar_itemForItemIdentifier_willBeInsertedIntoToolbar(toolbar: NSToolbar; itemIdentifier: NSString; flag: Boolean): NSToolbarItem; message 'toolbar:itemForItemIdentifier:willBeInsertedIntoToolbar:';
    function toolbarDefaultItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarDefaultItemIdentifiers:';
    function toolbarAllowedItemIdentifiers(toolbar: NSToolbar): NSArray; message 'toolbarAllowedItemIdentifiers:';
--- a/packages/cocoaint/src/appkit/NSUserInterfaceItemSearching.inc
+++ b/packages/cocoaint/src/appkit/NSUserInterfaceItemSearching.inc
@ -52,7 +52,9 @@
  
 { NSUserInterfaceItemSearching Protocol }
  NSUserInterfaceItemSearchingProtocol = objcprotocol external name 'NSUserInterfaceItemSearching'
+  required
    function localizedTitlesForItem(item: id): NSArray; message 'localizedTitlesForItem:';
+  optional
    procedure performActionForItem(item: id); message 'performActionForItem:';
    procedure showAllHelpTopicsForSearchString(searchString: NSString); message 'showAllHelpTopicsForSearchString:';
  end;
--- a/packages/cocoaint/src/appkit/NSWindow.inc
+++ b/packages/cocoaint/src/appkit/NSWindow.inc
@ -512,6 +512,7 @@ var
  
 { NSWindowDelegate Protocol }
  NSWindowDelegateProtocol = objcprotocol external name 'NSWindowDelegate'
+  optional
    function windowShouldClose(sender: id): Boolean; message 'windowShouldClose:';
    function windowWillReturnFieldEditor_toObject(sender: NSWindow; client: id): id; message 'windowWillReturnFieldEditor:toObject:';
    function windowWillResize_toSize(sender: NSWindow; frameSize: NSSize): NSSize; message 'windowWillResize:toSize:';
--- a/packages/cocoaint/src/foundation/NSCache.inc
+++ b/packages/cocoaint/src/foundation/NSCache.inc
@ -73,6 +73,7 @@
  
 { NSCacheDelegate Protocol }
  NSCacheDelegateProtocol = objcprotocol external name 'NSCacheDelegate'
+  optional
    procedure cache_willEvictObject(cache: NSCache; obj: id); message 'cache:willEvictObject:';
  end;
 {$endif}
--- a/packages/cocoaint/src/foundation/NSConnection.inc
+++ b/packages/cocoaint/src/foundation/NSConnection.inc
@ -149,6 +149,7 @@ var
  
 { NSConnectionDelegate Protocol }
  NSConnectionDelegateProtocol = objcprotocol external name 'NSConnectionDelegate'
+  optional
    function makeNewConnection_sender(conn: NSConnection; ancestor: NSConnection): Boolean; message 'makeNewConnection:sender:';
    function connection_shouldMakeNewConnection(ancestor: NSConnection; conn: NSConnection): Boolean; message 'connection:shouldMakeNewConnection:';
    function authenticationDataForComponents(components: NSArray): NSData; message 'authenticationDataForComponents:';
--- a/packages/cocoaint/src/foundation/NSKeyedArchiver.inc
+++ b/packages/cocoaint/src/foundation/NSKeyedArchiver.inc
@ -152,6 +152,7 @@ var
  
 { NSKeyedArchiverDelegate Protocol }
  NSKeyedArchiverDelegateProtocol = objcprotocol external name 'NSKeyedArchiverDelegate'
+  optional
    function archiver_willEncodeObject(archiver: NSKeyedArchiver; object_: id): id; message 'archiver:willEncodeObject:';
    procedure archiver_didEncodeObject(archiver: NSKeyedArchiver; object_: id); message 'archiver:didEncodeObject:';
    procedure archiver_willReplaceObject_withObject(archiver: NSKeyedArchiver; object_: id; newObject: id); message 'archiver:willReplaceObject:withObject:';
@ -161,6 +162,7 @@ var
  
 { NSKeyedUnarchiverDelegate Protocol }
  NSKeyedUnarchiverDelegateProtocol = objcprotocol external name 'NSKeyedUnarchiverDelegate'
+  optional
    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:';
--- a/packages/cocoaint/src/foundation/NSMetadata.inc
+++ b/packages/cocoaint/src/foundation/NSMetadata.inc
@ -150,6 +150,7 @@ var
  
 { NSMetadataQueryDelegate Protocol }
  NSMetadataQueryDelegateProtocol = objcprotocol external name 'NSMetadataQueryDelegate'
+  optional
    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;
--- a/packages/cocoaint/src/foundation/NSNetServices.inc
+++ b/packages/cocoaint/src/foundation/NSNetServices.inc
@ -143,6 +143,7 @@ var
  
 { NSNetServiceDelegate Protocol }
  NSNetServiceDelegateProtocol = objcprotocol external name 'NSNetServiceDelegate'
+  optional
    procedure netServiceWillPublish(sender: NSNetService); message 'netServiceWillPublish:';
    procedure netServiceDidPublish(sender: NSNetService); message 'netServiceDidPublish:';
    procedure netService_didNotPublish(sender: NSNetService; errorDict: NSDictionary); message 'netService:didNotPublish:';
@ -155,6 +156,7 @@ var
  
 { NSNetServiceBrowserDelegate Protocol }
  NSNetServiceBrowserDelegateProtocol = objcprotocol external name 'NSNetServiceBrowserDelegate'
+  optional
    procedure netServiceBrowserWillSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserWillSearch:';
    procedure netServiceBrowserDidStopSearch(aNetServiceBrowser: NSNetServiceBrowser); message 'netServiceBrowserDidStopSearch:';
    procedure netServiceBrowser_didNotSearch(aNetServiceBrowser: NSNetServiceBrowser; errorDict: NSDictionary); message 'netServiceBrowser:didNotSearch:';
--- a/packages/cocoaint/src/foundation/NSObject.inc
+++ b/packages/cocoaint/src/foundation/NSObject.inc
@ -173,6 +173,7 @@ function NSExtraRefCount(object_: id): NSUInteger; cdecl; external;
  
 { NSDiscardableContent Protocol }
  NSDiscardableContentProtocol = objcprotocol external name 'NSDiscardableContent'
+  required
    function beginContentAccess: Boolean; message 'beginContentAccess';
    procedure endContentAccess; message 'endContentAccess';
    procedure discardContentIfPossible; message 'discardContentIfPossible';
--- a/packages/cocoaint/src/foundation/NSPort.inc
+++ b/packages/cocoaint/src/foundation/NSPort.inc
@ -155,11 +155,13 @@ var
  
 { NSPortDelegate Protocol }
  NSPortDelegateProtocol = objcprotocol external name 'NSPortDelegate'
+  optional
    procedure handlePortMessage(message: NSPortMessage); message 'handlePortMessage:';
  end;
  
 { NSMachPortDelegate Protocol }
  NSMachPortDelegateProtocol = objcprotocol external name 'NSMachPortDelegate'
+  optional
    procedure handleMachMessage(msg: Pointer); message 'handleMachMessage:';
  end;
 {$endif}
--- a/packages/cocoaint/src/foundation/NSSpellServer.inc
+++ b/packages/cocoaint/src/foundation/NSSpellServer.inc
@ -83,6 +83,7 @@ var
  
 { NSSpellServerDelegate Protocol }
  NSSpellServerDelegateProtocol = objcprotocol external name 'NSSpellServerDelegate'
+  optional
    function spellServer_findMisspelledWordInString_language_wordCount_countOnly(sender: NSSpellServer; stringToCheck: NSString; language: NSString; wordCount: NSIntegerPtr; countOnly: Boolean): NSRange; message 'spellServer:findMisspelledWordInString:language:wordCount:countOnly:';
    function spellServer_suggestGuessesForWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString): NSArray; message 'spellServer:suggestGuessesForWord:inLanguage:';
    procedure spellServer_didLearnWord_inLanguage(sender: NSSpellServer; word: NSString; language: NSString); message 'spellServer:didLearnWord:inLanguage:';
--- a/packages/cocoaint/src/foundation/NSStream.inc
+++ b/packages/cocoaint/src/foundation/NSStream.inc
@ -162,6 +162,7 @@ var
  
 { NSStreamDelegate Protocol }
  NSStreamDelegateProtocol = objcprotocol external name 'NSStreamDelegate'
+  optional
    procedure stream_handleEvent(aStream: NSStream; eventCode: NSStreamEvent); message 'stream:handleEvent:';
  end;
 {$endif}
--- a/packages/cocoaint/src/foundation/NSXMLParser.inc
+++ b/packages/cocoaint/src/foundation/NSXMLParser.inc
@ -187,6 +187,7 @@ var
  
 { NSXMLParserDelegate Protocol }
  NSXMLParserDelegateProtocol = objcprotocol external name 'NSXMLParserDelegate'
+  optional
    procedure parserDidStartDocument(parser: NSXMLParser); message 'parserDidStartDocument:';
    procedure parserDidEndDocument(parser: NSXMLParser); message 'parserDidEndDocument:';
    procedure parser_foundNotationDeclarationWithName_publicID_systemID(parser: NSXMLParser; name: NSString; publicID: NSString; systemID: NSString); message 'parser:foundNotationDeclarationWithName:publicID:systemID:';