Frage zu mehreren Try's

[Hawkeye219]

Dann mache es doch so:

Delphi-Quellcode:

try
  objekt := TObjekt.Create;
  try
    objekt.dosomething;
    objekt.accessfragilethings;
  finally
    objekt.Free;
  end;
except
  ShowMessage ('Fehler');
end;

Damit ist sichergestellt, daß objekt freigegeben wird, falls es erzeugt werden konnte.

Gruß Hawkeye