|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
Delphi 12 Athens
|
Re: Fehlerbehandlung verbessern
10. Jan 2008, 12:42
wozu ein Array ... er kann auch gleich zusammenrechnen 
Delphi-Quellcode:
xges := 0;
for i := 1 to n do
xges := xges + StrToFloatDef(s[i]{oder wie auch immer}, 0);
oder
Delphi-Quellcode:
xges := 0;
for i := 1 to n do
if TryStrToFloat(s[i], x) then xges := xges + x;
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. 
 my Delphi wish list : BugReports/FeatureRequests
|