Aus eine Listbox Kommazahlen herrausbekommen

[hors]

Hallo,
ich habe ein Problem :

Delphi-Quellcode:

for i:= 0 to ListBox3.Items.Count -1 do
 gesamt := StrToFloat(ListBox3.Items[i]) + gesamt;

       for i:= 0 to ListBox4.Items.Count -1 do
       gesamt2 := StrToFloat(ListBox4.Items[i]) + gesamt2;

          ergebnis  :=  gesamt2 - gesamt;

  edit5.text := FloatToStrF(ergebnis,ffnumber,8,2);

gesamt,gesamt2,ergebnis und i sind double
Wenn es integer sind klappt es.

Ich hoffe Ihr könnt mir helfen!

lg hors