SplashScreen al cerra la aplicación

[jdangosto]

Buenas.

Estoy intentando crear un formulario tipo Splash que se ejecute cuando finalice la aplicación, el código que implemento en el evento onclose del form1 es:

form2.show;
form2.Timer1.Interval := 20000;
application.Terminate;

¿Cómo puedo hacerlo de forma correcta?

[Pablo Carlos]

Código Delphi [-]

   SplashForm := TSplashForm.Create(Application);
   SplashForm.Show;
   SplashForm.Update;
   // cierre de aplicación   
   SplashForm.Hide;
   SplashForm.Free;

Este código está en la demo del delphi.
Saludos

[jdangosto]

Gracias Pablo, ese código lo conocía de las demos, pero ahora bien. El código si que funciona y muestra la ventana al cerrar, pero no consigo mantenerla unos segundos, he intentado con un timer pero no consigo mantenerla, simplemente pega un pantallazo.

¿Cómo podría mantenerla unos segundos?

[[basti]]

Pon las líneas:

Código Delphi [-]
 SplashForm.Hide;
 SplashForm.Free;
 Aplication.Terminate;

en el evento onTimer del Timer.

Un saludo.

[jdangosto]

Gracias Basti, funciona a la perfección.


Un saludo