TCustomImage32

type TCustomImage32 = class(TCustomPaintBox32)

protected

  FLayers: TLayerCollection;

  CachedBitmapRect: TRect;

  CachedShiftX: TFloat;

  CachedShiftY: TFloat;

  CachedScaleX: TFloat;

  CachedScaleY: TFloat;

  CachedRecScaleX: TFloat;

  CachedRecScaleY: TFloat;

  CacheValid: Boolean;

  OldSzX: Integer;

  OldSzY: Integer;

  PaintToMode: Boolean;

  procedure BitmapResized; virtual;

  procedure BitmapChanged(); virtual;

  function CanMousePan; virtual;

  function CanMouseZoom; virtual;

  function CanAutoSize(); override;

  procedure DoInitStages; virtual;

  procedure DoPaintBuffer; override;

  procedure DoPaintGDIOverlay; override;

  procedure DoScaleChange; virtual;

  procedure InitDefaultStages; virtual;

  procedure InvalidateCache;

  function InvalidRectsAvailable; override;

  procedure MouseDown();

  procedure MouseMove();

  procedure MouseUp();

  function DoMouseWheel(); override;

  procedure MouseLeave; override;

  procedure SetRepaintMode(); override;

  procedure SetScaleMode(); virtual;

  procedure SetXForm();

  procedure DoZoom();

  procedure DoSetZoom();

  procedure DoSetPivot(); virtual;

  procedure UpdateCache; virtual;

  function GetLayerCollectionClass; virtual;

  function CreateLayerCollection; virtual;

  property UpdateCount: Integer; [r]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure BeginUpdate; virtual;

  function BitmapToControl();

  procedure Changed; virtual;

  procedure Update(); virtual; overload;

  function ControlToBitmap();

  procedure EndUpdate; virtual;

  procedure ExecBitmapFrame(); virtual;

  procedure ExecClearBuffer(); virtual;

  procedure ExecClearBackgnd(); virtual;

  procedure ExecControlFrame(); virtual;

  procedure ExecCustom(); virtual;

  procedure ExecDrawBitmap(); virtual;

  procedure ExecDrawLayers(); virtual;

  function GetBitmapRect; virtual;

  function GetBitmapSize; virtual;

  procedure Invalidate; override;

  procedure Loaded; override;

  procedure PaintTo(); virtual;

  procedure Resize; override;

  procedure SetupBitmap(); virtual;

  procedure Scroll();

  property Bitmap: TBitmap32; [rw]

  property BitmapAlign: TBitmapAlign; [rw]

  property Canvas;

  property Layers: TLayerCollection; [rw]

  property OffsetHorz: TFloat; [rw]

  property OffsetVert: TFloat; [rw]

  property PaintStages: TPaintStages; [r]

  property Scale: TFloat; [rw]

  property ScaleX: TFloat; [rw]

  property ScaleY: TFloat; [rw]

  property ScaleMode: TScaleMode; [rw]

  property Background: TBackgroundOptions; [rw]

  property MousePan: TMousePanOptions; [rw]

  property MouseZoom: TMouseZoomOptions; [rw]

  property IsMousePanning: Boolean; [r]

  property OnBitmapResize: TNotifyEvent; [rw]

  property OnBitmapPixelCombine: TPixelCombineEvent; [rw]

  property OnChange: TNotifyEvent; [rw]

  property OnInitStages: TNotifyEvent; [rw]

  property OnMouseDown: TImgMouseEvent; [rw]

  property OnMouseMove: TImgMouseMoveEvent; [rw]

  property OnMouseUp: TImgMouseEvent; [rw]

  property OnPaintStage: TPaintStageEvent; [rw]

  property OnScaleChange: TNotifyEvent; [rw]

end;

TCustomImage32

TCustomPaintBox32

TObject