2 Nachkommastellen

[Ouou]

jetzt habe ich es mit StrToFloatDef gemacht aber es werden mir keine Kommastellen angezeigt.

Delphi-Quellcode:

for i := 1 to 12 do
  begin
    ergebnis := ergebnis + StrToFloatDef(TEdit(FindComponent('Edit' + IntToStr(i))).Text,0);
  end;