Try-Finally und Try-Except zusammen nutzen?

[Aviator]

Ich mache das auch mit einem doppelten try . Nur bin ich mir nie so sicher, wie die Reihenfolge am sinnvollsten ist.

So:

Delphi-Quellcode:

try
  obj := TObject.Create;
  try
    // Some code
  except
    // Exception handling
  end;
finally
  obj.Free;
end;

Oder doch so:

Delphi-Quellcode:

try
  obj := TObject.Create;
  try
    // Some code
  finally
    obj.Free;
  end;
except
  // Exception handling
end;

Ich würde ja fast sagen, dass die letztere Variante die sinnvollere sein müsste. Weil prinzipiell könnte es ja schon im Constructor des zu erzeugenden Objektes knallen. In der ersten Variante würde das dann nicht abgefangen werden.

Wie seht ihr das?

PS: Ich würde mir auch ein try .. except .. finally Konstrukt wie in C# wünschen.