Zwei Objekte in einem oder zwei Try Finaly Blöcke?

[HeZa]

@stahli

ein finally verschluckt keine Exception!

Delphi-Quellcode:

sl := TStringlist.Create;
try
  raise Exception.Create('No chance');
finally
  sl.Free;
end;

sl.Free wird, wie du ja gesagt hast immer ausgeführt. Wenn finally ausgeführt wird, während eine Exception läuft, wird nach der Ausführung des finally-Bolcks, die Exception trotzdem weiter geworfen.

Mit anderen Worten: Finally schützt deine Resourcen, erlöst dich aber nicht von der Exception.