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