Показать сообщение отдельно
  #1  
Старый 05.04.2012, 22:54
Nautilus Nautilus вне форума
Новичок
 
Регистрация: 07.02.2012
Сообщения: 53
Репутация: 10
По умолчанию '0.2' is not a valid floating point

Добрый вечер! Господа, подскажите, почему в данном коде выдаёт ошибку ('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;
Спасибо!
Ответить с цитированием