Ver Mensaje Individual
  #1  
Antiguo 22-06-2010
Firewind Firewind is offline
Miembro
 
Registrado: ene 2005
Posts: 12
Reputación: 0
Firewind Va por buen camino
Out of memory

Hola.
Estoy creando una aplicacion con lazarus, para cargar un form, uso lo siguiente en la unidad del form a crear:
Código:
procedure ShowFormTest;
begin
  with TFTest.Create(Application) do
    begin
      ShowModal;
      Free;
    end;
end;
El problema que tengo es que desde el form que se llama, cuando cierro el for TFTest, eligo otro test y vuelvo a crear el TFTest de nuevo. Cuando realizo ese proceso varias veces me sale el error 'Out of memory'.
En teoria, hago un Free, pero no se libera la memoria.
Alguna idea?
Saludos
Responder Con Cita