Unit 'gaPanel' Package
[Overview][Constants][Types][Classes][Index] [#bs_enginesplus]

TgaBasePanel

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: gapanel.pas line 62

type TgaBasePanel = class(TPanel)

protected

  function DoMouseWheel(); override;

  

  function DoMouseHWheel();

  

  procedure MouseDown(); override;

  

  procedure MouseMove(); override;

  

  procedure MouseUp(); override;

  

  procedure DrawToPanelCanvas(); virtual;

  

  procedure Paint; override;

  

  procedure WMSize(); message;

  

  procedure WMEraseBkgnd(); message;

  

  procedure WMMouseHWheel(); message;

  

  procedure WMKeyDown(); message;

  

  procedure WMKeyUp(); message;

  

  procedure CMMouseLeave(); message;

  

public

  constructor Create(); override;

  

  destructor Destroy; override;

  

  procedure ScaleToFit;

  

  function IsEmpty;

  

  function IsScaledToFit;

  

  function ClientToImage();

  

  function ImageToClient();

  

  function RecenterImageAt();

  

  property InnerClientRect: TRect; [r]

  

  property InnerMargin: Integer; [r]

  

  property Offset: TPoint; [rw]

  

published

  property AutoCenter: Boolean; [rw]

  

  property Color: TColor; [rw]

  

  property FocusedColor: TColor; [rw]

  

  property UnFocusedColor: TColor; [rw]

  

  property Scale: Double; [rw]

  

  property ScaleMin: Double; [rw]

  

  property ScaleMax: Double; [rw]

  

  property ShowScrollButtons: TgaShowScrollBtns; [rw]

  

  property AllowScroll: Boolean; [rw]

  

  property AllowZoom: Boolean; [rw]

  

  property OnKeyDown: TKeyEvent; [rw]

  

  property OnKeyUp: TKeyEvent; [rw]

  

  property OnScrolling: TNotifyEvent; [rw]

  

  property OnZooming: TNotifyEvent; [rw]

  

end;

Inheritance

TgaBasePanel

  

|

TObject



CT Web help

CodeTyphon Studio