Alle Einträge in einer Listbox addieren

[Ultimator]

Kein Problem. Du gehst in einer Schleife alle Einträge durch und addierst sie jeweils. Schätze, das hier sollte gehen, ist aber ungetestet:

Delphi-Quellcode:

for i := 0 to ListBox1.Items.Count - 1
  gesamt := gesamt + ListBox1.Items[i];