|
Registriert seit: 12. Jan 2005
Ort: Waldshut-Tiengen
2.875 Beiträge
Delphi 2007 Enterprise
|
Re: Fehlerbehandlung verbessern
10. Jan 2008, 08:53
Du kannst es so machen:
Delphi-Quellcode:
if not TryStrToFloat(s1, x1) then
begin
x1 := 0;
end;
/edit
Zu langsam.
Wobei meine Version aber nach StyleGuide ist.
Klaus E.
Linux - das längste Text-Adventure aller Zeiten...
Wer nie Linux mit dem vi konfiguriert hat, der hat am Leben vorbei geklickt.
|