Ver Mensaje Individual
  #2  
Antiguo 13-05-2003
Ruben_Cu Ruben_Cu is offline
No confirmado
 
Registrado: oct 2003
Ubicación: Mariel, Cuba
Posts: 271
Reputación: 0
Ruben_Cu Va por buen camino
Hola cmgenny, pasar las formas a available es fundamental para evitar el uso innecesarios de recursos.
Las formas creadas en tiempo de ejecución pueden ser presentadas en ShowModal, existe mas de una manera la que utilizo básicamente es la siguiente:

procedure TForm1.Button1Click(Sender: TObject);
begin
with TForm2.Create(nil) do
try
ShowModal;
finally
Free;
end;
end;

Esto permite utilizarla y al final es destruida liberando recursos hasta que sea necesaria de nuevo su uso.
Espero te sea útil mi comentario.
Saludos
Responder Con Cita