Simpel matematik i delphi

edit1.text := FloattoStr(strtoFloat(edit2.text) * strtoFloat(edit3.text));

fik jeg ikke nok ud af, men er dette den skal regne ud

edit1 [texten er 3]
edit2 [teksten er 315 og skal minus med edit1] resultatet skal divideres med edit3 og resultatet skal vises i edit4
edit3 [teksten er 2000 og skal divideres med 100]
edit4 [resultat]

Edit1.text:='3';
Edit2.text:=FloatToStr(315-StrToFloat(Edit1.text));
Edit3.text:=FloatToStr(2000/100);
Edit4.text:=Floattostr(StrToFlost(Edit2.text)/StrToFloat(Edit3.text));

Resultat er 15,6

------------

var
  e1,e2,e3,e4 : real;
begin
  e1:=StrToFloat(Edit1.Text);
  e2:=StrToFloat(Edit2.Text);
  e3:=StrToFloat(Edit3.Text);

  e2:=(e2-e1);
  e3:=e3/100;
  e4:=e2/e3;

  Edit4.Text:=FloatToStr(e4);
end;

har fået lavet det meste af det der skal laves :) tak for hjælpen

http://img402.imageshack.us/img402/3207/mradtc2.jpg

er dog en text der lige skal rettes fra meter til cm for at det passer