请教窗口问题

在mainform的activate过程中写入
loginform.showmodal;
ok了!

解决方案 »

  1.   

    你应在Ｐｒｏｊｅｃｔ的Ｕｎｉｔ中处理
      Application.Initialize;
    　//创建登录窗体　
      frmLogin := TfrmLogin.Create(nil);
      if frmLogin.ShowModal = mrOK then begin
        //如果登录成功，则打开主窗体并运行
        frmLogin.Free;
        Application.CreateForm(TForm1, Form1);
        Application.Run;
      end
      else begin
    　　//否则推出应用程序　
        Application.Terminate;
      end;
      

  2.   

    to  lydwei() 可是还是不能隐藏mainform呀！
      

  3.   

    to WuHeHai(河海) 
    我觉得你的做法肯定行，可是，为什么我的delphi连mrok都不认识
      

  4.   

    to WuHeHai(河海) 
    frmlogin要设置什么吗？
      

  5.   

    如果单纯是想隐藏mainform，可在loginform出现前将mainform.visible:=false;mainform中相应调用loginform的事件
    mainform.visible:=false;
    loginform.show;但是这样实际上mainform占用的资源并没有被释放，若想连资源都释放，则将loginform作为主窗体，但在显示顺序上先显示mainform,但mainform一定要动态创建。
      

  6.   

    to : mavqiao(无主的小牛)
    河海的方法是可以的，但是mrok在project的单元里delphi是会报错的，所以，你可以将mrok换为1,就可以了，frmlogin除了在项目中设为available以外也不需要再做什么设置了。
      

  7.   

    在Uses中添加Controls（也就是mrOK申明的Unit)