delphi - OmniThreadLibrary の Parallel.ForEach でのメモリ リーク

Question

私は使用しますOmniThreadLibrary。並列方式ForEachです。

高負荷システムで作業しており、いくつかの配列を並行して処理する必要があります。しかし、メモリリークが発生します。

以下にサンプルを示します。

procedure TForm7.FormCreate(Sender: TObject);
var loop: IOmniParallelLoop<Integer>;
begin
  while True do
    begin
      loop := Parallel.ForEach(1, 100);
      loop.Execute(procedure (const i: Integer)
        begin

        end);

       loop := nil;
       Sleep(100);
    end;
end;

このコードを実行すると、仮想メモリ リークが発生します。

なにが問題ですか？