try .. except ... oder finally?

[aps]

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.