有没有更好的方法来委托枚举？

Question

我有以下代码将枚举交给私有字段：

interface

type    

TMyClassEnumerator = class(TEnumerator<TMyClass>)
end;

TMyContainerClass = class(TObject)
private
  FItems: TObjectDictionary<string, TMyClass>;
public
  function GetEnumerator: TMyClassEnumerator;
end;

implementation

function TMyContainerClass.GetEnumerator: TMyClassEnumerator;
begin
  Result := TMyClassEnumerator(FItems.Values.GetEnumerator);
end;

我这样做对吗？我努力实现IENumerable<TMyClass> 或创建我自己的接口，但是，我没有编译它......上面的代码确实适用于for..in，但我觉得我应该通过实现这样的界面。

Answer 1

您的方法是合理的，但我认为您不需要强制转换或确实声明枚举器类。我会这样做：

TMyContainerClass = class
private
  FItems: TObjectDictionary<string, TMyClass>;
public
  function GetEnumerator: TEnumerator<TMyClass>;
end;

function TMyContainerClass.GetEnumerator: TEnumerator<TMyClass>;
begin
  Result := FItems.Values.GetEnumerator;
end;