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;