A criação de um Splash em Delphi é uma coisa bem simples, que dura aproximadamente de 5 a 10 minutos.
Vamos lá!
Adicione 1 Timer e 1 Progressbar


sleep(556);
progressbar1.Position:=20;
sleep(556);
progressbar1.Position:=30;
sleep(556);
progressbar1.Position:=40;
sleep(556);
progressbar1.Position:=50;
sleep(156);
progressbar1.Position:=60;
sleep(700);
progressbar1.Position:=70;
sleep(55);
progressbar1.Position:=80;
sleep(55);
progressbar1.Position:=90;
sleep(556);
progressbar1.Position:=100;
sleep(3006);
form2.show;
Você podera mudar os valores de SLEEP(tempo).
Ficará assim:

Vá até BorderStyle e marque o estilo BSNONE, como é mostrado na figura:

Crie um novo FORM, como no exemplo abaixo:

Clique duas vezes no evento OnShow da FORM2,

e cole o seguinte código:

Vídeo Aula:
Gostou? Então compartilhe e comente!