delphi - 接口(interface)的多重继承

Question

有没有办法定义一个继承两个或多个接口(interface)的接口(interface)？

我在Delphi2007上尝试了以下代码:

  IInterfaceA = interface
     procedure A;
  end;

  IInterfaceB = interface
    procedure B;
  end;

  IInterfaceAB = interface(IInterfaceA, IInterfaceB);

..它引发了 E2029 错误:

E2029 ')' expected but ',' found

行:

IInterfaceAB = 接口(interface)(IInterfaceA, IInterfaceB)。

Answer 1

Delphi 中不存在多重接口(interface)继承，因为 Delphi 中根本不存在多重继承。您所能做的就是让一个类同时实现多个接口(interface)。

TMyClass = class(TInterfacedObject, IInterfaceA, IInterfaceB)