为什么我的delphi程序一运行就会同时弹出两个form

Question

为什么我的delphi程序一运行就会同时弹出两个form

Answer 1

检查一下工程文件中,Application.CreateForm调用了几次.

Answer 2

begin
  Application.Initialize;
  Application.Title := '图书管理系统';
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(TForm5, Form5);
  Application.CreateForm(TForm6, Form6);
  Application.CreateForm(TForm7, Form7);
  Application.CreateForm(TForm8, Form8);
  Application.Run;
end.

Answer 3

嘿嘿~~那弹出两个算少的，没弹出8个就不错咧~~你可以把不想弹出的那个visible属性改为false。还有就中一开始只创建主窗体，其它窗体使用时自己手动创建。

Answer 4

delphi界的巨牛啊
还第一次看到这么牛的代码啊

Answer 5

默认一般只显示第一个窗体，你看看弹出的是哪两个窗体，再看看你不想要的那个窗体的visible属性

Answer 6

每个窗体的visiable都是false ,原来的代码还好好的,下午不知道加了什么就变成那样了

Answer 7

哈哈，第一次用delphi吧。Project->Options->Forms标签下面
把Auto-create forms中不要一开始创建的窗体都移到右边去