Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 13-10-2004
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Cerrar Forma al Ser Creada

Como se podría Cerrar una Forma al momento de Ser Creada ó al momento de crearse sin Cerrar las Demás????

Lo que pasa es que en la FormaPrincipal.dpr arranco primero 2 Formas y después la forma principal:
Código Delphi [-]
....
  Application.Initialize;
  Application.Title := 'Aplicación de Prueba';
  Application.CreateForm(TdmBDPrueba, dmBDPrueba);
  Application.CreateForm(TdmFactPrueba, dmFactPrueba);
  Application.CreateForm(TdmEspPrueba, dmEspPrueba);

  //Forma #1  Activar Fecha Activa
  fFecTrabajo:= TfFecTrabajo.Create(Application);
  fFecTrabajo.ShowModal;
  fFecTrabajo.free;
 
  //Forma #2 Pedir Usuario y PassWord
  fUsuClave := TfUsuClave.Create(Application);
  fUsuClave.ShowModal;
  fUsuClave.free;
  //Forma Principal
  Application.CreateForm(TfMenuPrin, fMenuPrin);
  Application.Run;

Ahora en la Forma #1, al momento de crearse la forma busco la "Fecha Activa" si existe en la Base de Datos entonces tengo que Cerrar la Forma #1 y si no Existe me tiene que mostrar los datos para capturarla pero el detalle es que en el "OnCreate" en donde hago esto, pongo la instrucción CLOSE ó Forma.Close pero no me Cierra la Forma y ni el evento "FormActivate", lo que no quiero es que se alcanze a ver la forma.

Agradezco cualquier comentario.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 19:51:54.


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
Copyright 1996-2007 Club Delphi