Class TVertStatBar (unit VertStatBar)

Inherits from

TCustomControl

Constructors


constructor Create(AOwner: TComponent);

Protected declarations


Functions

procedure Paint;


procedure SetCap(Cap : String);


procedure SetTal(al : TTextAlign);

FCap := InputBox('Question?', 'Enter Caption', FCap);

Properties

property Align :

Published declarations

property Caption : String


property Color :


property TextAlign : TTextAlign


Events

event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnMouseDown :


event OnMouseMove :


Variables

FCap : String;

Private declarations

FTA : TTextAlign;



Constructors


constructor Create(AOwner: TComponent);

Protected declarations


Functions


procedure Paint;


procedure SetCap(Cap : String);


procedure SetTal(al : TTextAlign);

FCap := InputBox('Question?', 'Enter Caption', FCap);


Properties


property Align :

Published declarations


property Caption : String


property Color :


property TextAlign : TTextAlign


Events


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnMouseDown :


event OnMouseMove :


Variables


FCap : String;

Private declarations


FTA : TTextAlign;