| Class TSpinButton (unit Spin) |
TWinControl
TSpinButton
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure KeyDown(var Key: Word; Shift: TShiftState);
procedure Loaded;
procedure AdjustSize (var W: Integer; var H: Integer);
procedure BtnClick(Sender: TObject);
procedure BtnMouseDown (Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
function CreateButton: TTimerSpeedButton;
function GetDownButtonState : boolean;
function GetDownGlyph: TBitmap;
function GetPositioning : boolean;
function GetUpButtonState : boolean;
function GetUpGlyph: TBitmap;
procedure SetDownButtonState(NewState:boolean);
procedure SetDownGlyph(Value: TBitmap);
procedure SetFocusBtn (Btn: TTimerSpeedButton);
procedure SetPositioning(Vertical:boolean);
procedure SetUpButtonState(NewState:boolean);
procedure SetUpGlyph(Value: TBitmap);
procedure WMGetDlgCode(var Message: TWMGetDlgCode);
procedure WMKillFocus(var Message: TWMKillFocus);
procedure WMSetFocus(var Message: TWMSetFocus);
procedure WMSize(var Message: TWMSize);| Properties |
property Align :
property Ctl3D :
property DownButtonEnabled : boolean
property DownGlyph : TBitmap
property DragCursor :
property DragMode :
property Enabled :
property FocusControl : TWinControl
property ParentCtl3D :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property TabOrder :
property TabStop :
property UpButtonEnabled : boolean
property UpGlyph : TBitmap
property Vertical : Boolean
property Visible : | Events |
event OnDownClick : TNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnUpClick : TNotifyEvent| Variables |
FDownButton : TTimerSpeedButton;
FFocusControl : TWinControl;
FFocusedButton : TTimerSpeedButton;
FOnDownClick : TNotifyEvent;
FOnUpClick : TNotifyEvent;
FUpButton : TTimerSpeedButton;
FVerticalPositioning : Boolean;| Constructors |
constructor Create(AOwner: TComponent);TSpinButton
| Functions |
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure KeyDown(var Key: Word; Shift: TShiftState);
procedure Loaded;
procedure AdjustSize (var W: Integer; var H: Integer);
procedure BtnClick(Sender: TObject);
procedure BtnMouseDown (Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
function CreateButton: TTimerSpeedButton;
function GetDownButtonState : boolean;
function GetDownGlyph: TBitmap;
function GetPositioning : boolean;
function GetUpButtonState : boolean;
function GetUpGlyph: TBitmap;
procedure SetDownButtonState(NewState:boolean);
procedure SetDownGlyph(Value: TBitmap);
procedure SetFocusBtn (Btn: TTimerSpeedButton);
procedure SetPositioning(Vertical:boolean);
procedure SetUpButtonState(NewState:boolean);
procedure SetUpGlyph(Value: TBitmap);
procedure WMGetDlgCode(var Message: TWMGetDlgCode);
procedure WMKillFocus(var Message: TWMKillFocus);
procedure WMSetFocus(var Message: TWMSetFocus);check for minimum size
procedure WMSize(var Message: TWMSize);| Properties |
property Align :
property Ctl3D :
property DownButtonEnabled : boolean
property DownGlyph : TBitmap
property DragCursor :
property DragMode :
property Enabled :
property FocusControl : TWinControl
property ParentCtl3D :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property TabOrder :
property TabStop :
property UpButtonEnabled : boolean
property UpGlyph : TBitmap
property Vertical : Boolean
property Visible : | Events |
event OnDownClick : TNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnUpClick : TNotifyEvent| Variables |
FDownButton : TTimerSpeedButton;
FFocusControl : TWinControl;
FFocusedButton : TTimerSpeedButton;
FOnDownClick : TNotifyEvent;
FOnUpClick : TNotifyEvent;
FUpButton : TTimerSpeedButton;
FVerticalPositioning : Boolean;