我想知道是否可以使用OTL并行化此循环。
我有以下代码。
for i := 1 to XRes do
begin
for j := 1 to XRes do
begin
GridMat.Elem[i,j] := StrToFloat(ListOfValues[(i-1)+((j-1)*Xres)]);
end;
Invalidate;
end;
是否可以将GridMat(来自SDL_matrix.TMatrix)作为参数传递给所有并行的ForEach并将其添加值。
最佳答案
如果您使用Parallel.ForEach的同步版本(默认版本;即,如果您不使用NoWait说明符),则只需通过变量捕获即可访问GridMat。
这样的事情应该可以工作:
Parallel.ForEach(1, XRes).Execute(
procedure (const i: integer)
var
j: integer;
begin
for j := 1 to XRes do
GridMat.Elem[i,j] := StrToFloat(ListOfValues[(i-1)+((j-1)*Xres)]);
end);