try-try-finally-finally

[roman]

Hola,

Varias veces he visto esta construcción:

Código Delphi [-]
try
  ObjetoA := TObjectoA.Create;
  
  try
    ObjetoB := TObjetoB.Create;
    
    { algo de código }

  finally
    ObjetoB.Free;
  end;
finally
  ObjetoA.Free;
end;

¿Por qué no simplemente poner?

Código Delphi [-]
try
  ObjetoA := TObjetoA.Create;
  ObjetoB := TObjetoB.Create;

  { algo de código }

finally
  ObjetoA.Free;
  ObjetoB.Free;
end;

// Saludos