Class TCoolCheckBox (unit envydcp1) |
Inherits from
TCustomCheckBox
TCoolCheckBox - Checkbox with Read-only ability------------------------------} { This component was created as I needed to display the status of some flags in
which could be on or off. A Checkbox was ideal for this except that the users
could change the checkbox - my application could not change the underlying
status it represented and therefore would result in confusion.
Yes I could have used DBCheckBox but that then adds 200k to a non-DB app!
constructor Create(AOwner: TComponent);
- --Implementation of TCoolCheckBox---------------------------------------------
procedure Toggle;
property Alignment :
property AllowGrayed :
property Caption :
property Checked :
property Color :
property Ctl3D :
property DragCursor :
property DragMode :
property Enabled :
property Font :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ReadOnly : Boolean
property ShowHint :
property State :
property TabOrder :
property TabStop :
property Visible :
event OnClick :
event OnDragDrop :
FReadOnly : Boolean;
constructor Create(AOwner: TComponent);
--Implementation of TCoolCheckBox---------------------------------------------
procedure Toggle;
property Alignment :
property AllowGrayed :
property Caption :
property Checked :
property Color :
property Ctl3D :
property DragCursor :
property DragMode :
property Enabled :
property Font :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ReadOnly : Boolean
property ShowHint :
property State :
property TabOrder :
property TabStop :
property Visible :
event OnClick :
event OnDragDrop :
FReadOnly : Boolean;