我使用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;
当我运行此代码时,我可以看到虚拟内存泄漏。
有什么问题?