Class TBI_TorryButton (unit bi_btns)

Inherits from

tgraphiccontrol

Constructors


constructor Create(AOwner: TComponent);

torry


Functions

destructor destroy;

for future use.

procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure paint;


procedure CMFontChanged(var Message: TMessage);


procedure CMMouseEnter(var Message: TMessage);


procedure CMMouseLeave(var Message: TMessage);


procedure CMTextChanged(var Message: TMessage);


procedure loaded;


procedure setalign(value: talignment);


procedure setallup(value:boolean);


procedure setdown(value: boolean);


procedure setdowncolor(value:tcolor);


procedure setecolor(value: tcolor);


procedure setgroupindex(value:integer);


procedure sethfont(value: Tfont);


procedure setoffset(value: integer);


procedure setscolor(value: tcolor);


procedure torrytextout(var buffer:tbitmap);


Properties

property Alignment : talignment


property AllowAllUp : boolean


property Caption :


property Color : tcolor


property Down : boolean


property DownColor : tcolor


property Font :


property GroupIndex : integer


property HighlightFont : Tfont


property ParentFont :


property ShadowColor : tcolor


property ShadowOffset : integer


property ShowHint :


property Visible :


Events

event OnClick :


event OnDblClick :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


Variables

FState : TButtonState;


drawframe : boolean;


falign : talignment;


fallup : boolean;


fdown : boolean;


fdowncolor : tcolor;


fecolor : tcolor;


fgroupindex : integer;


fHfont : tfont;


foffset : integer;


fscolor : tcolor;



Constructors


constructor Create(AOwner: TComponent);

torry


Functions


destructor destroy;

for future use...


procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure paint;


procedure CMFontChanged(var Message: TMessage);


procedure CMMouseEnter(var Message: TMessage);


procedure CMMouseLeave(var Message: TMessage);


procedure CMTextChanged(var Message: TMessage);


procedure loaded;


procedure setalign(value: talignment);


procedure setallup(value:boolean);


procedure setdown(value: boolean);


procedure setdowncolor(value:tcolor);


procedure setecolor(value: tcolor);


procedure setgroupindex(value:integer);


procedure sethfont(value: Tfont);


procedure setoffset(value: integer);


procedure setscolor(value: tcolor);


procedure torrytextout(var buffer:tbitmap);


Properties


property Alignment : talignment


property AllowAllUp : boolean


property Caption :


property Color : tcolor


property Down : boolean


property DownColor : tcolor


property Font :


property GroupIndex : integer


property HighlightFont : Tfont


property ParentFont :


property ShadowColor : tcolor


property ShadowOffset : integer


property ShowHint :


property Visible :


Events


event OnClick :


event OnDblClick :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


Variables


FState : TButtonState;


drawframe : boolean;


falign : talignment;


fallup : boolean;


fdown : boolean;


fdowncolor : tcolor;


fecolor : tcolor;


fgroupindex : integer;


fHfont : tfont;


foffset : integer;


fscolor : tcolor;