Addieren von Edits. Gehts auch kürzer?

[Butch87]

Warum eigntl so kompliziert??

Delphi-Quellcode:

procedure TKostenaufstellung.Edit1Exit(Sender: TObject);
begin
  Edit5.Text:= FloatToStrF(StrToFloatDef(Edit5.Text, 0) + StrToFloatDef(TEdit(Sender).Text, 0),   ffFixed, 8, 2);
end;

So sollte das doch gehen, oder hab ich etwas übersehen?