/packages/cocoaint/src/appkit/NSStatusBar.inc
Pascal | 64 lines | 19 code | 15 blank | 30 comment | 0 complexity | 61dbb7be87974cac0a5bd4c7e4fbd49e MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
1{ Parsed from Appkit.framework NSStatusBar.h } 2 3{$ifdef TYPES} 4{$ifndef NSSTATUSBAR_PAS_T} 5{$define NSSTATUSBAR_PAS_T} 6 7{ Defines } 8const 9 NSVariableStatusItemLength = -1; 10 NSSquareStatusItemLength = -2; 11 12{$endif} 13{$endif} 14 15{$ifdef RECORDS} 16{$ifndef NSSTATUSBAR_PAS_R} 17{$define NSSTATUSBAR_PAS_R} 18 19{$endif} 20{$endif} 21 22{$ifdef FUNCTIONS} 23{$ifndef NSSTATUSBAR_PAS_F} 24{$define NSSTATUSBAR_PAS_F} 25 26{$endif} 27{$endif} 28 29{$ifdef EXTERNAL_SYMBOLS} 30{$ifndef NSSTATUSBAR_PAS_S} 31{$define NSSTATUSBAR_PAS_S} 32 33{$endif} 34{$endif} 35 36{$ifdef FORWARD} 37 NSStatusBar = objcclass; 38 NSStatusBarPointer = ^NSStatusBar; 39 NSStatusBarPtr = NSStatusBarPointer; 40 41{$endif} 42 43{$ifdef CLASSES} 44{$ifndef NSSTATUSBAR_PAS_C} 45{$define NSSTATUSBAR_PAS_C} 46 47{ NSStatusBar } 48 NSStatusBar = objcclass external (NSObject) 49 private 50 _items: id; 51 _fReserved1: Pointer; 52 _fReserved2: Pointer; 53 _registeredForNote: NSInteger; 54 55 public 56 class function systemStatusBar: NSStatusBar; message 'systemStatusBar'; 57 function statusItemWithLength(length: CGFloat): NSStatusItem; message 'statusItemWithLength:'; 58 procedure removeStatusItem(item: NSStatusItem); message 'removeStatusItem:'; 59 function isVertical: Boolean; message 'isVertical'; 60 function thickness: CGFloat; message 'thickness'; 61 end; 62 63{$endif} 64{$endif}