FreePascal.ru

AnacRon писал(а): a:=StrToCurr(Edit.Text);

Большое спасибо, работает:)

Недавно перешел c Windows на Linux, и как альтернативу Delphi выбрал Lazarus

Столкнулся с такой проблемой:
Допустим на форму добавил два элемента TEdit и кнопочку Button:
код которой такой:

procedure TForm1.bpClick(Sender: TObject);
var a: Currency;
begin
a:=FloatToStr(Edit ...