[Delphi] Поменять местами переменные в edit.

[Игopь]

Нужно считать данные с полей, поменять местами и вывести в поля

PHP код:

var m,n:Real;
begin
m:=StrToFloat(edt1.Text);
n:=StrToFloat(edt2.Text);
m:=m+n;
n:=m-n;
m:=m-n;
edt1.Text:=IntToStr(m);
edt2.Text:=IntToStr(n); 


Ошибка в 9 и 10 строке.
Подскажите пожалуйста как исправить.

[Stilet]

IntToStr для переменных типа integer.
А у тебя переменные вещественные - используй FloatToStr

[Игopь]

Сообщение от Stilet

IntToStr для переменных типа integer.
А у тебя переменные вещественные - используй FloatToStr

точно ведь!

Спасибо большое

[Lime]

m:=m+n; 
n:=m-n; 
m:=m-n;

пример нестандартного мышления?

[Serge_Bliznykov]

а так не проще?

var s : string;
begin 
  s := edt1.Text; 
  edt1.Text := edt2.Text;
  edt2.Text := s
end;

[Stilet]

пример нестандартного мышления?

Пример стандартного задания для ВУЗов )

[Lime]

Сообщение от Stilet

Пример стандартного задания для ВУЗов )

Поясните.
Я вот не увидел в задании пункта "без использования дополнительных переменных".

p.s. я бы сделал вариант Serge_Bliznykov. Опять-же в задании ничего не говорится о типе данных в Edit'ах.

[Mad_Cat]

пример нестандартного мышления?

для кого как)
всегда так делаю

[Stilet]

Я вот не увидел в задании пункта "без использования дополнительных переменных".

А новички никогда не приводят ТЗ полностью в силу непонимания его.

я бы сделал вариант Serge_Bliznykov.

И я бы сделал )

[Lime]

Сообщение от Mad_Cat

для кого как)
всегда так делаю

А можно увидеть пример со строками?)