Liberar memoria

[dec]

Hola,

¿Pero tú tienes algún problema cuando se cierra el programa? ¿Notas algo o qué?

[Perrero80]

Bueno el programa al cerrar se demora un poco en hacerlo.

[Lys]

Empezado por Perrero80

Bueno el programa al cerrar se demora un poco en hacerlo.

Hola, yo solucione un problema similar, donde se demoraba en cerrar, simplemente quitandole prioridad a la aplicacion al cerrarla. Me ayudo bastante, ya q, cierra al toque la ventana y queda cerrandose pero no se ve, recupero el escritorio y puedo ir a otras ventanas mientras. Saludos y espero les sirva.

Código Delphi [-]
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin

 setPriorityClass(GetCurrentProcess,IDLE_PRIORITY_CLASS);
 SetThreadPriority(GetCurrentThread,THREAD_PRIORITY_IDLE);

 Application.FreeOnRelease;

 Action := caFree;

end;

[cesarsoftware]

Prueba con esto, puedes hacerlo tantas veces como quieras, mira la memoria es el administrador de tareas

Código Delphi [-]
procedure LiberarMemoria;
begin
  if Win32Platform = VER_PLATFORM_WIN32_NT then
    SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF);
end;

A ver si te ayuda

[cheo_CA]

como seria para android XE5

[Casimiro Noteví]

Empezado por cheo_CA

como seria para android XE5

Para android, en principio, no necesitas hacerlo, se supone que lo hace automáticamente cuando le hace falta más memoria o recursos.

[[AgustinOrtu]]

En android se emplea ARC (automatic reference counting) que es similar a como trabajan los record, string e interfaces en Delphi. Básicamente el sistema lleva la cuenta de la cantidad de referencias incrementando o decrementado cuando sea necesario. Cuando la cantidad de referencias llega a 0, se libera la memoria.

Si te fijas la implementación de los destructores, cuando el sistema es ARC, el método Destroy no hace nada

[Sotrono]

Empezado por dec

¿Pero tú tienes algún problema cuando se cierra el programa? ¿Notas algo o qué?

Para que se ejecute un programa, primero debe cargarse en memoria. Creo que lo que quiere saber Perrero80 es que si cuando se cierra el programa, la memoria que estaba ocupando se libera "sola", o se deben escribir algunas lineas para liberarla.
Era eso???

[Perrero80]

Exacto, esa es justamente mi duda...

[[Delphius]]

La respuesta es SI y NO.

En teoría, y en general en la práctica, al cerrar la aplicación se libera la porción de memoria asignada. Pero... (siempre hay peros) si haces empleos de punteros, debes liberar lo que haz pedido; es decir que por cada New() que hayas realizado, un Dispose() debe ser ejecutado.

Ahora bien, para mayor seguridad existe la sentencia CaFree. Que puede ejecutarse cuando se cierra el formulario. En el evento on Close() debes realizar esto:

Código Delphi [-]
Action := CaFree;

Dicha sentencia permite (y se asegura) de que toda la memoria usada sea liberada (exceptuando los punteros).
Espero que te sirva de ayuda.