Verwende bitte Delphi Tags dann kann man den Quelltext besser lesen.
Danke!
Du kannst except und finally combinieren.
Im Beispiel 1 wird ts.free;
Nie Aufgerufen wenn ein anderer Fehler auftritt.
Sorry eine leere Fehlerbehandlung ist ein Nonsens.
Delphi-Quellcode:
except
// bei einem Fehler wird nichts gemacht. fährt aber nach except weiter?
end;