Class TBitBtn (unit W95Btns)
Inherits from
TButton
Constructors
constructor Create(AOwner: TComponent);
TBitBtn
Functions
procedure Click;
destructor Destroy;
procedure CreateParams(var Params: TCreateParams);
function GetPalette: HPALETTE;
procedure SetButtonStyle(ADefault: Boolean);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(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 SetKind(Value: TBitBtnKind);
procedure SetLayout(Value: TButtonLayout);
procedure SetMargin(Value: Integer);
procedure SetNumGlyphs(Value: TNumGlyphs);
procedure SetSpacing(Value: Integer);
procedure SetStyle(Value: TButtonStyle);
procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);
Properties
property Cancel :
property Caption :
property Default :
property Enabled :
property Glyph : TBitmap
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;
FKind : TBitBtnKind;
FLayout : TButtonLayout;
FMargin : Integer;
FModifiedGlyph : Boolean;
FSpacing : Integer;
FStyle : TButtonStyle;
IsFocused : Boolean;
Constructors
constructor Create(AOwner: TComponent);
TBitBtn
Functions
procedure Click;
destructor Destroy;
procedure CreateParams(var Params: TCreateParams);
function GetPalette: HPALETTE;
procedure SetButtonStyle(ADefault: Boolean);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(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 SetKind(Value: TBitBtnKind);
procedure SetLayout(Value: TButtonLayout);
procedure SetMargin(Value: Integer);
procedure SetNumGlyphs(Value: TNumGlyphs);
procedure SetSpacing(Value: Integer);
procedure SetStyle(Value: TButtonStyle);
procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);
Properties
property Cancel :
property Caption :
property Default :
property Enabled :
property Glyph : TBitmap
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;
FKind : TBitBtnKind;
FLayout : TButtonLayout;
FMargin : Integer;
FModifiedGlyph : Boolean;
FSpacing : Integer;
FStyle : TButtonStyle;
IsFocused : Boolean;