Class TLiteCheckBox (unit LiteChk)

Inherits from

TCustomCheckBox

litechk.pas TLiteCheckBox is an improved descendant of TCheckBox. Additional features: * It automagically sizes itself to just fit the text. * It protects and sets to appropriate defaults these properties: Alignment taRightJustify Color clBtnFace Ctl3D TRUE Cursor crDefault DragCursor crDrag Height Calculated from actual text height ParentColor TRUE ParentCtl3D TRUE ShowAccelChar TRUE Width Calculated from actual text width REVISION HISTORY 2 Dec 1996 rdk Original version written END OF HISTORY

Constructors


constructor Create( owner: TComponent );



Functions

destructor Destroy;

VCL Registration function.

procedure Invalidate;

overridden public methods

allow space for the height of the checkbox


procedure Repaint;


procedure Update;

MessageDlg( Format( '%s: Invalidate()', [ Name ] ), mtinformation,[mbok],0);

procedure ResizeMe;


Properties

property AllowGrayed :

properties we will allow the user to use

property Caption :


property Checked :


property Enabled :


property Font :


property HelpContext :


property Hint :


property Left :


property Name :


property ParentShowHint :


property PopupMenu :


property ShowHint :


property State :


property TabOrder :


property TabStop :


property Tag :


property Top :


property Visible :


Events

event OnClick :

we publish all events -- who are we to say .

event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


Variables


Constructors


constructor Create( owner: TComponent );


Functions


destructor Destroy;

VCL Registration function.


procedure Invalidate;

overridden public methods

allow space for the height of the checkbox


procedure Repaint;


procedure Update;

MessageDlg( Format( '%s: Invalidate()', [ Name ] ), mtinformation,[mbok],0);


procedure ResizeMe;


Properties


property AllowGrayed :

properties we will allow the user to use


property Caption :


property Checked :


property Enabled :


property Font :


property HelpContext :


property Hint :


property Left :


property Name :


property ParentShowHint :


property PopupMenu :


property ShowHint :


property State :


property TabOrder :


property TabStop :


property Tag :


property Top :


property Visible :


Events


event OnClick :

we publish all events -- who are we to say ...


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


Variables