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
|