codigo del proyecto:
Código Delphi
[-]program Project2;
uses
Forms,
SysUtils,
Unit1 in '..\..\..\..\..\Archivos de programa\Borland\Delphi7\Projects\nuevo\Unit1.pas' ,
Unit9 in 'iconos\Unit9.pas' ;
{$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