我的程序为什么一开始就出来好几个form？怎么控制开始出来哪个form？

在project->Options
可设置main form（主窗体）和其他设置！

解决方案 »

  1.   

    我的main form只设了form1，可是执行时一下出来3各form，为什么啊 ？
      

  2.   

    我好菜，真的，什么时关键代码啊？我的form有十几个，么哪个的？
      

  3.   

    这个是不是关键代码？
    program Project1;uses
      Forms,
      Unit1 in 'Unit1.pas' {Form1},
      Unit2 in 'Unit2.pas' {Form2},
      Unit3 in 'Unit3.pas' {PasswordDlg},
      Unit4 in 'Unit4.pas' {Form4},
      Unit5 in 'Unit5.pas' {Form5},
      Unit6 in 'Unit6.pas' {OKRightDlg},
      Unit7 in 'Unit7.pas' {PasswordDlg1},
      Unit8 in 'Unit8.pas' {Form8},
      Unit9 in 'Unit9.pas' {Form9},
      Unit10 in 'Unit10.pas' {Form10},
      Unit11 in 'Unit11.pas' {gotolook},
      Unit12 in 'Unit12.pas' {Form12},
      Unit13 in 'Unit13.pas' {Form13},
      Unit14 in 'Unit14.pas' {Form14},
      Unit15 in 'Unit15.pas' {DataModule15: TDataModule},
      Unit16 in 'Unit16.pas' {Form16},
      Unit17 in 'Unit17.pas' {Form17},
      Unit18 in 'Unit18.pas' {PasswordDlg2},
      Unit19 in 'Unit19.pas' {PasswordDlg3},
      Unit20 in 'Unit20.pas' {Form20};{$R *.res}begin
      Application.Initialize;  Application.CreateForm(TForm1, Form1);
      Application.CreateForm(TForm2, Form2);
      Application.CreateForm(TPasswordDlg, PasswordDlg);
      Application.CreateForm(TForm4, Form4);
      Application.CreateForm(TForm5, Form5);
      Application.CreateForm(TOKRightDlg, OKRightDlg);
      Application.CreateForm(TPasswordDlg1, PasswordDlg1);
      Application.CreateForm(TForm8, Form8);
      Application.CreateForm(TForm9, Form9);
      Application.CreateForm(TForm10, Form10);
      Application.CreateForm(Tgotolook, gotolook);
      Application.CreateForm(TForm12, Form12);
      Application.CreateForm(TForm13, Form13);
      Application.CreateForm(TForm14, Form14);
      Application.CreateForm(TDataModule15, DataModule15);
      Application.CreateForm(TForm16, Form16);
      Application.CreateForm(TForm17, Form17);
      Application.CreateForm(TPasswordDlg2, PasswordDlg2);
      Application.CreateForm(TPasswordDlg3, PasswordDlg3);
      Application.CreateForm(TForm20, Form20);
      Application.Run;
    end.
      

  4.   

    帮我啊，我没学几天delphi，老师布置的作业，明天就么交的
      

  5.   

    你查看一下在主窗体的onshow, oncreate事件中有没有让其他窗体显示出来的代码
      

  6.   

    那不好意思，你的情况我还没有遇见过，我帮不上忙，sorry
      

  7.   

    把你要显示的窗体设成mdiform,其它设成mdichild,然后在options中把设成mdichild的窗体放入available forms中。
      

  8.   

    我同意贫农的看法，可能在你的form1的formcreate事件里写了显示其他form的代码
      

  9.   

    这种情况也可能出现在formactive事件里