Class TLatchLabel (unit latchlab)

Inherits from

TLabel

Constructors


constructor Create(Aowner : TComponent);



Functions

destructor destroy;


procedure doalign;


procedure Invalidate;


procedure loaded;


function GetFocusControl : TWinControl;


procedure ParentWndProc(var Message: TMessage);


procedure SetFocuscontrol(W : TWinControl);


procedure setlatched(a: boolean);


procedure setLatchTo(a : TLatchTo);


procedure SetMargin(I : Integer);


procedure subclass;


procedure undosubclass;


Properties

property FocusControl : TWinControl


property Latched : Boolean


property LatchMargin : Integer


property LatchRunTime : Boolean


property LatchTo : TLatchTo


Events

Variables

FDefParentProc : Pointer;


FDestroy : Boolean;


FFocusInstance : Pointer;


Flatched : Boolean;


fLatchRunTime : Boolean;


fLatchTo : TLatchTo;


fMargin : Integer;


oldRect : TRect;


redoing : Boolean;



Constructors


constructor Create(Aowner : TComponent);


Functions


destructor destroy;


procedure doalign;


procedure Invalidate;


procedure loaded;


function GetFocusControl : TWinControl;


procedure ParentWndProc(var Message: TMessage);


procedure SetFocuscontrol(W : TWinControl);


procedure setlatched(a: boolean);


procedure setLatchTo(a : TLatchTo);


procedure SetMargin(I : Integer);


procedure subclass;


procedure undosubclass;


Properties


property FocusControl : TWinControl


property Latched : Boolean


property LatchMargin : Integer


property LatchRunTime : Boolean


property LatchTo : TLatchTo


Events


Variables


FDefParentProc : Pointer;


FDestroy : Boolean;


FFocusInstance : Pointer;


Flatched : Boolean;


fLatchRunTime : Boolean;


fLatchTo : TLatchTo;


fMargin : Integer;


oldRect : TRect;


redoing : Boolean;