如何在Delphi中实现并行循环?

前端之家收集整理的这篇文章主要介绍了如何在Delphi中实现并行循环?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
如何在Delphi(Delphi 200X,Delphi XE)中实现并行循环?怎么做这个最好的方法?有没有通用的解决方案?

请举例说明.

解决方法

目前最好的解决方案可能是 OmniThreadLibrary中的Parallel For Loop构造.你传递一个集合,或者一对表示下边界和上边界的整数,以及一个表示循环体的匿名方法,它使用一个线程池来运行for循环并行.

请注意,这仅在循环体方法能够独立存在时才有效.如果它修改了任何外部变量或依赖于先前在循环中进行的计算的值,那么它就无法并行化.

可以在here找到对OmniThreadLibrary并行的介绍.例如,一个简单的for循环遍历数字看起来像这样:

Parallel.ForEach(1,testSize).Execute(
  procedure (const elem: integer)
  begin
    // do something with 'elem'
  end);

猜你在找的Delphi相关文章