Se me ocurre.. probá así
Código Delphi
[-]
FLogo:=TFLogo.Create(Application);
FLogo.Show;
FLogo.Update;
Application.Initialize:
Application.Create(TForm1,Form1);
application.Create(TFLogo,FLogo);
Sleep(3000);
FLogo.Close;
FLogo.Free;
Application.Run;
Sino sirve, tambíen podés probar
Código Delphi
[-]
begin
FLogo.ShowModal;
FLogo.Free;
Form1.AlphaBlendValue:=255;
Form1.AlphaBlend:=False;
end;
Para eso, tendrías que dejar el source del proyecto intacto y no recurrir al código que hiciste.
Si no se entiende, lo explico de nuevo de otra forma.
Saludos!