| Class TDaveButton1 (unit DaveBtn1) |
TCustomControl
tvar a druh tlačítka - zatím se liší barvou podkladu
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Click;
destructor Destroy;
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);--------------------------------------------------------------------------
procedure MouseMove(Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure Paint;
procedure CMDialogChar(var Message: TCMDialogChar);
procedure CMDialogKey(var Message: TCMDialogKey);
procedure CMFocusChanged(var Message: TCMFocusChanged);
Procedure CMTextChanged(var Message : TMessage);--------------------------------------------------------------------------
procedure CNCommand(var Message: TWMCommand);
Procedure SetButtonState(Value : TButtonState);--------------------------------------------------------------------------
Procedure SetButtonStyle(Value : TButtonStyle);--------------------------------------------------------------------------
procedure SetDefault(Value: Boolean);| Properties |
property Cancel : Boolean
property Caption :
property Default : Boolean
property DragCursor :
property DragMode :
property Enabled :
property Font :
property ModalResult : TModalResult
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property Status : TButtonState
property Style : TButtonStyle
property TabOrder :
property TabStop :
property Visible : | Events |
event OnClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FCancel : Boolean;
FDefault : boolean;
FLastFocus : boolean;
FModalResult : TModalResult;
FPicture : array [TButtonState,TButtonStyle] of TBitMap;
FStatus : TButtonState;
FStyle : TButtonStyle;
FTemp : boolean;| Constructors |
constructor Create(AOwner: TComponent);--------------------------------------------------------------------------
| Functions |
procedure Click;--------------------------------------------------------------------------
destructor Destroy;--------------------------------------------------------------------------
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);Called on WM_PAINT message
--------------------------------------------------------------------------
procedure MouseMove(Shift: TShiftState; X, Y: Integer);--------------------------------------------------------------------------
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);--------------------------------------------------------------------------
procedure Paint;--------------------------------------------------------------------------
procedure CMDialogChar(var Message: TCMDialogChar);--------------------------------------------------------------------------
procedure CMDialogKey(var Message: TCMDialogKey);--------------------------------------------------------------------------
procedure CMFocusChanged(var Message: TCMFocusChanged);--------------------------------------------------------------------------
Procedure CMTextChanged(var Message : TMessage);Nastevení stavu pro property
--------------------------------------------------------------------------
procedure CNCommand(var Message: TWMCommand);--------------------------------------------------------------------------
Procedure SetButtonState(Value : TButtonState);Nastevení stylu pro property
--------------------------------------------------------------------------
Procedure SetButtonStyle(Value : TButtonStyle);dočasné stlačení - interakce myšky
--------------------------------------------------------------------------
procedure SetDefault(Value: Boolean);--------------------------------------------------------------------------
| Properties |
property Cancel : Boolean
property Caption :
property Default : Boolean
property DragCursor :
property DragMode :
property Enabled :
property Font :
property ModalResult : TModalResult
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property Status : TButtonState
property Style : TButtonStyle
property TabOrder :
property TabStop :
property Visible : | Events |
event OnClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FCancel : Boolean;
FDefault : boolean;
FLastFocus : boolean;
FModalResult : TModalResult;
FPicture : array [TButtonState,TButtonStyle] of TBitMap;
FStatus : TButtonState;Obrázek tlačítka
FStyle : TButtonStyle;
FTemp : boolean;