Rechnen mit Kommastellen

[wincompi5]

Hallo zusammen

Ich hänge wieder einmal bei etwas ganz Simplen fest!
Es geht nämlich darum, dass ich ein Programm gemacht habe, das u.A. Zahlen berechnen muss.
Dieses Programm Rechnet nämlich zuerst alle Zahlen in einer Listbox zusammen mit diesem Code hier:

Code:

  var  i: Integer;
    gesamt: integer;
  begin
 
gesamt:= 0;

for i := 0 to ListBox2.Items.Count - 1 do
begin
  gesamt := gesamt + StrToInt(ListBox2.Items[i]);
    end;
  

     Edit1.Text := IntToStr(gesamt);
end;

Das Resultat erscheint zwar aber nicht mit Kommastellen!!!
Als nächstes Rechnet das Programm auch noch eine Division:

Code:

Label3.Caption := InttoStr(StrtoInt(Edit2.Text) div Listbox2.Items.Count);

Auch bei diesem Resultat erscheint nur eine ganze Zahl!

Wie kann ich nun den Code ändern, dass Kommazahlen erscheinen!

Vielen Dank schon im Voraus und mit Freundlichen Grüssen
wincompi5

[sirius]

statt "integer" "double" nehmen.
Statt "div" dass übliche "\" nehmen
und nicht strtoint und inttostr sondern strtofloat und floattostr.

[wincompi5]

Wow danke für die schnelle Antwort. Werde es gleich mal ausprobieren.

[wincompi5]

Das mit der Division hat Perfekt funktioniert!! Aber bei der Plus-Rechnung in der Listbox habe ich es probiert statt Integer die Zahlen als Double zu definieren. Aber irgendwie ging es nicht!! Wie muss ich das genau machen???

[DeddyH]

Irgendwie anders. Sry, aber bei solchen Fragen kann man auch nur so antworten. Was genau heißt "ging nicht"?

[wincompi5]

Sorry also hier mein Code mit meinem Versuch das ganze als Double zu definieren.

Delphi-Quellcode:

  var  i: Double;
  var gesamt: Double ;
  begin
 
gesamt:= 0;

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

Edit1.Text := FloatToStr(gesamt);


  end;
end;

Danke das ihr mir helft!!