Class TASLink (unit ASLink)

Inherits from

TGraphicControl

Constructors


constructor Create(AOwner: TComponent);

case


Functions

Procedure Click;


Function Execute:Boolean;


Procedure Loaded;


Procedure Notification(AComponent: TComponent; Operation: TOperation);


Procedure Paint;


Procedure AdjustBounds;

DrawInvertFrame(Rect, 1);

Procedure CMDialogChar(var Message: TCMDialogChar);


Procedure CMFocusChanged(var Message: TCMFocusChanged);


Procedure CMFontChanged(var Message: TMessage);


Procedure CMMouseEnter(var Message: TMessage);


Procedure CMMouseLeave(var Message: TMessage);


Procedure CMTextChanged(var Message: TMessage);


Procedure DoDrawText(var Rect: TRect; Flags: Word);


Function GetTransparent: Boolean;


Procedure SetAlignment(Value: TAlignment);


Procedure SetAutoSize(Value: Boolean);


Procedure SetFocusControl(Value: TWinControl);


Procedure SetLayout(Value: TTextLayout);


Procedure SetLinkColor(Value: TColor);


Procedure SetShadowColor(Value: TColor);


Procedure SetShadowPos(Value: TShadowPosition);


Procedure SetShadowSize(Value: Byte);


Procedure SetShowAccelChar(Value: Boolean);


Procedure SetShowFocus(Value: Boolean);


Procedure SetTransparent(Value: Boolean);


Procedure SetURLEnabled(Value: Boolean);


Procedure SetURLType(Value: TURLType);


Procedure SetURLTypeAdd(Value: Boolean);


Procedure SetWordWrap(Value: Boolean);


Properties

property Align :


property Alignment : TAlignment


property AutoSize : Boolean


property Caption :


property Color :


property DragCursor :


property DragMode :


property Enabled :


property FocusControl : TWinControl


property Font :


property Layout : TTextLayout


property LinkColor : TColor


property ParentColor :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ShadowColor : TColor


property ShadowPos : TShadowPosition


property ShadowSize : Byte


property ShowAccelChar : Boolean


property ShowFocus : Boolean


property ShowHint :


property Transparent : Boolean


property URLEnabled : Boolean


property URLType : TURLType


property URLTypeAdd : Boolean


property Visible :


property WordWrap : Boolean


property Canvas :


Events

event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnStartDrag :


Variables

FAlignment : TAlignment;


FAutoSize : Boolean;


FFocusControl : TWinControl;


FFocused : Boolean;


FLayout : TTextLayout;


FLinkColor : TColor;


FShadowColor : TColor;


FShadowPos : TShadowPosition;


FShadowSize : Byte;


FShowAccelChar : Boolean;


FShowFocus : Boolean;


FURLEnabled : Boolean;


FURLType : TURLType;


FURLTypeAdd : Boolean;


FWordWrap : Boolean;


NormalColor : TColor;



Constructors


constructor Create(AOwner: TComponent);

case


Functions


Procedure Click;


Function Execute:Boolean;


Procedure Loaded;


Procedure Notification(AComponent: TComponent; Operation: TOperation);


Procedure Paint;


Procedure AdjustBounds;

DrawInvertFrame(Rect, 1);


Procedure CMDialogChar(var Message: TCMDialogChar);


Procedure CMFocusChanged(var Message: TCMFocusChanged);


Procedure CMFontChanged(var Message: TMessage);


Procedure CMMouseEnter(var Message: TMessage);


Procedure CMMouseLeave(var Message: TMessage);


Procedure CMTextChanged(var Message: TMessage);


Procedure DoDrawText(var Rect: TRect; Flags: Word);


Function GetTransparent: Boolean;


Procedure SetAlignment(Value: TAlignment);


Procedure SetAutoSize(Value: Boolean);


Procedure SetFocusControl(Value: TWinControl);


Procedure SetLayout(Value: TTextLayout);


Procedure SetLinkColor(Value: TColor);


Procedure SetShadowColor(Value: TColor);


Procedure SetShadowPos(Value: TShadowPosition);


Procedure SetShadowSize(Value: Byte);


Procedure SetShowAccelChar(Value: Boolean);


Procedure SetShowFocus(Value: Boolean);


Procedure SetTransparent(Value: Boolean);


Procedure SetURLEnabled(Value: Boolean);


Procedure SetURLType(Value: TURLType);


Procedure SetURLTypeAdd(Value: Boolean);


Procedure SetWordWrap(Value: Boolean);


Properties


property Align :


property Alignment : TAlignment


property AutoSize : Boolean


property Caption :


property Color :


property DragCursor :


property DragMode :


property Enabled :


property FocusControl : TWinControl


property Font :


property Layout : TTextLayout


property LinkColor : TColor


property ParentColor :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ShadowColor : TColor


property ShadowPos : TShadowPosition


property ShadowSize : Byte


property ShowAccelChar : Boolean


property ShowFocus : Boolean


property ShowHint :


property Transparent : Boolean


property URLEnabled : Boolean


property URLType : TURLType


property URLTypeAdd : Boolean


property Visible :


property WordWrap : Boolean


property Canvas :


Events


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnStartDrag :


Variables


FAlignment : TAlignment;


FAutoSize : Boolean;


FFocusControl : TWinControl;


FFocused : Boolean;


FLayout : TTextLayout;


FLinkColor : TColor;


FShadowColor : TColor;


FShadowPos : TShadowPosition;


FShadowSize : Byte;


FShowAccelChar : Boolean;


FShowFocus : Boolean;


FURLEnabled : Boolean;


FURLType : TURLType;


FURLTypeAdd : Boolean;


FWordWrap : Boolean;


NormalColor : TColor;