obj := Object.Create;
try
  obj.Method;
except
  on E: exception do
    begin
      Something();
    end;
finally
  obj.Free;
end;