delphi - 如何在 Delphi 10.2 中创建通用接口(interface)的列表？

Question

我想为通用接口(interface)定义一个列表类型。存储通用类型数据的树实现需要它。不幸的是，这个简单的解决方案不起作用:

uses
  Generics.Collections;

type
  ITreeNode<T> = interface;

  TTreeNodeList<T> = TList<ITreeNode<T>>;

  ITreeNode<T> = interface
    ['{BC384FDB-4509-44D3-8946-E7ECD4417C4D}']
    //...
    function getChildNodes : TTreeNodeList<T>;
    function getData : T;
  end;

  TTreeNode<T> = class ( TInterfacedObject, ITreeNode<T> )
    //...
  end;

procedure foo;
var
  node : ITreeNode<cardinal>;
begin
  node := TTreeNode<cardinal>.create;
  //...
end;

有什么技巧可以实现吗？

Answer 1

好的。我找到了解决方案:

TTreeNodeList<T> = class ( TList<ITreeNode<T>> )
end;

而不是

TTreeNodeList<T> = TTreeNodeList<ITreeNode<T>>;