delphi – 重写和非重写的构造函数

前端之家收集整理的这篇文章主要介绍了delphi – 重写和非重写的构造函数前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我只是想问一个简单的问题 – 我有一个派生自TLabel的类如下:
TMyLabel = class (TLabel)
  ...
  constructor Create(AOwner: TComponent); override;
end;

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

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

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

解决方法

虚拟构造函数允许对象的多态实例化.典型的例子是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永远不会被调用.

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

原文链接:https://www.f2er.com/delphi/239371.html

猜你在找的Delphi相关文章