| Class TLedButton (unit LedBtn) |
TButton
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure Click;
procedure CreateParams(var Params: TCreateParams);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure PlaySoundFile(const FileName: String; uFlags: word);
procedure SetButtonStyle(ADefault: Boolean);
procedure SetCaption3D(AValue : boolean);
procedure WMLButtonDblClick(var Message: TWMLButtonDown);
procedure WMMButtonDblClick(var Message: TWMMButtonDown);
procedure WMMouseMove(var Message: TWMMouseMove);
procedure WMRButtonDblClick(var Message: TWMRButtonDown);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);
procedure CMMouseEnter(var Message: TMessage);
procedure CMMouseLeave(var Message: TMessage);
procedure CNDrawItem(var Message: TWMDrawItem);
procedure CNMeasureItem(var Message: TWMMeasureItem);
procedure DrawItem(const DrawItemStruct: TDrawItemStruct);
function GetSoundFile: String;
procedure SetLEDType(value: TLEDType);
procedure SetSoundFile(const V: String);
procedure SetStyle(Value: TButtonStyle);
procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);| Properties |
property Caption3D : Boolean
property LEDType : TLEDType
property SoundFile : String
property Style : TButtonStyle| Events |
| Variables |
ExtraSpace : word;
F3DCaption : Boolean;
FCanvas : TCanvas;
FGlyph : TBitmap;
FLedType : TLEDType;
FSoundFile : PString;
FStyle : TButtonStyle;
HasMouse : boolean;
IsClicked : boolean;
IsFocused : Boolean;
IsMouseDown : boolean;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
| Functions |
destructor Destroy;
procedure Click;Protected declarations
procedure CreateParams(var Params: TCreateParams);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure PlaySoundFile(const FileName: String; uFlags: word);
procedure SetButtonStyle(ADefault: Boolean);
procedure SetCaption3D(AValue : boolean);
procedure WMLButtonDblClick(var Message: TWMLButtonDown);
procedure WMMButtonDblClick(var Message: TWMMButtonDown);
procedure WMMouseMove(var Message: TWMMouseMove);
procedure WMRButtonDblClick(var Message: TWMRButtonDown);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);DrawFrameControl does not draw a pressed button correctly
procedure CMMouseEnter(var Message: TMessage);
procedure CMMouseLeave(var Message: TMessage);
procedure CNDrawItem(var Message: TWMDrawItem);
procedure CNMeasureItem(var Message: TWMMeasureItem);
procedure DrawItem(const DrawItemStruct: TDrawItemStruct);
function GetSoundFile: String;
procedure SetLEDType(value: TLEDType);
procedure SetSoundFile(const V: String);
procedure SetStyle(Value: TButtonStyle);
procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);| Properties |
property Caption3D : Boolean
property LEDType : TLEDType
property SoundFile : StringPublished declarations
property Style : TButtonStyle| Events |
| Variables |
ExtraSpace : word;
F3DCaption : Boolean;
FCanvas : TCanvas;
FGlyph : TBitmap;
FLedType : TLEDType;
FSoundFile : PString;Private declarations
FStyle : TButtonStyle;
HasMouse : boolean;
IsClicked : boolean;
IsFocused : Boolean;
IsMouseDown : boolean;