我想在程序开始运行时除主窗体外再打开一个窗体Form2,
但在TForm1.FormCreate中用Form2.Show;时老出错,Why?

解决方案 »

  1.   

    Project-->Options-->Forms -->將Form2移到Auto Create Foms列表中,放在Form1之後
      

  2.   

    Form2 := Tform2.Create(self);
    Form2.Show;
      

  3.   

    procedure TForm1.FormShow(Sender: TObject);
    begin
     form2:=Tform2.Create(application);
     form2.Show;
    end;
    绝对不出错!
      

  4.   

    1。在FORM1的显示或激活事件中可以把FORM2显示出来
    2。你的FORM1为主窗体,在主窗体创建时FORM2尚未创建,SHOW当然出错
      

  5.   

    1、Project-->Options-->Forms -->將Form2移到Available Foms列表中,Form1 不用移。
     2、在Form1中引用Form2的单元文件
       在Form1的OnShow事件中:添加
     Form2:=TForm2.Create(Application);
     Form2.Show;