| Class TTileBitBtn (unit Tiles) |
TButton
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Click;
destructor Destroy;
procedure CreateHandle;
procedure CreateParams(var Params: TCreateParams);
function GetPalette: HPALETTE;
procedure SetButtonStyle(ADefault: Boolean);
procedure WMEraseBkgnd(var Message: TWmEraseBkgnd);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);
procedure CMMouseEnter(var Message: TMessage);
procedure CM_MouseLeave(var Message: TMessage);
procedure CNDrawItem(var Message: TWMDrawItem);
procedure CNMeasureItem(var Message: TWMMeasureItem);
procedure DrawItem(const DrawItemStruct: TDrawItemStruct);
function GetGlyph: TBitmap;
function GetKind: TBitBtnKind;
function GetNumGlyphs: TNumGlyphs;
procedure GlyphChanged(Sender: TObject);
function IsCustom: Boolean;
function IsCustomCaption: Boolean;
procedure SetGlyph(Value: TBitmap);
procedure SetIExplorerStyle(Value: Boolean);
procedure SetKind(Value: TBitBtnKind);
procedure SetLayout(Value: TButtonLayout);
procedure SetMargin(Value: Integer);
procedure SetNumGlyphs(Value: TNumGlyphs);
procedure SetSpacing(Value: Integer);
procedure SetStyle(Value: TButtonStyle);
procedure TPMPictureChanged(var Message: TMessage);
procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);| Properties |
property Cancel :
property Caption :
property Default :
property Enabled :
property Glyph : TBitmap
property IExplorerStyle : Boolean
property Kind : TBitBtnKind
property Layout : TButtonLayout
property Margin : Integer
property ModalResult :
property NumGlyphs : TNumGlyphs
property ParentShowHint :
property ShowHint :
property Spacing : Integer
property Style : TButtonStyle
property TabOrder :
property TabStop :
property Visible : | Events |
event OnEnter :
event OnExit : | Variables |
FCanvas : TCanvas;
FGlyph : Pointer;
FIExplorerStyle : Boolean;
FKind : TBitBtnKind;
FLayout : TButtonLayout;
FMargin : Integer;
FModifiedGlyph : Boolean;
FMouseHere : Boolean;
FSpacing : Integer;
FStyle : TButtonStyle;
IsFocused : Boolean;| Constructors |
constructor Create(AOwner: TComponent);TTileBitBtn
| Functions |
procedure Click;
destructor Destroy;
procedure CreateHandle;
procedure CreateParams(var Params: TCreateParams);
function GetPalette: HPALETTE;
procedure SetButtonStyle(ADefault: Boolean);
procedure WMEraseBkgnd(var Message: TWmEraseBkgnd);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);DrawFrameControl does not draw a pressed button correctly
procedure CMMouseEnter(var Message: TMessage);
procedure CM_MouseLeave(var Message: TMessage);
procedure CNDrawItem(var Message: TWMDrawItem);
procedure CNMeasureItem(var Message: TWMMeasureItem);
procedure DrawItem(const DrawItemStruct: TDrawItemStruct);
function GetGlyph: TBitmap;
function GetKind: TBitBtnKind;
function GetNumGlyphs: TNumGlyphs;
procedure GlyphChanged(Sender: TObject);
function IsCustom: Boolean;
function IsCustomCaption: Boolean;
procedure SetGlyph(Value: TBitmap);
procedure SetIExplorerStyle(Value: Boolean);
procedure SetKind(Value: TBitBtnKind);
procedure SetLayout(Value: TButtonLayout);
procedure SetMargin(Value: Integer);
procedure SetNumGlyphs(Value: TNumGlyphs);
procedure SetSpacing(Value: Integer);
procedure SetStyle(Value: TButtonStyle);
procedure TPMPictureChanged(var Message: TMessage);
procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);| Properties |
property Cancel :
property Caption :
property Default :
property Enabled :
property Glyph : TBitmap
property IExplorerStyle : Boolean
property Kind : TBitBtnKind
property Layout : TButtonLayout
property Margin : Integer
property ModalResult :
property NumGlyphs : TNumGlyphs
property ParentShowHint :
property ShowHint :
property Spacing : Integer
property Style : TButtonStyle
property TabOrder :
property TabStop :
property Visible : | Events |
event OnEnter :
event OnExit : | Variables |
FCanvas : TCanvas;
FGlyph : Pointer;
FIExplorerStyle : Boolean;
FKind : TBitBtnKind;
FLayout : TButtonLayout;
FMargin : Integer;
FModifiedGlyph : Boolean;
FMouseHere : Boolean;
FSpacing : Integer;
FStyle : TButtonStyle;
IsFocused : Boolean;