Form splash não funciona.

Olá pessoal. fiz um form de apresentação funciona e tal a barra de progresso mas só que quando mando ele carregar o próximo form e fecha o de splash ela fecha os dois...pq???? quando eu uso o form.destroy ele dá erro e a aplicação não funciona mais...só reiniciando o micro. abaixo segue a rotina:

procedure TForm_Apresentacao.Timer1Timer(Sender: TObject);
begin

ProgressBar1.Position:=ProgressBar1.Position+10;

if ProgressBar1.Position = 100 then
begin
Form_Principal.Show;
Form_Apresentacao.Close;
end;

end;

Pq não abre o segundo form e fecha o primeiro????