Question : How to show this splash screen for 3 seconds?

Hello,

I created my splash screen using the method mentioned here: http://delphi.about.com/od/formsdialogs/a/splashscreen.htm

I need to show the splash screen for 3 seconds before showing the main form.

Please help. Thanks.

Answer : How to show this splash screen for 3 seconds?

Look, this is best

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

begin
FormSplashScreen := TFormSplashScreen.Create(Application) ;
  try
  FormSplashScreen.Show;
  Application.Initialize;
  FormSplashScreen.Update;
  Sleep(3000);
  Application.CreateForm(TFormMain, FormMain);
  Application.CreateForm(TFormOptions, FormOptions);
  Application.CreateForm(TForm1, Form1);
  finally
  FormSplashScreen.Hide;
  FormSplashScreen.Free;
  end;
  Application.Run;
end.
Random Solutions  
 
programming4us programming4us