| Class TScaleImage (unit Sclimage) |
TGraphicControl
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure Loaded;
procedure Paint;
procedure WMPaint(var Message: TWMPaint);
procedure ChangeView(View: TChangeView);
procedure DrawNormal;
procedure DrawScaled;
procedure DrawXStretched;
procedure DrawXYStretched;
procedure DrawYStretched;
function GetNormal: Boolean;
procedure GetPictSize;
function GetScale: Boolean;
function GetStretch: Boolean;
procedure SetBorder(Value: Boolean);
procedure SetCenter(Value: Boolean);
procedure SetPicture(Value: TPicture);
procedure SetScaleStyle(Value: TScaleStyle);| Properties |
property Align :
property Border : Boolean
property Center : Boolean
property Color :
property DragCursor :
property DragMode :
property Enabled :
property ParentColor :
property ParentShowHint :
property Picture : TPicture
property PopupMenu :
property ScaleStyle : TScaleStyle
property ShowHint :
property Visible :
property IsNormal : Boolean
property IsScaled : Boolean
property IsStretched : Boolean| Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FBorder : Boolean;
FCenter : Boolean;
FPicture : TPicture;
FScaleStyle : TScaleStyle;
ImageFile : String;
PictHeight : Integer;
PictWidth : Integer;
ScaleBmp : TPicture;
SizeRatio : Real;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure Loaded;
procedure Paint;Protected declarations
procedure WMPaint(var Message: TWMPaint);
procedure ChangeView(View: TChangeView);
procedure DrawNormal;
procedure DrawScaled;
procedure DrawXStretched;
procedure DrawXYStretched;
procedure DrawYStretched;
function GetNormal: Boolean;
procedure GetPictSize;
function GetScale: Boolean;
function GetStretch: Boolean;
procedure SetBorder(Value: Boolean);
procedure SetCenter(Value: Boolean);
procedure SetPicture(Value: TPicture);
procedure SetScaleStyle(Value: TScaleStyle);| Properties |
property Align :
property Border : Boolean
property Center : Boolean
property Color :
property DragCursor :
property DragMode :
property Enabled :
property ParentColor :
property ParentShowHint :
property Picture : TPicturePublished declarations
property PopupMenu :
property ScaleStyle : TScaleStyle
property ShowHint :
property Visible :
property IsNormal : Boolean
property IsScaled : Boolean
property IsStretched : Boolean| Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FBorder : Boolean;
FCenter : Boolean;
FPicture : TPicture;
FScaleStyle : TScaleStyle;
ImageFile : String;
PictHeight : Integer;
PictWidth : Integer;
ScaleBmp : TPicture;*** GLOBAL VARIABLES
SizeRatio : Real;