Liberar memoria de recursos

[ecfisa]

Hola.

Empezado por usuario1000

...
Entiendo que de esta manera se liberan los recursos utilizados, no????

Si, pero de ese modo y de producirce una excepción luego de haberse creado los recursos, estos podrían no ser devueltos.

Te convendría asegurar que los recursos otorgados sean liberados de este manera:

Código Delphi [-]
  qCostes := TFDquery.Create(Application);
  try
    qCostes.Connection := conexion;
    qDocumentos := TFDquery.Create(Application);
    try
      qDocumentos.Connection := conexion;
      qCostes.Close;
      qCostes.sql.Clear;
      qDocumentos.Close;
      qDocumentos.SQL.Clear;
      .   .   .
    finally
      qDocumentos.Free;
    end;
  finally
    qCostes.Free;
  end;

Saludos