在Delphi构造函数中重写，虚拟/动态

Question

虚拟/动态的

// declare in Child Class
constructor Create; virtual;

constructor TChildClass.Create;
begin
  inherited;
end;

带有覆盖的那个。

// declare in Child Class
constructor Create; override;

constructor TChildClass.Create;
begin
  inherited;
end;

一无所有

// declare in Child Class
constructor Create;

constructor TChildClass.Create;
begin
  inherited;
end;

这些是同一回事吗？ 看起来很混乱。

Answer 1

是的，有区别，但是首先让我们以更基本的OOP术语来处理virtual关键字，但仍然要介绍它如何应用于Delphi方法。

当您声明派生的（子级）类并将方法实现为“覆盖”时，这意味着您要覆盖（惊讶）基类的匹配方法。

这意味着您可以编写如下代码：

var child : TBaseClass;
begin
    child := TChildClass.Create; // note that it is stored in TBaseClass variable
    child.VirtualMethodDefinedInBaseClassThatHasBeenOverriddenInChildClass;

即使该变量被定义为基类类型，也将在子类中调用该方法。 这是虚拟方法的全部目的，您可以通过更通用类型的引用来访问对象，并且仍可以调用针对您要处理的特定对象类型编写的方法。

如果在基类中有一个虚拟方法，您选择不在子类中重写它，而是重新引入，则在某些情况下可以有效地替换它。 请注意，在大多数情况下，尽管我不确定Delphi在这里需要什么，但在大多数情况下您需要告诉编译器您确实打算这样做。

基本上，如果变量的类型为TBaseClass，并且您在其上调用了已在TChildClass中重新引入的虚拟方法，则它仍将在基类中调用该方法。

但是，如果变量的类型为TChildClass，并在其上调用该方法，则将获得新方法。

现在，对于构造函数，在Delphi中，它略有不同。

虚拟构造函数的重点是能够虚拟地构造对象，并且为此，Delphi也具有“类类型”。

您可以这样说：

type TClassToUse = class of TBaseClass;
var cls : TClassToUse;
    obj : TBaseClass;
begin
    cls := TChildClass;
    obj := cls.Create;

（请注意，我的Delphi知识在这里有点生锈，如果有人发现以上代码中的错误或明显问题，请让我知道或将其修复）

在这里，我们将“类”存储在变量中，然后要求该类为我们构造一个对象。 这使我们可以切换要创建的类，但是我们还需要声明要使用虚拟的构造函数，否则会遇到问题。

因此，在上面的代码中，如果在TBaseClass中将构造函数声明为虚拟的，然后在TChildClass中覆盖它（该代码实际上在cls使用），则将使用覆盖的构造函数。

另一方面，如果您没有将构造函数声明为虚拟的，那么我们将返回基类构造函数。 从根本上说，虚拟意味着要在运行时找出正确的方法来执行，而非虚拟的则是在编译时找出它。

如上文针对常规方法所述的重新引入也可以这种方式进行。

但是，虚拟构造函数仅在通过类类型使用时才用作虚拟构造函数。

Answer 2

不，静态和虚拟方法不是一回事。

override是virtual方法的一种情况。

http://en.wikipedia.org/wiki/Virtual_function

http://docwiki.embarcadero.com/RADStudio/XE4/en/Methods#Method_Binding

构造函数在这里没有什么特别的地方-它们遵循与其他方法相同的规则