El Splash Screen se desaparece muy rápido

[eddg]

Señores, toy desarrollando un SOFTware y ya hice mi spalshScreen, y aparece y todo, pero, tengo un problema, necesito que este SPLASH dure algo cerca de 3 segundos, sin embargo he probado con todo:

He leido todos los manuales que salen en este FORO, todos dicen lo mismo, solo hablan de como hacer que aparezca el SPLASH, y como hacer para que se OCULTE o DESAPAREZCA, pero ninguno habla de como hacer que NO DESAPAREZCA, Salvo uno, que hablaban de mi problema pero Recomendaron que usara un comando llamado SLEEP


Sin Embargo este programa por lo que tengo entendido es un PROCEDURE y no se como ejecutarlo y llamarlo desde el EDITOR de codigo del PROYECTO GENERAL.

CODIGO:
begin
SplashScreen := TSplashScreen.Create(Application) ;
SplashScreen.Show;
SplashScreen.Update;

Application.CreateForm(Tprincipal, principal);
Application.Initialize;

Application.Run;
end.

Trato de colocarlo así pero no me funciona, no lo reconoce:

CODIGO:
begin
SplashScreen := TSplashScreen.Create(Application) ;
SplashScreen.Show;
SplashScreen.Update;
Sleep(3000);

Application.CreateForm(Tprincipal, principal);
Application.Initialize;

Application.Run;
end.

---------------

No me Funciona, Por favor, ayudenme en esto, que tengo mas de seis horas tratando y creanme que hoy he leido BASTANTE acerca de este tema y nada q resuelvo el problema! muchas Gracias...