Утечки памяти в параллели OmniThreadLibrary.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;

Когда я запускаю этот код, я вижу утечку виртуальной памяти.

Что случилось?