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.

[himitsu]

Ich hatte letztens eine Stream-Klasse, welche bei Schreiben über einen Cache läuft.
Wenn beim Destroy noch was im Cache ist, wird das versucht zu schreiben.
Da kann es natürlich genauso krachen, wie bei vorherrigen Schreibzugriffen.