NSSegmentedCell.inc 4.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091
  1. { Parsed from AppKit.framework NSSegmentedCell.h }
  2. {$ifdef TYPES}
  3. type
  4. NSSegmentedCellPtr = ^NSSegmentedCell;
  5. {$endif}
  6. {$ifdef TYPES}
  7. type
  8. NSSegmentSwitchTracking = NSUInteger;
  9. NSSegmentSwitchTrackingPtr = ^NSSegmentSwitchTracking;
  10. const
  11. NSSegmentSwitchTrackingSelectOne = 0;
  12. NSSegmentSwitchTrackingSelectAny = 1;
  13. NSSegmentSwitchTrackingMomentary = 2;
  14. {$endif}
  15. {$ifdef CLASSES}
  16. type
  17. NSSegmentedCell = objcclass external (NSActionCell)
  18. private
  19. _segmentItems: NSMutableArray;
  20. _selectedSegment: NSInteger;
  21. _keySegment: NSInteger;
  22. _lastBounds: NSRect;
  23. _seFlags: bitpacked record
  24. case byte of
  25. 0: (_anonBitField__seFlags0: cuint);
  26. 1: (
  27. trackingMode: 0..((1 shl 3)-1);
  28. trimmedLabels: 0..1;
  29. drawing: 0..1;
  30. reserved1: 0..((1 shl 2)-1);
  31. recalcToolTips: 0..1;
  32. usesWindowsStyle: 0..1;
  33. dontShowSelectedAndPressedAppearance: 0..1;
  34. menuShouldBeUniquedAgainstMain: 0..1;
  35. style: 0..((1 shl 8)-1);
  36. flatMinX: 0..1;
  37. flatMaxX: 0..1;
  38. segmentedSeparated: 0..1;
  39. reserved: 0..((1 shl 10)-1);
  40. );
  41. end;
  42. _segmentTrackingInfo: id;
  43. _menuUniquer: id;
  44. _reserved3: NSInteger;
  45. _reserved4: NSInteger;
  46. public
  47. procedure setSegmentCount(newValue: NSInteger); message 'setSegmentCount:';
  48. function segmentCount: NSInteger; message 'segmentCount';
  49. procedure setSelectedSegment(newValue: NSInteger); message 'setSelectedSegment:';
  50. function selectedSegment: NSInteger; message 'selectedSegment';
  51. function selectSegmentWithTag (tag_: NSInteger): ObjCBOOL; message 'selectSegmentWithTag:';
  52. procedure makeNextSegmentKey; message 'makeNextSegmentKey';
  53. procedure makePreviousSegmentKey; message 'makePreviousSegmentKey';
  54. procedure setTrackingMode(newValue: NSSegmentSwitchTracking); message 'setTrackingMode:';
  55. function trackingMode: NSSegmentSwitchTracking; message 'trackingMode';
  56. procedure setWidth_forSegment (width: CGFloat; segment: NSInteger); message 'setWidth:forSegment:';
  57. function widthForSegment (segment: NSInteger): CGFloat; message 'widthForSegment:';
  58. procedure setImage_forSegment (image_: NSImage; segment: NSInteger); message 'setImage:forSegment:';
  59. function imageForSegment (segment: NSInteger): NSImage; message 'imageForSegment:';
  60. procedure setImageScaling_forSegment (scaling: NSImageScaling; segment: NSInteger); message 'setImageScaling:forSegment:'; { available in 10_5 }
  61. function imageScalingForSegment (segment: NSInteger): NSImageScaling; message 'imageScalingForSegment:'; { available in 10_5 }
  62. procedure setLabel_forSegment (label_: NSString; segment: NSInteger); message 'setLabel:forSegment:';
  63. function labelForSegment (segment: NSInteger): NSString; message 'labelForSegment:';
  64. procedure setSelected_forSegment (selected: ObjCBOOL; segment: NSInteger); message 'setSelected:forSegment:';
  65. function isSelectedForSegment (segment: NSInteger): ObjCBOOL; message 'isSelectedForSegment:';
  66. procedure setEnabled_forSegment (enabled: ObjCBOOL; segment: NSInteger); message 'setEnabled:forSegment:';
  67. function isEnabledForSegment (segment: NSInteger): ObjCBOOL; message 'isEnabledForSegment:';
  68. procedure setMenu_forSegment (menu_: NSMenu; segment: NSInteger); message 'setMenu:forSegment:';
  69. function menuForSegment (segment: NSInteger): NSMenu; message 'menuForSegment:';
  70. procedure setToolTip_forSegment (toolTip: NSString; segment: NSInteger); message 'setToolTip:forSegment:';
  71. function toolTipForSegment (segment: NSInteger): NSString; message 'toolTipForSegment:';
  72. procedure setTag_forSegment (tag_: NSInteger; segment: NSInteger); message 'setTag:forSegment:';
  73. function tagForSegment (segment: NSInteger): NSInteger; message 'tagForSegment:';
  74. procedure setSegmentStyle(newValue: NSSegmentStyle); message 'setSegmentStyle:';
  75. function segmentStyle: NSSegmentStyle; message 'segmentStyle';
  76. procedure drawSegment_inFrame_withView (segment: NSInteger; frame: NSRect; controlView_: NSView); message 'drawSegment:inFrame:withView:';
  77. end;
  78. type
  79. NSSegmentBackgroundStyle = objccategory external (NSSegmentedCell)
  80. function interiorBackgroundStyleForSegment (segment: NSInteger): NSBackgroundStyle; message 'interiorBackgroundStyleForSegment:'; { available in 10_5 }
  81. end;
  82. {$endif}