Zitat von
barf00s:
ltiefland hat bereits die richtige lösung angeboten......
Nö. Beachte:
Delphi-Quellcode:
try
try
...
except
...
end;
finally
...
end;
ist etwas anderes als
Delphi-Quellcode:
try
try
...
finally
...
end;
except
...
end;
Nur Variante 2 ist richtig. Denn ein except-Block wird nur im Fall einer
Exception ausgeführt
UND löst die
Exception auf, während ein finally-Block
unabhängig von einer
Exception ausgeführt wird (d. h.
immer), eine geworfene
Exception selbst wird aber nicht behandelt und entsprechend auch nicht aufgelöst.
IMHO wäre es eine sinnvolle Erweiterung der Delphi-Sprache, wenn auch sowas zulässig wäre:
Delphi-Quellcode:
try
...
finally
...
except
...
end
Leider ist das - zumindest derzeit - nicht vorgesehen.