如何在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);

相关文章

ffmpeg 是一套强大的开源的多媒体库 一般都是用 c/c++ 调用, 抽空研究了一下该库的最新版 ,把...
32位CPU所含有的寄存器有:4个数据寄存器(EAX、EBX、ECX和EDX)2个变址和指针寄存器(ESI和EDI) 2个指针寄...
1 mov dst, src dst是目的操作数,src是源操作数,指令实现的功能是:将源操作数送到目的操作数中,即:...
有三个API函数可以运行可执行文件WinExec、ShellExecute和CreateProcess。 1.CreateProcess因为使用复杂...
API原型: Declare Function MoveFileEx& Lib "kernel32" Alias "MoveFileExA" (By...