Optimizacion del Uso de la memoria

[roman]

Un par de comentarios.

Primero, poner un objeto en nil y luego llamar al método Free no causa ningún problema. Es justamente la virtud de Free, que puede invocarse aún sobre nil. Otra cosa es que en el código propuesto sea innecesario y, de hecho, no es recomendable llamar al destructro de un formulario desde un evento del formulario.

Por otro lado, aun cuando estoy de acuerdo en cuidar el uso de memoria y recursos en general, en mi opinión tampoco hay que exagerar. Crear y destruir cada query sobre la marcha es exagerado. Incluso, si un formulario es usado con frecuencia durante el transcurso de una aplicacíon (por ejemplo, un catálogo de productos) me parece más indicado tenerlo siempre presente y no estarlo creando y destruyendo a cada momento.

// Saludos

[dtomeysoto]

Hola amigos, después de leer este tema les propongo utilizar este fragmento de código luego que hagan el Free.

Código Delphi [-]
procedure Optimizar_memoria;
var
  MainHandle : THandle;
begin
  try
    MainHandle := OpenProcess(PROCESS_ALL_ACCESS, False, GetCurrentProcessID);
    SetProcessWorkingSetSize(MainHandle, DWORD(-1), DWORD(-1));
  finally
    CloseHandle(MainHandle);
  end;
end;

Esto lo encontré en la web tiempo atrás y me ha venido de maravillas. Ahora mismo no recuerdo de dónde lo saqué pero lo he probado y me funciona bien, incluso mirando en el Administrador de tareas la memoria que consume mi aplicación, cuando se ejecuta el código anterior disminuye esta mucho más que después de hacer el Free.

La explicación que daban en la web era que cuando se minimiza una aplicación Windows libera un "pocotón de cosas" y este procedimiento viene a simular algo parecido. Disculpen mi falta de memoria.

Byeeee