小弟刚学DELPHI新做一个小系统,做完之后想追加用户登陆页面,但隐藏主页面显示用户登陆页面时,程序不能运行~~~请问各位大侠帮忙解答。。本人急用在线等

解决方案 »

  1.   

    加入一个新form作为登陆页面窗体,然后修改dpr文件,可参考如下:program Project1;uses
      Forms,
      windows,
      SysUtils,
      Controls,
      Unit1 in 'Unit1.pas' {Form1},
      Unit2 in 'Unit2.pas' {Form2};{$R *.res}
    begin
      Application.Initialize;
      Form1 := TForm1.Create(Nil); //登陆窗体  if Form1.ShowModal <> mrOK then  //身份验证过程在登陆窗体中完成,如不成功则程序终止
        Application.Terminate;  Application.CreateForm(Tform2,form2);//原来的主form生成
      Application.Run;
    end.
      

  2.   

    在program单元里面控制
    学习