Hallo Gemeinde,
seht ihr eine Möglichkeit, dies hier:
Delphi-Quellcode:
try
x1:=strtofloat(s1);
except
x1:=0;
end;
.
.
.
try
xn:=strtofloat(sn);
except
xn:=0;
end;
xges:=x1+x2....+xn
in irgendeiner Form zu verbessern? Sollte zum einen weniger Code und zum Anderen eleganter werden....
Danke für eure Anregungen
MFG
Steffen