Splash screen

{No exemplo form2 seria o form Splash } form2:=tform2.create(application);
form2.show;
form2.update;
form2.hide;
form2.free;
Application.Run;

{Obs: apagar a primeira linha, 'Application.Initialize'. }