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
|