El Splash Screen se desaparece muy rápido

[eddg]

Oye Hermano, no se como hacerlo entonces, dame una pista! no se COMO agregar el SysUtils al uses, dame un ejemplo! por favor...!

[[eduarcol]]

codigo del proyecto:

Código Delphi [-]
program Project2;

uses
Forms,
SysUtils,
Unit1 in '..\..\..\..\..\Archivos de programa\Borland\Delphi7\Projects\nuevo\Unit1.pas' {principal},
Unit9 in 'iconos\Unit9.pas' {splashscreen};

{$R *.res}

begin

SplashScreen := TSplashScreen.Create(Application) ;
SplashScreen.Show;
SplashScreen.Update;
sleep(3000);
Application.CreateForm(Tprincipal, principal);
Application.Initialize;
Application.Run;
end.

es sencillo fijat la linea resaltada

[eddg]

All Rights MAN, ahora sí! yo no pensaba que tambien debia estar en el Proyecto GENERAL, ahora Sí funciona! gracias Hermano!

Me gustaria saber si tienes algun E-Mail a donde pueda comunicarme con UD, ya que somos de Vzla.

[[xEsk]]

Hola, yo para los Splash Screen, me gusta mas usar un Timer, ya que te da mucho mas juego.

Por ejemplo, para los usuarios que no quieren ver tu Splash Screen, puedes programar que si le dan "click" al Splash este se cierre sin terminar su tiempo de espera...

Y así muchas cosas, hehehe... Eso si, la forma de implementar el Splash usando un TTimer seria algo distinta.

Saludos.

[[eduarcol]]

bueno llevas mucha razon, por eso le recomende que no es recomendable que lo hiciera asi, pero tiene razones de mercadeo

[eddg]

Hermano, he tratado mil opciones con los TIMER pero que va, no lo solucionaba, ayudame tu, como podria hacer??? tomando en cuenta los CODIGOS antes expuestos!

Muchas Gracias...

[[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.