{
这个过程是实际建立过程中取消资源占用。
流程： 首先显示splash 过程中创建并初始化
                创建登陆窗体，
                创建主窗体
       释放splash窗体
       显示登陆窗体
                处理权限读取和一些全局变量的操作。
       释放登陆窗体，--使命完成了，可以休息了。

       运行程序--主角上场了

}
program Project1;


uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},//登陆单元
  Unit2 in 'Unit2.pas' {Form2},//splash单元
  Unit3 in 'Unit3.pas' {Form3},//Main单元
  Unit4 in 'Unit4.pas';        //public 单元可以用来传递全局变量

{$R *.res}

begin
  form2 := Tform2.Create(application);
  try
  form2.Show;
  form2.Refresh;
  Application.Initialize;
  Form1 := TForm1.Create(application);
  Application.CreateForm(TForm3, Form3);
  finally
  Form2.Free;
  form1.ShowModal;
  form1.Free;
  Application.Run;
  end;
end.//很简单吧，那里不合理的或者有什么更好的办法大家指出来