如何創建splash窗體？

Question

如何創建splash窗體？

Answer 1

在你的 *.dbr files 中修改如下样子：
begin    
    {Create a splash form}    
    splash:=Tsplash.Create(self);    
    splash.Show;    
    splash.update    
    Application.Initialize;    
    Application.CreateForm(..)    
    .    
    .    
    Application.Run；    
    splash.close;    
    splash.free; 
end;   

Answer 2

正确方法
  frm_splash:=Tfrm_splash.Create(frm_splash);
  frm_splash.Show;
  frm_splash.Update;
  Application.Initialize;
  Application.CreateForm(Tfrm_main, frm_main);
  frm_splash.Free;
  Application.Run;

Answer 3

主要思路就是在project文件中写一个 (最好是Application.Create(splash,Tsplash))创建且释放窗体的代码，因为Application.Initialize;可能会比较耗时间，所以Application.Initialize;要放在穿体创建之后，窗体释放之前，没有了 ，记得在Application.Run;
前释放窗体