Hallo
Hab gleich mal folgendes übernommen...
auswahl := StrToIntDef(ComboBox1.Text,auswahl); ComboBox1.Text := IntToStr(auswahl);
Nun passiert folgendes:
Es taucht nun keine Fehlermeldung mehr. In der Listbox werden keine Zahlen ausgegebn und in der ComboBox springt der ausgewählte Wert (z.b.5) auf Null.