Class TTorryButton (unit Torrybtn)

Inherits from

TGraphicControl

Constructors


constructor Create(AOwner: TComponent);

7x7


Functions

destructor Destroy;


procedure Click;


procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure Paint;


procedure WMLButtonDblClick(var Message: TWMLButtonDown);


procedure WMMButtonDblClick(var Message: TWMMButtonDown);


procedure WMMouseMove(var Message: TWMMouseMove);


procedure WMRButtonDblClick(var Message: TWMRButtonDown);


procedure CMMouseEnter(var Message: TMessage);


procedure CMMouseLeave(var Message: TMessage);


procedure SetBorderColor(value: TColor);


procedure SetCaption(value: TCaption);


procedure SetEnabled(value: boolean);


procedure SetFont(value: TFont);


procedure SetLedDownColor(value: TColor);


procedure SetLedOffColor(value: TColor);


procedure SetLedOnColor(value: TColor);


procedure SetLedPosition(value: Integer);


procedure SetRoundSize(value: integer);


procedure SetShadowColor(value: TColor);


procedure SetSpace(value: Integer);


Properties

property BorderColor : TColor


property Caption : TCaption


property Enabled : boolean


property Font : TFont


property LedDownColor : TColor


property LedOffColor : TColor


property LedOnColor : TColor


property LedPosition : Integer


property RoundSize : integer


property ShadowColor : TColor


property ShowHint :


property Space : Integer


property Visible :


Events

event OnClick :


event OnDblClick :


event OnMouseDown :


event OnMouseEnter : TNotifyEvent


event OnMouseLeave : TNotifyEvent


event OnMouseMove :


event OnMouseUp :


Variables

ExtraSpace : word;


FBorderColor : TColor;


FCaption : TCaption;


FEnabled : boolean;


FFont : TFont;


FLedDownColor : TColor;


FLedOffColor : TColor;


FLedOnColor : TColor;


FLedPosition : Integer;


FMouseEnter : TNotifyEvent;


FMouseLeave : TNotifyEvent;


FRoundSize : integer;


FShadowColor : TColor;


FSpace : Integer;


HasMouse : boolean;


IsMouseDown : boolean;



Constructors


constructor Create(AOwner: TComponent);

7x7


Functions


destructor Destroy;


procedure Click;


procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure Paint;


procedure WMLButtonDblClick(var Message: TWMLButtonDown);


procedure WMMButtonDblClick(var Message: TWMMButtonDown);


procedure WMMouseMove(var Message: TWMMouseMove);


procedure WMRButtonDblClick(var Message: TWMRButtonDown);


procedure CMMouseEnter(var Message: TMessage);


procedure CMMouseLeave(var Message: TMessage);


procedure SetBorderColor(value: TColor);


procedure SetCaption(value: TCaption);


procedure SetEnabled(value: boolean);


procedure SetFont(value: TFont);


procedure SetLedDownColor(value: TColor);


procedure SetLedOffColor(value: TColor);


procedure SetLedOnColor(value: TColor);


procedure SetLedPosition(value: Integer);


procedure SetRoundSize(value: integer);


procedure SetShadowColor(value: TColor);


procedure SetSpace(value: Integer);


Properties


property BorderColor : TColor


property Caption : TCaption


property Enabled : boolean


property Font : TFont


property LedDownColor : TColor


property LedOffColor : TColor


property LedOnColor : TColor


property LedPosition : Integer


property RoundSize : integer


property ShadowColor : TColor


property ShowHint :


property Space : Integer


property Visible :


Events


event OnClick :


event OnDblClick :


event OnMouseDown :


event OnMouseEnter : TNotifyEvent


event OnMouseLeave : TNotifyEvent


event OnMouseMove :


event OnMouseUp :


Variables


ExtraSpace : word;


FBorderColor : TColor;


FCaption : TCaption;


FEnabled : boolean;


FFont : TFont;


FLedDownColor : TColor;


FLedOffColor : TColor;


FLedOnColor : TColor;


FLedPosition : Integer;


FMouseEnter : TNotifyEvent;


FMouseLeave : TNotifyEvent;


FRoundSize : integer;


FShadowColor : TColor;


FSpace : Integer;


HasMouse : boolean;


IsMouseDown : boolean;