[Помогите!] is not a valid floating point value

[megbum]

ВОт код

procedure TForm1.Button1Click(Sender: TObject);
var result:real;
a,b:real;
begin
if (edit1.Text='')or(edit2.Text='') then
begin
ShowMessage('Пустые поля');
end;
a:=strtofloat(edit1.Text);
b:=strtofloat(edit2.Text);
result:=a+b;
Memo1.Lines.Add(edit1.Text+'+'+edit2.Text+'='+floattostr(result));
edit1.Clear;
edit2.Clear;
end;

выдает ошибку is not a valid floating point value

[J-Fobos]

В едите не float переменная.

[megbum]

Цитата: Сообщение от J-Fobos В едите не float переменная.

Пожешь по подробнее? Я просто новичек в delphi

[D.E.Z.E.R.T.I.R]

В едит присутствуют символы отличные от цифр.

Также если вы используете дробное число, то вместо запятой "," вы используете "." точку.

Число должно быть такого вида: 1,25 но никак не 1.25

[megbum]

Цитата: Сообщение от D.E.Z.E.R.T.I.R В едит присутствуют символы отличные от цифр. Также если вы используете дробное число, то вместо запятой "," вы используете "." точку. Число должно быть такого вида: 1,25 но никак не 1.25

А как тогда сделать чтобы в edit можно было писать текст?

[D.E.Z.E.R.T.I.R]

Цитата: Сообщение от megbum А как тогда сделать чтобы в edit можно было писать текст?

а зачем ты тогда используешь real переменную?

[megbum]

АА, все спасибо всем за помощ. Все получилось=)