Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Cerrar un Form (https://www.clubdelphi.com/foros/showthread.php?t=16142)

scooterjgm 17-11-2004 16:49:16

Cerrar un Form
 
como puedo cerrar un TForm pasados X segundos?? Lo necesito para que se detenga mi SplashScreen al ejecutar la aplicación.

Gracias.

Neftali [Germán.Estévez] 17-11-2004 16:57:36

Colócale un TTimer en el form, Interval=5000 y Active=True. En el evento del TTimer programas cerrar el formulario (Self.Close).

LordBits 17-11-2004 20:04:07

utiliza este codigo en tu dpr

Código:

    FrmSplash := TFrmSplash.Create(Application);
    FrmSplash.Show;
    FrmSplash.Update;

y en la pantalla principal coloca un ttimer por n segundos como quieras y en el
evento ontimer cololo esto
Código:

    FrmSplash.Hide;
    FrmSplash.Update;
    FrmSplash.Destroy;

bueno y hax lo que tengax que hacer....:cool:
expero te ayude esto..

in the future developers will rule the world...

scooterjgm 18-11-2004 11:22:20

no consigo que haga lo que kiero... con lo que tu me dices hace lo siguiente:

ejecuto la aplicacion y muestra la splashscreen, al momento aparece la pantalla principal del programa y a los 9 segundos q le tengo marcados al TTimer me salta el mensaje de destruccion del splashscreen pero en el momento en q muestra la principal la splashscreen desaparece, puede ser q aun kede por debajo pero eso no me vale :(

Neftali [Germán.Estévez] 18-11-2004 11:26:46

Prueba el Splash con ShowModal.

scooterjgm 18-11-2004 11:27:33

Poniendo en las propiedades del splashscreen FormStyle = fsStayOnTop me hace lo que kiero pero..... tengo programado que al abrir el principal me pregunte la configuracion del programa y esta sigue por delante. voy a revisar las propiedades de este ultimo formulario para q se mantenga a la espera.

Gracias a todos por sus respuestas!!


La franja horaria es GMT +2. Ahora son las 11:22:38.

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