Unit 'LR_Ctrls'	Package
[Overview][Types][Classes][Procedures and functions][Index]	[#lz_report]

TfrSpeedButton

Declaration

Source position: lr_ctrls.pas line 30

`type TfrSpeedButton = class(TGraphicControl)`
`protected`
`FMouseInControl: Boolean;`
`FState: TfrButtonState;`
`function GetPalette; override;`
`procedure Loaded; override;`
`procedure MouseDown(); override;`
`procedure MouseMove(); override;`
`procedure MouseUp(); override;`
`procedure Paint; override;`
`public`
`constructor Create(); override;`
`destructor Destroy; override;`
`procedure Click; override;`
`procedure DrawGlyph();`
`published`
`property AllowAllUp: Boolean; [rw]`
`property GroupIndex: Integer; [rw]`
`property Down: Boolean; [rw]`
`property Flat: Boolean; [rw]`
`property Caption;`
`property Enabled;`
`property Font;`
`property Glyph: TBitmap; [rw]`
`property GrayedInactive: Boolean; [rw]`
`property Layout: TButtonLayout; [rw]`
`property Margin: Integer; [rw]`
`property NumGlyphs: TNumGlyphs; [rw]`
`property ParentFont;`
`property ParentShowHint;`
`property ShowHint;`
`property Spacing: Integer; [rw]`
`property Visible;`
`property OnClick;`
`property OnDblClick;`
`property OnMouseDown;`
`property OnMouseMove;`
`property OnMouseUp;`
`property OnMouseEnter: TNotifyEvent; [rw]`
`property OnMouseLeave: TNotifyEvent; [rw]`
`end;`