接口的多继承

Question

有没有一种方法来定义从两个或更多接口继承的接口？

我试过Delphi2007下面的代码：

IInterfaceA = interface 
    procedure A; 
    end; 

    IInterfaceB = interface 
    procedure B; 
    end; 

    IInterfaceAB = interface(IInterfaceA, IInterfaceB); 

..它在线路IInterfaceAB = interface(IInterfaceA, IInterfaceB)引发错误E2029 ')' expected but ',' found。

Answer 1

在Delphi中没有多接口继承，因为在Delphi中根本没有多继承。你所能做的就是让一个类一次实现多个接口。

TMyClass = class(TInterfacedObject, IInterfaceA, IInterfaceB) 

Answer 2

在Delphi中，接口不能继承多个接口，但类可以实现多个接口。如果你正确地设计你的组件（查找ISP - 接口隔离原则），你不需要从接口继承接口。

Answer 3

恕我直言，在这种情况下，您必须定义树对象。 每一个接口和第三多重继承这样的：

IInterfaceA = interface 
    procedure A; 
    end; 

    IInterfaceB = interface 
    procedure B; 
    end; 

    TiA = class(TInterfacedObject, IInterfaceA) 
    procedure A; 
    end; 

    TiB = class(TInterfacedObject, IInterfaceB) 
    procedure B; 
    end; 

    TMyObject = class(TInterfacedObject, IInterfaceA, IInterfaceB) 
    private 
    _iA : IInterfaceA; 
    _iB : IInterfaceB; 
    function getiA : IInterfaceA; 
    function getiB : IInterfaceB; 
    public 
    property iA : IInterfaceA read getiA implements IInterfaceA; 
    property iB : IInterfaceB read getiB implements IInterfaceB; 
    end; 
{.....} 
{ TMyObject } 

function TMyObject.getiA: IInterfaceA; 
begin 
    if not Assigned(_iA) then _iA := TIA.Create; 
    Result := _iA; 
end; 

function TMyObject.getiB: IInterfaceB; 
begin 
    if not Assigned(_iB) then _iB := TIB.Create; 
    Result := _iB; 
end;