Class TTileSpeedButton (unit Tiles)

Inherits from

TGraphicControl

Constructors


constructor Create(AOwner: TComponent);

TTileSpeedButton


Functions

procedure Click;


destructor Destroy;


function GetPalette: HPALETTE;


procedure Loaded;


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 CMButtonPressed(var Message: TMessage);


procedure CMDialogChar(var Message: TCMDialogChar);


procedure CMEnabledChanged(var Message: TMessage);


procedure CMFontChanged(var Message: TMessage);


procedure CMMouseEnter(var Message: TMessage);


procedure CMSysColorChange(var Message: TMessage);


procedure CMTextChanged(var Message: TMessage);


procedure CM_MouseLeave(var Message: TMessage);


function GetGlyph: TBitmap;


function GetNumGlyphs: TNumGlyphs;


procedure GlyphChanged(Sender: TObject);


procedure SetAllowAllUp(Value: Boolean);


procedure SetDown(Value: Boolean);


procedure SetGlyph(Value: TBitmap);


procedure SetGroupIndex(Value: Integer);


procedure SetIExplorerStyle(Value: Boolean);


procedure SetLayout(Value: TButtonLayout);


procedure SetMargin(Value: Integer);


procedure SetNumGlyphs(Value: TNumGlyphs);


procedure SetSpacing(Value: Integer);


procedure TPMPictureChanged(var Message: TMessage);


procedure UpdateExclusive;


procedure WMLButtonDblClk(var Message: TWMLButtonDown);


Properties

property AllowAllUp : Boolean


property Caption :


property Down : Boolean


property Enabled :


property Font :


property Glyph : TBitmap


property GroupIndex : Integer


property IExplorerStyle : Boolean


property Layout : TButtonLayout


property Margin : Integer


property NumGlyphs : TNumGlyphs


property ParentFont :


property ParentShowHint :


property ShowHint :


property Spacing : Integer


property Visible :


Events

event OnClick :


event OnDblClick :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


Variables

FState : TButtonState;


FAllowAllUp : Boolean;


FDown : Boolean;


FDragging : Boolean;


FGlyph : Pointer;


FGroupIndex : Integer;


FIExplorerStyle : Boolean;


FLayout : TButtonLayout;


FMargin : Integer;


FMouseHere : Boolean;


FSpacing : Integer;



Constructors


constructor Create(AOwner: TComponent);

TTileSpeedButton


Functions


procedure Click;


destructor Destroy;


function GetPalette: HPALETTE;


procedure Loaded;


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 CMButtonPressed(var Message: TMessage);


procedure CMDialogChar(var Message: TCMDialogChar);


procedure CMEnabledChanged(var Message: TMessage);


procedure CMFontChanged(var Message: TMessage);


procedure CMMouseEnter(var Message: TMessage);


procedure CMSysColorChange(var Message: TMessage);


procedure CMTextChanged(var Message: TMessage);


procedure CM_MouseLeave(var Message: TMessage);


function GetGlyph: TBitmap;


function GetNumGlyphs: TNumGlyphs;


procedure GlyphChanged(Sender: TObject);


procedure SetAllowAllUp(Value: Boolean);


procedure SetDown(Value: Boolean);


procedure SetGlyph(Value: TBitmap);


procedure SetGroupIndex(Value: Integer);


procedure SetIExplorerStyle(Value: Boolean);


procedure SetLayout(Value: TButtonLayout);


procedure SetMargin(Value: Integer);


procedure SetNumGlyphs(Value: TNumGlyphs);


procedure SetSpacing(Value: Integer);


procedure TPMPictureChanged(var Message: TMessage);


procedure UpdateExclusive;


procedure WMLButtonDblClk(var Message: TWMLButtonDown);


Properties


property AllowAllUp : Boolean


property Caption :


property Down : Boolean


property Enabled :


property Font :


property Glyph : TBitmap


property GroupIndex : Integer


property IExplorerStyle : Boolean


property Layout : TButtonLayout


property Margin : Integer


property NumGlyphs : TNumGlyphs


property ParentFont :


property ParentShowHint :


property ShowHint :


property Spacing : Integer


property Visible :


Events


event OnClick :


event OnDblClick :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


Variables


FState : TButtonState;


FAllowAllUp : Boolean;


FDown : Boolean;


FDragging : Boolean;


FGlyph : Pointer;


FGroupIndex : Integer;


FIExplorerStyle : Boolean;


FLayout : TButtonLayout;


FMargin : Integer;


FMouseHere : Boolean;


FSpacing : Integer;