Zitat von
CCRDude:
Zitat von
Flips:
case StrToInt(TEdit(FindComponent('Edit'+IntToStr(i))).Text) of
Müsst gehn, ungetestet
Schonmal dran gedacht, daß auch Text drinstehen kann?
Entweder try... oder StrToIntDef.
Klaro hab ich dran gedacht, aber ne Abfrage ob Zahlen drinstehn kann er ja selber vorher machen bzw. die Eingabe von Zahlen gar nicht erst erlauben.