try..except-Blöcke funktionieren so: Er arbeitet die Anweisungen Schritt für Schritt ab. Wenn eine Execption hervorgerufen wird, wird der Code im
except-Block ausgeführt. Das Post würde also nur ausgeführt werden, wenn keine
Exception auftrat.
Es gibt aber auch ein Konstrukt, das Code ausführt, egal ob eine
Exception aufgetreten ist oder nicht:
try..finally. In Verbindung mit
try..except sähe das so aus:
Delphi-Quellcode:
try
try
Table1RZM.Value := StrToInt(copy(daten,231,3));
Table1RZG.Value := StrToInt(copy(daten,911,3));
finally
Table1.Post;
end;
except
//hier Fehlerbehandlung
end;
Hier wird
Table1.Post auf jeden Fall ausgeführt.
Wegen der Exceptions zur Entwicklungszeit: Tools->Debugger-Optionen->Bei Exceptions stoppen (oder so ähnlich)