[Nautilus]

Добрый вечер! Господа, подскажите, почему в данном коде выдаёт ошибку ('0.2' is not a valid floating point)

Код:

procedure TForm1.Timer3Timer(Sender: TObject);
var
V:real;
begin

if  form1.Label35.Caption<>'' then
begin
V:=StrToFloat(form1.Label35.Caption)*78.5;
form1.Label36.Caption:=FloatToStr(V);
end
else  form1.Label35.Caption:='0.2';
 V:=StrToFloat(form1.Label35.Caption)*78.5;
form1.Label36.Caption:=FloatToStr(V);

end;

Спасибо!

[YVitaliy]

Введи

Код:

DecimalSeparator:='.';

вначале.

[Nautilus]

YVitaliy, спасибочки !!! Всё заработало...