怎么让程序初始化时更快捷

嗯,这个问题不知道怎么说好,我想在程序在初始化的时候出现一个等待窗口,上面写着正在初始化,请稍等,等窗体都创建好之后再显示主界面,这样显得比较稳,下面是我仿照的一段代码,不果好像没什么效果,请高手帮我改一改
如果每个窗体在用到的时候再创建可以吗,那么每一次单击事件是不是都会创建一次啊,还是第一次创建好之后就可以了,请大家指点一下,
 form13:=tform13.Create(nil);
  form13.Show;//等待窗体
  form13.Update;
  time1:=now;
  repeat until time1+strtotime('00:00:1')<=now;
  Application.Initialize;
  application.Title:='质管系统V2.0';
  Application.CreateForm(TForm1, Form1);//主窗体,
  Application.CreateForm(TDataModule2, DataModule2);
  form13.Hide;
  form13.FreeOnRelease ;  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(TForm5, Form5);
  Application.CreateForm(TForm6, Form6);
  Application.CreateForm(TForm7, Form7);
  Application.CreateForm(TForm8, Form8);
  Application.CreateForm(TForm9, Form9);
  Application.CreateForm(TForm10, Form10);
  Application.CreateForm(TForm11, Form11);
  Application.CreateForm(TForm12, Form12);
  Application.CreateForm(TForm13, Form13);
  Application.Run;