Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Auto Crear Forma (https://www.clubdelphi.com/foros/showthread.php?t=364)

cmgenny 13-05-2003 05:27:56

Auto Crear Forma
 
Holas

Se que es mejor poner las formas que no este utilizando inmediatamente en la opcion de aviables. pero si lo hago no puedo hacer showmodal. Okay es sencillo como puedo auto crear mis formas en tiempo de ejecución.

Gracias Bey Bey.

Ruben_Cu 13-05-2003 05:44:19

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

fortran 13-05-2003 13:46:03

Viene a ser lo mismo que hago yo.

procedure TPrincipal.Botonverformulario(Sender: TObject);
begin
Application.CreateForm(Tformularioaver,Formularioaver);
Try
Formularioaver.showModal;
finally
formularioaver.Free;
end;
end;


La franja horaria es GMT +2. Ahora son las 05:19:47.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi