Delphi-PRAXiS - Einzelnen Beitrag anzeigen

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.

CCRDude (Gast) n/a Beiträge	#5 Re: fehler in label ausgeben. 17. Mai 2007, 20:26 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.
	Zitat