Estas muy cerca, te dejo el modo en que yo lo hago :
Código Delphi
[-]
var
Ab : T_about;
begin
Ab := T_about.Create(Application);
Ab.SpeedButton1.Visible := False;
Ab.Show;
Ab.Update;
Application.Initialize;
Application.Title := '......';
Application.CreateForm(Tdm, dm);
Application.CreateForm(T_main, _main);
...
Application.CreateForm(T_vpres, _vpres);
Ab.destroy;
Application.Run;
end.
Si quieres q mientras se carga no se quede en blanco la 'Splash Screen', ves poniendo Ab.Update's entre los Application.CreateForm