目前已有程序，想增加一个登录界面，在程序启动时不显示主界面

目前已有程序，想增加一个登录界面，我记得以前做过，是将新增的登录界面作为程序主窗体，然后在登录成功后，隐藏登录界面（visible=false）,再显示原先的主界面(Fmain.visible=true)
但是现在遇到问题是，我新增界面后，将登录界面作为主窗体，在程序启动时会同时显示登录界面和原先的主界面；请问怎样可以让原先的主界面一开始不显示？

解决方案 »

  1.   

    隐藏登录界面（self.hide）,再显示原先的主界面(Fmain.show) 
      

  2.   

    procedure TmainFm.FormShow(Sender: TObject);
    begin
       loginfm.ShowModal;
    end;
      

  3.   

    在主窗体的FormShow 或者FormCreate中 创建 并显示登录窗体
      

  4.   

    在dpr中加上这个
    if  fLogin.ShowModal = mrOk then
        Application.CreateForm(TfMain, fMain);
      

  5.   

    在工程文件中Application.CreateForm(TfMain, fMain);前加上登录窗体的创建,登录成功后在创建主窗体,方法不止一种
      

  6.   

    在工程文件中将主窗体设置为false,
    application.showmainform:=false;
      

  7.   

    问题解决了，谢谢各位PS：原来自己没注意，在工程文件中不知什么时候把主界面设置为显示了（fMain.visible=true）(工程主窗体为登录界面，fMain是程序运行中的主界面)