VCL form construction flow

var

   myForm: TForm;

begin

  myForm := TForm.Create(AOwner);

...

end;

--------------------

TForm.Create(AOwner)细化分解如下:

1.NewInstance  ==> a. 分配内存

               b. 初始化对象的字段属性默认值和方法的VMT指向

2.TForm.Create  ==>   a. 基类的部分:设定执行范围

               b. TForm自己的部分  ==》 a. 初始化和创建dfm持久化资源中对象         ===> 触发窗体上对象的loaded方法

                            b.if OldCreateOrder then OnFormCreate

3.AfterConstruction  ===>a.  if not OldCreateOrder then OnFormCreate

                   b.  activate;

你可能感兴趣的:(construction)