blob: 840705c54006522a4d10816662ab28f0aff2ead1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
{ Parsed from Appkit.framework NSComboBox.h }
{$ifdef TYPES}
{$ifndef NSCOMBOBOX_PAS_T}
{$define NSCOMBOBOX_PAS_T}
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef NSCOMBOBOX_PAS_R}
{$define NSCOMBOBOX_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef NSCOMBOBOX_PAS_F}
{$define NSCOMBOBOX_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef NSCOMBOBOX_PAS_S}
{$define NSCOMBOBOX_PAS_S}
{ External string constants }
var
NSComboBoxWillPopUpNotification: NSString; cvar; external;
NSComboBoxWillDismissNotification: NSString; cvar; external;
NSComboBoxSelectionDidChangeNotification: NSString; cvar; external;
NSComboBoxSelectionIsChangingNotification: NSString; cvar; external;
{$endif}
{$endif}
{$ifdef FORWARD}
NSComboBoxDataSourceProtocol = objcprotocol;
NSComboBoxDelegateProtocol = objcprotocol;
NSComboBox = objcclass;
NSComboBoxPointer = ^NSComboBox;
NSComboBoxPtr = NSComboBoxPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef NSCOMBOBOX_PAS_C}
{$define NSCOMBOBOX_PAS_C}
{ NSComboBox }
NSComboBox = objcclass external (NSTextField)
private
_dataSource: id;
public
function hasVerticalScroller: Boolean; message 'hasVerticalScroller';
procedure setHasVerticalScroller(flag: Boolean); message 'setHasVerticalScroller:';
function intercellSpacing: NSSize; message 'intercellSpacing';
procedure setIntercellSpacing(aSize: NSSize); message 'setIntercellSpacing:';
function itemHeight: CGFloat; message 'itemHeight';
procedure setItemHeight(itemHeight_: CGFloat); message 'setItemHeight:';
function numberOfVisibleItems: NSInteger; message 'numberOfVisibleItems';
procedure setNumberOfVisibleItems(visibleItems: NSInteger); message 'setNumberOfVisibleItems:';
procedure setButtonBordered(flag: Boolean); message 'setButtonBordered:';
function isButtonBordered: Boolean; message 'isButtonBordered';
procedure reloadData; message 'reloadData';
procedure noteNumberOfItemsChanged; message 'noteNumberOfItemsChanged';
procedure setUsesDataSource(flag: Boolean); message 'setUsesDataSource:';
function usesDataSource: Boolean; message 'usesDataSource';
procedure scrollItemAtIndexToTop(index: NSInteger); message 'scrollItemAtIndexToTop:';
procedure scrollItemAtIndexToVisible(index: NSInteger); message 'scrollItemAtIndexToVisible:';
procedure selectItemAtIndex(index: NSInteger); message 'selectItemAtIndex:';
procedure deselectItemAtIndex(index: NSInteger); message 'deselectItemAtIndex:';
function indexOfSelectedItem: NSInteger; message 'indexOfSelectedItem';
function numberOfItems: NSInteger; message 'numberOfItems';
function completes: Boolean; message 'completes';
procedure setCompletes(completes_: Boolean); message 'setCompletes:';
function delegate: NSComboBoxDelegateProtocol; message 'delegate';
procedure setDelegate(anObject: NSComboBoxDelegateProtocol); message 'setDelegate:';
function dataSource: NSComboBoxDataSourceProtocol; message 'dataSource';
procedure setDataSource(aSource: NSComboBoxDataSourceProtocol); message 'setDataSource:';
procedure addItemWithObjectValue(object_: id); message 'addItemWithObjectValue:';
procedure addItemsWithObjectValues(objects: NSArray); message 'addItemsWithObjectValues:';
procedure insertItemWithObjectValue_atIndex(object_: id; index: NSInteger); message 'insertItemWithObjectValue:atIndex:';
procedure removeItemWithObjectValue(object_: id); message 'removeItemWithObjectValue:';
procedure removeItemAtIndex(index: NSInteger); message 'removeItemAtIndex:';
procedure removeAllItems; message 'removeAllItems';
procedure selectItemWithObjectValue(object_: id); message 'selectItemWithObjectValue:';
function itemObjectValueAtIndex(index: NSInteger): id; message 'itemObjectValueAtIndex:';
function objectValueOfSelectedItem: id; message 'objectValueOfSelectedItem';
function indexOfItemWithObjectValue(object_: id): NSInteger; message 'indexOfItemWithObjectValue:';
function objectValues: NSArray; message 'objectValues';
end;
{$endif}
{$endif}
{$ifdef PROTOCOLS}
{$ifndef NSCOMBOBOX_PAS_P}
{$define NSCOMBOBOX_PAS_P}
{ 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:';
function comboBox_completedString(aComboBox: NSComboBox; string_: NSString): NSString; message 'comboBox:completedString:';
end;
{ 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:';
procedure comboBoxSelectionIsChanging(notification: NSNotification); message 'comboBoxSelectionIsChanging:';
end;
{$endif}
{$endif}
|
