我要在主窗体显示前显示登陆窗体。请问登陆窗体和主窗体应该怎么设置?

解决方案 »

  1.   

    主窗体Form的visible属性设为false,登陆窗体的Form的visible属性设为true
      

  2.   

    当登陆窗体打开的时候,主窗体visible属性设置为false;
    登陆窗体设置为true;
    当登陆窗体回车或者按下确定后,确认登陆用户的合法性,也就是登陆用户是否与数据库中设置的用户名和密码相匹配:
    a.匹配的话触发主窗体的visible属性为true;
    b.不匹配则保持主窗体visible属性为false,登陆窗体visible属性设置为true;
    等待用户重新输入,进入下一个验证......
      

  3.   

    比如登陆窗是uLogin,主窗体是MainForm,那么,首先在program文件里这样改:
    begin
      Application.Initialize;
      ULogin := TULogin.Create(Application);
      ULogin.ShowModal;
      Application.CreateForm(TMainform, Mainform);
      Application.Run;
    end.然后在uLogin窗体里写验证事件如:
    begin
      If (UserName = '...') and (Password = '...') then
        Self.Close
      else
        ShowMessage('用户名或密码错误');
    end;注意要在uLogin里的OnCloseQuery事件里加上一句
    Application.Terminate;
      

  4.   

    登陆窗体先visible属性设为true,如果验证通过,主窗体visible属性设为true
    否则就主窗体visible属性设为false,登陆窗体visible属性设为ture。