[ins813]

Вот в принципе рабочий код, но нужна задержка ?

Код:

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
Application.Initialize;
  Form2:=TForm2.Create(application);
  Form2.Show;
  Application.CreateForm(TForm1, Form1);
  {прочие действия при загрузке}
  Form2.Free;
  Application.Run;
end.