![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
|
|
#1
|
|||
|
|||
|
Que tal,
Puedes ir al menu Project / Options / Forms y alli puedes decidir que formularios deseas que se autocreen al iniciar la aplicacion luego en el lugar en el que necesites utilizar un form puedes hacer lo siguiente (bueno en realidad esto es para un formulario mdi) Código:
if form1 = nil then
Application.CreateForm(Tform1, form1);
form1.Windowstate := wsNormal;
form1.BringToFront;
form1.Show;
Código:
form := nil; action = cafree; |
|
#2
|
|||
|
|||
|
saludos a todos
tambien puedes hacer esto para formulario normales.. pon este codigo desde donde llamas a tu formulario. try Form1:=Tform1.create(self); // Te crea el formulario en memoria form1.ShowModal; // Muestra el formulario finally form1.release; //libera el formulario de la memoria cuando termine end; Si no quieres escribir mucho solo declara esta funcion para llamarla desde cualquier lugar. function ShowForm(aForma:TFormClass):boolean; //*----------------------[Funcion LoadForm]-------------------** //* Objetivos : Llamar a un formulario ** //* Creada por : Raptor ** //* Fecha Octubre 2003 ** //* Ejemplo ShowForm(TCliente) ** //************************************************************** var Self:TComponent; begin With aForma.Create(Self) do try ShowModal; finally Free; end; Result :=True; end; para llamar a un formulario lo unico que debes hacer es : ShowForm(Tform1); // llama la forma que tu quiere y listo |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|