Liberar forms

[olbeup]

Empezado por jlrbotella

Hola compañeros:

¿Sabéis como se puede liberar la memoria de un Form?. Actualmente realizo estos procedimientos, pero realmente no me libera la memoria:

Ejemplo 1

Código Delphi [-]
var
  fVentana : TForm2;
begin
  try
    fVentana := TForm2.Create(nil);
    fVentana.ShowModal;
  finally
    fVentana.free;
  end;

  ShowMessage(fVentana.variable); // Aquí debería fallar pero no lo hace
end;

Ejemplo 2

Código Delphi [-]
var
  fVentana : TForm2;
begin
  try
    fVentana := TForm2.Create(nil);
    fVentana.ShowModal;
  finally
    fVentana.free;
    fVentana := nil;
  end;

  ShowMessage(fVentana.variable); // Aquí falla
end;

Hola jlrbotella,

El Ejemplo 2, es la mejor forma de hacerlo, también está el FreeAndNil(fVentana) que hace lo mismo pero en una sola línea.

Un saludo.