Hola.
Cita:
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