Spring 框架中是否有内置的方法可以使多态容器的使用变得更容易?

Jen*_*off 4 delphi polymorphism containers delphi-xe2 spring4d

我有一个包含不同类型值的字典,我想过滤具有特定子类型且满足特定条件的项目:

var
  FData: IDictionary<TGUID, TObject>; // Polymorphic
begin
  TMicroStep(FData.Values.Single(
    function(const O: TObject): Boolean begin
      Result := (O is TMicroStep) and (TMicroStep(O).OrderTag = 1);
  end))
end;
Run Code Online (Sandbox Code Playgroud)

它可以工作,但由于类型检查和双重强制转换,它看起来很难看。

也许这样的事情是可能的?

var
  FData: IDictionary<TGUID, TObject>; // Polymorphic
begin
  FData.Values.SingleSubType<TMicroStep>(
    function(const MS: TMicroStep): Boolean begin
      Result := MS.OrderTag = 1;
  end))
end;
Run Code Online (Sandbox Code Playgroud)

Spring 有什么可以帮助我的吗?

Ste*_*nke 5

不幸的是,Delphi 不支持接口中的参数化方法。这就是为什么IEnumerable<T>没有像OfType<TResult>.

您可以使用我们提供的静态方法TCollections(或者使用 1.2 中提供这些方法的新静态类型TEnumerable),但我不知道您是否比现有的更喜欢它:

TEnumerable.OfType<TObject, TMicroStep>(FData.Values).Single(
  function(const MS: TMicroStep): Boolean
  begin
    Result := MS.OrderTag = 1;
  end);
Run Code Online (Sandbox Code Playgroud)

该方法看起来像这样(未经测试但应该有效):

class function TEnumerable.OfType<T, TResult>(
  const source: IEnumerable<T>): IEnumerable<TResult>;
begin
  Result := TOfTypeIterator<T, TResult>.Create(source);
end;
Run Code Online (Sandbox Code Playgroud)

TOfTypeIterator<T,TResult>来自 Spring.Collections.Extensions。

在处理类时,其 MoveNext 方法中的类型检查当然可以改进以避免 TValue。