![]() |
![]() |
| 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
|
|||
|
|||
|
Exactamente
if not Assigned(FClients) then // El form no esta creado Begin // Asi lo crearia // FClients := TFClients.Create(Application); // O hago lo que quiero // Si quiero lo enseño // FClients.Show; end else Begin // Como esta creado si quiero lo enseño // FClients.Show; // O hago lo que quiera end; Es mas directo ja que controla si la variable FClients que apunta al formulario no esta a nil Lo unico que tienes que hacer cada vez que cierres el formulario y quieras liberarlo poner la variable FClients a nil // En Formulario Clientes procedure TFClients.FormClose(Sender: TObject; var Action: TCloseAction); begin FClients.Free; FClients := nil; end;
__________________
Gabriel |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|