TCustomImgView32

type TCustomImgView32 = class(TCustomImage32)

protected

  property HScroll: TScrollBar; [r]

  property VScroll: TScrollBar; [r]

  procedure DoUpdateOffsets;

  procedure BeginOffset;

  procedure UpdateOffsets();

  procedure EndOffset;

  procedure UpdateScrollBar();

  procedure UpdateScrollbarVisibility;

  procedure SetOffsetHorz(); override;

  procedure SetOffsetVert(); override;

  procedure BitmapResized; override;

  procedure DoDrawSizeGrip();

  procedure DoScaleChange; override;

  function CanMousePan; override;

  procedure DoScroll; virtual;

  function GetBitmapMargin; override;

  function GetOuterScaledBitmapSize;

  function CanShowScrollBars;

  function GetScrollBarsVisible;

  function GetScrollBarSize;

  function GetSizeGripRect;

  function IsSizeGripVisible;

  procedure MouseDown(); override;

  procedure MouseMove(); override;

  procedure MouseUp(); override;

  procedure Paint; override;

  procedure PaintSizeGrip; virtual;

  procedure Recenter;

  procedure SetScaleMode(); override;

  procedure DoSetPivot(); override;

  procedure ScrollHandler(); virtual;

  procedure ScrollChangingHandler();

public

  constructor Create(); override;

  destructor Destroy; override;

  function GetViewportRect; override;

  procedure Loaded; override;

  procedure Resize; override;

  procedure ScrollToCenter(); override;

  procedure Scroll(); override;

  property Centered: Boolean; [rw]

  property ScrollBars: TImageViewScrollProperties; [rw]

  property SizeGrip: TSizeGripStyle; [rw]

  property OverSize: Integer; [rw]

  property OnScroll: TNotifyEvent; [rw]

end;

TCustomImgView32

TCustomImage32

TCustomPaintBox32,IUpdateRectNotification,ILayerListNotification

TObject