怎么找不到如Application := TApplication.Create(nil);的代码?难道是编译器自己创建的?

解决方案 »

  1.   

    Controls单元的initialization部分有个InitControls函数。
    有InitControls函数中创建了应用程序的几个对象:
      Mouse := TMouse.Create;
      Screen := TScreen.Create(nil);
      Application := TApplication.Create(nil);
    在Forms单元的开头有引用到Controls单元,所以只要你的程序用到TForm,就会把Controls引用到你的程序中来,就会自动执行Controls单元的initialization部分。