现在有主窗口form1子窗口form2(登录窗口)
想要达到效果是:想要让form2子窗口在主窗口显示之前显示。(书上写了,可是我搞不大明白,请搞手赐教)谢谢

解决方案 »

  1.   

    按F7运行,到工程代码页如下2个表单的
    将要最先启动的表单放到第二行
    program Project1;uses
      Forms,
      Unit1 in 'Unit1.pas' {Form1},
      Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin
      Application.Initialize;
      Application.CreateForm(TForm2, Form2);//将Form2也就是你要首先启动的移到该处保存即可
      Application.CreateForm(TForm1, Form1);
      Application.Run;
    end.
      

  2.   

    提示出错如下:
    project project1.exe raised exception class einvalidoperation with message'
    cannot create form. No MDI forms are curredtly active'.process stopped.use step or run to continue.
      

  3.   

    program Project1;uses
      Forms,
      Unit1 in 'Unit1.pas' {Form1},
      Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin
      Application.Initialize;
      Form2 := TForm2.Create(Application);
      Form2.Show;
      Form2.Update;
      Form2.Hide;
      Form2.Free;
      Application.CreateForm(TForm1, Form1);
      Application.Run;
    end.
      

  4.   

    要是MDI则采用其他方法,搜寻下,很多的
      

  5.   

    懒虫的方法基本不错:
    program Project1;uses
      Forms,
      Unit1 in 'Unit1.pas' {Form1},
      Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin
      Application.Initialize;
      Form2 := TForm2.Create(Application);
      try
        Form2.ShowModal;      // <==== 在Form2中检查登入信息
      finally
        Form2.Free;
      end;
      Application.CreateForm(TForm1, Form1);
      Application.Run;
    end.