freepascal.compiler/packages/cocoaint/src/appkit/NSScrollView.inc

{ Parsed from AppKit.framework NSScrollView.h }


{$ifdef TYPES}
type
  NSScrollViewPtr = ^NSScrollView;
{$endif}

{$ifdef TYPES}
type
  NSScrollElasticity = NSInteger;
  NSScrollElasticityPtr = ^NSScrollElasticity;

const
  NSScrollElasticityAutomatic = 0;
  NSScrollElasticityNone = 1;
  NSScrollElasticityAllowed = 2;

type
  __SFlags = bitpacked record
    case byte of
      0: (_anonBitField___SFlags0: cuint);
      1: (
        {$ifdef __BIG_ENDIAN__}
        vScrollerRequired: 0..1;
        hScrollerRequired: 0..1;
        vScrollerStatus: 0..1;
        hScrollerStatus: 0..1;
        noDynamicScrolling: 0..1;
        borderType: 0..((1 shl 2)-1);
        oldRulerInstalled: 0..1;
        showRulers: 0..1;
        hasHorizontalRuler: 0..1;
        hasVerticalRuler: 0..1;
        needsTile: 0..1;
        doesNotDrawBackground: 0..1;
        skipRemoveSuperviewCheck: 0..1;
        focusRingNeedsRedisplay: 0..1;
        hasCustomLineBorderColor: 0..1;
        autohidesScrollers: 0..1;
        autoforwardsScrollWheelEvents: 0..1;
        findBarVisible: 0..1;
        unused: 0..1;
        vContentElasticity: 0..((1 shl 2)-1);
        hContentElasticity: 0..((1 shl 2)-1);
        predominantAxisScrolling: 0..1;
        findBarPosition: 0..((1 shl 2)-1);
        registeredForWindowWillClose: 0..1;
        unarchiving: 0..1;
        RESERVED: 0..((1 shl 3)-1);
        {$else}
        RESERVED_: 0..((1 shl 3)-1);
        unarchiving_: 0..1;
        registeredForWindowWillClose_: 0..1;
        findBarPosition_: 0..((1 shl 2)-1);
        predominantAxisScrolling_: 0..1;
        hContentElasticity_: 0..((1 shl 2)-1);
        vContentElasticity_: 0..((1 shl 2)-1);
        unused_: 0..1;
        findBarVisible_: 0..1;
        autoforwardsScrollWheelEvents_: 0..1;
        autohidesScrollers_: 0..1;
        hasCustomLineBorderColor_: 0..1;
        focusRingNeedsRedisplay_: 0..1;
        skipRemoveSuperviewCheck_: 0..1;
        doesNotDrawBackground_: 0..1;
        needsTile_: 0..1;
        hasVerticalRuler_: 0..1;
        hasHorizontalRuler_: 0..1;
        showRulers_: 0..1;
        oldRulerInstalled_: 0..1;
        borderType_: 0..((1 shl 2)-1);
        noDynamicScrolling_: 0..1;
        hScrollerStatus_: 0..1;
        vScrollerStatus_: 0..1;
        hScrollerRequired_: 0..1;
        vScrollerRequired_: 0..1;
        {$endif}
      );
    end;
type
  _SFlags = __SFlags;
type
  _SFlagsPtr = ^__SFlags;
type
  __SFlagsPtr = ^__SFlags;
{$endif}

{$ifdef CLASSES}

type
  NSScrollView = objcclass external (NSView, NSTextFinderBarContainerProtocol)
  private
    _vScroller: NSScroller;
    _hScroller: NSScroller;
    _contentView: NSClipView;
    _headerClipView: NSClipView;
    _cornerView: NSView;
    _ruler: id;
    _sFlags: _SFlags;
    _extraIvars: pointer;
    _horizontalRuler: NSRulerView;
    _verticalRuler: NSRulerView;
  public
    function initWithFrame (frameRect: NSRect): instancetype; message 'initWithFrame:'; { NS_DESIGNATED_INITIALIZER }
    function initWithCoder (coder: NSCoder): instancetype; message 'initWithCoder:'; { NS_DESIGNATED_INITIALIZER }
    class function frameSizeForContentSize_horizontalScrollerClass_verticalScrollerClass_borderType_controlSize_scrollerStyle (cSize: NSSize; horizontalScrollerClass: pobjc_class; verticalScrollerClass: pobjc_class; aType: NSBorderType; controlSize: NSControlSize; scrollerStyle: NSScrollerStyle): NSSize; message 'frameSizeForContentSize:horizontalScrollerClass:verticalScrollerClass:borderType:controlSize:scrollerStyle:'; { available in 10_7 }
    class function contentSizeForFrameSize_horizontalScrollerClass_verticalScrollerClass_borderType_controlSize_scrollerStyle (fSize: NSSize; horizontalScrollerClass: pobjc_class; verticalScrollerClass: pobjc_class; aType: NSBorderType; controlSize: NSControlSize; scrollerStyle: NSScrollerStyle): NSSize; message 'contentSizeForFrameSize:horizontalScrollerClass:verticalScrollerClass:borderType:controlSize:scrollerStyle:'; { available in 10_7 }
    class function frameSizeForContentSize_hasHorizontalScroller_hasVerticalScroller_borderType (cSize: NSSize; hFlag: ObjCBOOL; vFlag: ObjCBOOL; aType: NSBorderType): NSSize; message 'frameSizeForContentSize:hasHorizontalScroller:hasVerticalScroller:borderType:'; deprecated 'in 10_0, 10_7, "Use +frameSizeForContentSize:horizontalScrollerClass:verticalScrollerClass:borderType:controlSize:scrollerStyle: instead"';
    class function contentSizeForFrameSize_hasHorizontalScroller_hasVerticalScroller_borderType (fSize: NSSize; hFlag: ObjCBOOL; vFlag: ObjCBOOL; aType: NSBorderType): NSSize; message 'contentSizeForFrameSize:hasHorizontalScroller:hasVerticalScroller:borderType:'; deprecated 'in 10_0, 10_7, "+contentSizeForFrameSize:horizontalScrollerClass:verticalScrollerClass:borderType:controlSize:scrollerStyle: instead"';
    function documentVisibleRect: NSRect; message 'documentVisibleRect';
    function contentSize: NSSize; message 'contentSize';
    procedure setDocumentView(newValue: NSView); message 'setDocumentView:';
    function documentView: NSView; message 'documentView';
    procedure setContentView(newValue: NSClipView); message 'setContentView:';
    function contentView: NSClipView; message 'contentView';
    procedure setDocumentCursor(newValue: NSCursor); message 'setDocumentCursor:';
    function documentCursor: NSCursor; message 'documentCursor';
    procedure setBorderType(newValue: NSBorderType); message 'setBorderType:';
    function borderType: NSBorderType; message 'borderType';
    procedure setBackgroundColor(newValue: NSColor); message 'setBackgroundColor:';
    function backgroundColor: NSColor; message 'backgroundColor';
    procedure setDrawsBackground(newValue: ObjCBOOL); message 'setDrawsBackground:';
    function drawsBackground: ObjCBOOL; message 'drawsBackground';
    procedure setHasVerticalScroller(newValue: ObjCBOOL); message 'setHasVerticalScroller:';
    function hasVerticalScroller: ObjCBOOL; message 'hasVerticalScroller';
    procedure setHasHorizontalScroller(newValue: ObjCBOOL); message 'setHasHorizontalScroller:';
    function hasHorizontalScroller: ObjCBOOL; message 'hasHorizontalScroller';
    procedure setVerticalScroller(newValue: NSScroller); message 'setVerticalScroller:';
    function verticalScroller: NSScroller; message 'verticalScroller';
    procedure setHorizontalScroller(newValue: NSScroller); message 'setHorizontalScroller:';
    function horizontalScroller: NSScroller; message 'horizontalScroller';
    procedure setAutohidesScrollers(newValue: ObjCBOOL); message 'setAutohidesScrollers:';
    function autohidesScrollers: ObjCBOOL; message 'autohidesScrollers';
    procedure setHorizontalLineScroll(newValue: CGFloat); message 'setHorizontalLineScroll:';
    function horizontalLineScroll: CGFloat; message 'horizontalLineScroll';
    procedure setVerticalLineScroll(newValue: CGFloat); message 'setVerticalLineScroll:';
    function verticalLineScroll: CGFloat; message 'verticalLineScroll';
    procedure setLineScroll(newValue: CGFloat); message 'setLineScroll:';
    function lineScroll: CGFloat; message 'lineScroll';
    procedure setHorizontalPageScroll(newValue: CGFloat); message 'setHorizontalPageScroll:';
    function horizontalPageScroll: CGFloat; message 'horizontalPageScroll';
    procedure setVerticalPageScroll(newValue: CGFloat); message 'setVerticalPageScroll:';
    function verticalPageScroll: CGFloat; message 'verticalPageScroll';
    procedure setPageScroll(newValue: CGFloat); message 'setPageScroll:';
    function pageScroll: CGFloat; message 'pageScroll';
    procedure setScrollsDynamically(newValue: ObjCBOOL); message 'setScrollsDynamically:';
    function scrollsDynamically: ObjCBOOL; message 'scrollsDynamically';
    procedure tile; message 'tile';
    procedure reflectScrolledClipView (cView: NSClipView); message 'reflectScrolledClipView:';
    procedure scrollWheel (theEvent: NSEvent); message 'scrollWheel:';
    procedure setScrollerStyle(newValue: NSScrollerStyle); message 'setScrollerStyle:';
    function scrollerStyle: NSScrollerStyle; message 'scrollerStyle';
    procedure setScrollerKnobStyle(newValue: NSScrollerKnobStyle); message 'setScrollerKnobStyle:';
    function scrollerKnobStyle: NSScrollerKnobStyle; message 'scrollerKnobStyle';
    procedure flashScrollers; message 'flashScrollers'; { available in 10_7 }
    procedure setHorizontalScrollElasticity(newValue: NSScrollElasticity); message 'setHorizontalScrollElasticity:';
    function horizontalScrollElasticity: NSScrollElasticity; message 'horizontalScrollElasticity';
    procedure setVerticalScrollElasticity(newValue: NSScrollElasticity); message 'setVerticalScrollElasticity:';
    function verticalScrollElasticity: NSScrollElasticity; message 'verticalScrollElasticity';
    procedure setUsesPredominantAxisScrolling(newValue: ObjCBOOL); message 'setUsesPredominantAxisScrolling:';
    function usesPredominantAxisScrolling: ObjCBOOL; message 'usesPredominantAxisScrolling';
    procedure setAllowsMagnification(newValue: ObjCBOOL); message 'setAllowsMagnification:';
    function allowsMagnification: ObjCBOOL; message 'allowsMagnification';
    procedure setMagnification(newValue: CGFloat); message 'setMagnification:';
    function magnification: CGFloat; message 'magnification';
    procedure setMaxMagnification(newValue: CGFloat); message 'setMaxMagnification:';
    function maxMagnification: CGFloat; message 'maxMagnification';
    procedure setMinMagnification(newValue: CGFloat); message 'setMinMagnification:';
    function minMagnification: CGFloat; message 'minMagnification';
    procedure magnifyToFitRect (rect: NSRect); message 'magnifyToFitRect:'; { available in 10_8 }
    procedure setMagnification_centeredAtPoint (magnification_: CGFloat; point: NSPoint); message 'setMagnification:centeredAtPoint:'; { available in 10_8 }
    procedure addFloatingSubview_forAxis (view: NSView; axis: NSEventGestureAxis); message 'addFloatingSubview:forAxis:'; { available in 10_9 }
    procedure setAutomaticallyAdjustsContentInsets(newValue: ObjCBOOL); message 'setAutomaticallyAdjustsContentInsets:';
    function automaticallyAdjustsContentInsets: ObjCBOOL; message 'automaticallyAdjustsContentInsets';
    procedure setContentInsets(newValue: NSEdgeInsets); message 'setContentInsets:';
    function contentInsets: NSEdgeInsets; message 'contentInsets';
    procedure setScrollerInsets(newValue: NSEdgeInsets); message 'setScrollerInsets:';
    function scrollerInsets: NSEdgeInsets; message 'scrollerInsets';

    { Adopted protocols }
    procedure setFindBarView(newValue: NSView); message 'setFindBarView:';
    function findBarView: NSView; message 'findBarView';
    procedure findBarViewDidChangeHeight; message 'findBarViewDidChangeHeight';
    procedure setFindBarVisible(newValue: ObjCBOOL); message 'setFindBarVisible:';
    function isFindBarVisible: ObjCBOOL; message 'isFindBarVisible';
  end;
{$endif}

{$ifdef EXTERNAL_SYMBOLS}
var
  NSScrollViewWillStartLiveMagnifyNotification: NSString { available in 10_8 }; cvar; external;
  NSScrollViewDidEndLiveMagnifyNotification: NSString { available in 10_8 }; cvar; external;
  NSScrollViewWillStartLiveScrollNotification: NSString { available in 10_9 }; cvar; external;
  NSScrollViewDidLiveScrollNotification: NSString { available in 10_9 }; cvar; external;
  NSScrollViewDidEndLiveScrollNotification: NSString { available in 10_9 }; cvar; external;
{$endif}

{$ifdef CLASSES}

type
  NSRulerSupport = objccategory external (NSScrollView)
    class procedure setRulerViewClass (rulerViewClass: pobjc_class); message 'setRulerViewClass:';
    class function rulerViewClass: pobjc_class; message 'rulerViewClass';
    procedure setRulersVisible(newValue: ObjCBOOL); message 'setRulersVisible:';
    function rulersVisible: ObjCBOOL; message 'rulersVisible';
    procedure setHasHorizontalRuler(newValue: ObjCBOOL); message 'setHasHorizontalRuler:';
    function hasHorizontalRuler: ObjCBOOL; message 'hasHorizontalRuler';
    procedure setHasVerticalRuler(newValue: ObjCBOOL); message 'setHasVerticalRuler:';
    function hasVerticalRuler: ObjCBOOL; message 'hasVerticalRuler';
    procedure setHorizontalRulerView(newValue: NSRulerView); message 'setHorizontalRulerView:';
    function horizontalRulerView: NSRulerView; message 'horizontalRulerView';
    procedure setVerticalRulerView(newValue: NSRulerView); message 'setVerticalRulerView:';
    function verticalRulerView: NSRulerView; message 'verticalRulerView';
  end;
{$endif}

{$ifdef TYPES}
type
  NSScrollViewFindBarPosition = NSInteger;
  NSScrollViewFindBarPositionPtr = ^NSScrollViewFindBarPosition;

const
  NSScrollViewFindBarPositionAboveHorizontalRuler = 0;
  NSScrollViewFindBarPositionAboveContent = 1;
  NSScrollViewFindBarPositionBelowContent = 2;
{$endif}

{$ifdef CLASSES}

type
  NSFindBarSupport = objccategory external (NSScrollView)
    procedure setFindBarPosition(newValue: NSScrollViewFindBarPosition); message 'setFindBarPosition:';
    function findBarPosition: NSScrollViewFindBarPosition; message 'findBarPosition';
  end;
{$endif}