El Splash Screen se desaparece muy rápido

[[xEsk]]

Hola, te he escrito tres ejemplos de como realizar un Splash Screen usando un TTimer.

Ejemplos:

- Simple: Ejemplo muy sencillo de como implementar un Splash Screen usando un Timer.

- Advanced: Ejemplo mas elaborado. El Splash Screen se muestra usando las funciones "Blend" que incorporan los Forms del Delphi 7 y superiores. Si se está ejecutando bajo Windows XP o superior se muestra una sombra al Splash Screen.

- Advanced2: Ejemplo de como mostrar un Splash Screen usando la función "AnimateWindow". Por defecto en el ejemplo, la animación del Splash Screen es aleatoria. Si se está ejecutando bajo Windows XP o superior se muestra una sombra al Splash Screen.

Saludos.