重写和非重写的构造函数

Question

我只是想问一个简单的问题 - 我有一个派生自TLabel的类如下:

TMyLabel = class (TLabel)
  ...
  constructor Create(AOwner: TComponent); override;
end;

constructor TMyLabel.Create(AOwner: TComponent); 
begin
  inherited Create(AOwner);
  { some code }
end;

现在,Delphi允许我使用和不使用覆盖来编译两个版本.你能解释一下这些差异是什么吗？除了在被覆盖Create()时无法请求我自己的参数.谢谢

编辑:我的意思是 - a virtual和非虚拟基础后代构造函数之间的区别是什么？我总是可以调用继承的构造函数inherited Create(),那有什么意义呢？

Answer 1

虚拟构造函数允许对象的多态实例化.典型的例子是Delphi的.dfm流机制.

读取.dfm文件和实例化表单的代码在编译时不知道要使用哪些类.该决定被推迟到运行时,可以正确地进行,即读取.dfm文件时.此外,您可以获取.dfm文件机制来创建不属于VCL的自定义组件,因此此.dfm机制必须能够正确实例化不属于VCL的类.

构造函数的TComponent声明如下:

constructor Create(AOwner: TComponent); virtual;

对于参与此机制的组件,它必须使用该override指令声明其构造函数.

该过程的另一个关键是类引用.例如

type
  TComponentClass = class of TComponent;

在读取.dfm文件时创建组件的代码大致如下所示:

var
  ComponentClass: TComponentClass;
  Component, Owner: TComponent;
....
ComponentClass = FindComponentClass(ReadComponentClassName);
Component := ComponentClass.Create(Owner);

现在,如果机制没有使用虚拟构造函数,那么将被调用的构造函数TComponent.Create.所以你的构造函数TMyLabel.Create永远不会被调用.

这就是在派生时必须在构造函数中包含override指令的原因TComponent.