Sätt ut en timer på form1. Sätt intervallen på 2000 och i Events Ontimer skriver du

Timer1.Enabled := false;

I form1´s events onclosequery skriver du följande:

Canclose := Not timer1.enabled;

sätt sedan ut en image och hämta din bild.

välj sedan Projects|view source

skriv direkt efter begin:

form1 := tform1.Create(Application);
form1.Show;

och innan Application.Run skriver du

Repeat
Application.ProcessMessages;
Until form1.CloseQuery;
form1.Hide;
form1.Free;

Kör nu igång programmet och du får se din splashscreen!