Einzelnen Beitrag anzeigen

jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#3

AW: Kleiner Exkurs zu Exceptions (try finally/except)

  Alt 7. Feb 2020, 09:27
Mir ist die Sache durch die Quellcodekommentare aufgefallen.

Deine Beispiel erscheint mir aber etwas seltsam. (Randnotiz, wieso kann man das nicht zitieren?)

Zitat:
...
try
i := IntToStr(s);
except
WriteLn('Es ist ein Fehler aufgetreten. s ist kein Integer);
end;
...
Es würde wohl einen Kompilerfehler ergeben. Das fehlende Anführungszeichen deutet auch darauf hin, dass Du es nur getippt und nicht laufen lassen hast.

So oder so:
Bei
intToStr würde man wohl eher
s := IntToStr(i);

verwenden und das Beispiel würde Sinn ergeben, wenn man wie oben irgendwo die Funktion StrToInt() verwendet, was Du vermutlich eigentlich machen wolltest. Hier können prima Laufzeitfehler auftreten, die als Opfer für Try Except herhalten können:

i := StrToInt(s);
Gruß, Jo

Geändert von jobo ( 7. Feb 2020 um 09:30 Uhr)
  Mit Zitat antworten Zitat