Class TRxSpinButton (unit RXSpin)

Inherits from

TGraphicControl

Constructors


constructor Create(AOwner: TComponent);

pause before hint window displays (ms)} { TRxSpinButton


Functions

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 BottomClick;


procedure CMEnabledChanged(var Message: TMessage);

if Self.

procedure DrawAllBitmap;


procedure DrawBitmap(ABitmap: TBitmap; ADownState: TSpinButtonState);


function GetDownGlyph: TBitmap;


function GetUpGlyph: TBitmap;


procedure GlyphChanged(Sender: TObject);


procedure SetDown(Value: TSpinButtonState);


procedure SetDownGlyph(Value: TBitmap);


procedure SetUpGlyph(Value: TBitmap);


procedure TimerExpired(Sender: TObject);


procedure TopClick;


Properties

property DownGlyph : TBitmap


property DragCursor :


property DragMode :


property Enabled :


property ShowHint :


property UpGlyph : TBitmap


property Visible :


property Down : TSpinButtonState


Events

event OnBottomClick : TNotifyEvent


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnStartDrag :


event OnTopClick : TNotifyEvent


Variables

FBottomDownBtn : TBitmap;


FDown : TSpinButtonState;


FDownBitmap : TBitmap;


FDragging : Boolean;


FInvalidate : Boolean;


FLastDown : TSpinButtonState;


FNotDownBtn : TBitmap;


FOnBottomClick : TNotifyEvent;


FOnTopClick : TNotifyEvent;


FRepeatTimer : TTimer;


FTopDownBtn : TBitmap;


FUpBitmap : TBitmap;



Constructors


constructor Create(AOwner: TComponent);

pause before hint window displays (ms)} { TRxSpinButton


Functions


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 BottomClick;


procedure CMEnabledChanged(var Message: TMessage);

if Self.Enabled or (csDesigning in ComponentState) then BrushCopy(R, FDownBitmap, RSrc, FDownBitmap.TransparentColor) else begin Temp := CreateDisabledBitmap(FDownBitmap, clBlack); try BrushCopy(R, Temp, RSrc, Temp.TransparentColor); finally Temp.Free; end; end;


procedure DrawAllBitmap;


procedure DrawBitmap(ABitmap: TBitmap; ADownState: TSpinButtonState);


function GetDownGlyph: TBitmap;


function GetUpGlyph: TBitmap;


procedure GlyphChanged(Sender: TObject);


procedure SetDown(Value: TSpinButtonState);


procedure SetDownGlyph(Value: TBitmap);


procedure SetUpGlyph(Value: TBitmap);


procedure TimerExpired(Sender: TObject);


procedure TopClick;


Properties


property DownGlyph : TBitmap


property DragCursor :


property DragMode :


property Enabled :


property ShowHint :


property UpGlyph : TBitmap


property Visible :


property Down : TSpinButtonState


Events


event OnBottomClick : TNotifyEvent


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnStartDrag :


event OnTopClick : TNotifyEvent


Variables


FBottomDownBtn : TBitmap;


FDown : TSpinButtonState;


FDownBitmap : TBitmap;


FDragging : Boolean;


FInvalidate : Boolean;


FLastDown : TSpinButtonState;


FNotDownBtn : TBitmap;


FOnBottomClick : TNotifyEvent;


FOnTopClick : TNotifyEvent;


FRepeatTimer : TTimer;


FTopDownBtn : TBitmap;


FUpBitmap : TBitmap;