Tela de Splash antes de carregar qualquer coisa

Galera é o seguinte, tenho um sistema q esta muito grande, nele tenho varias units q fazem xamadas a dll´s de terceiros, de varias impressoras fiscais, sintegra e outras coisas... meu problema é que quando executo o sistema até q aparece a tela de splash q é aquela q todo mundo sabe..
FSplash := TFSplash.Create(Nil);
FSplash.Show;
FSplash.Update;
bla bla bla....
demora muito... axo q é na declaração das units na uses
varias units dessas fazem xamadas as dlls, e axo q isso q demora aparecer a tela de splash, queria uma maneira de fazer a tela de splash aparecer antes de tudo.. para poder ficar esperando com a tela de splash aparecendo jah... alguem tem alguma ideia? ow fazer a tela de splahs antes ou uma outra maneira de nao carregar tudo isso, alguma coisa???


program FMInfo;

{¬ToDo ´FMInfo.todo´}

uses
Forms,
F_Prin in ´F_Prin.pas´ ,
F_Grupos in ´F_Grupos.pas´ ,
UDM in ´UDM.PAS´ {DM: TDataModule},
F_ICMS in ´F_ICMS.pas´ ,
F_Unidades in ´F_Unidades.pas´ ,
.....
outras declarações
.....

{$R *.res}

begin
FSplash := TFSplash.Create(Nil);
FSplash.Show;
FSplash.Update;
.............
crianção dos forumularios
.............
FSplash.Update;
FSplash.Hide;
FSplash.Free;
Application.Run;
end.

:?: :?: :?: :?: :?: :?:

[quote:b7c9705a76=´Moderação´][color=red:b7c9705a76]Título editado por Massuda

Removido: ´URGENTE´[/color:b7c9705a76][/quote:b7c9705a76]