Frequently Asked Component Specific Questions
Options |
|
Display all FAQ items |
Displaying items 1 to 1 of 1, page 1 of 1
<< previous next >>
TAdvMoneyEditUsing the Extrabuttons
You can define the caption of the extra buttons via AdvMoneyEdit.ExtraButtons.Extra1,AdvMoneyEdit.ExtraButtons.Extra2,.. properties.
The click on such button is handled from the OnExtraButtonClick event.
This passes the index of the button and the value in the edit control.
From there you can perform a function.
For example, if you set Extra1 := 'SQRT'; you could implement the function as:
procedure TForm2.AdvMoneyEdit1ExtraButtonClick(Sender: TObject; idx:
Integer;
var value: Extended);
begin
if (idx = 1) then
value := sqrt(extended);
end;