在Delphi中实现C＃的BackgroundWorker的最佳方法是什么？

Question

我经常使用C＃的BackgroundWorker对象来启动线程并执行任务。在Delphi中完成同样事情的最简单方法是什么？

这是C＃中的一些代码：

private void button1_Click(object sender, EventArgs e)
{
  BackgroundWorker bg = new BackgroundWorker();
  bg.DoWork += new DoWorkEventHandler(bg_DoWork);
  bg.RunWorkerCompleted += new RunWorkerCompletedEventHandler(bg_RunWorkerCompleted);
  test_number++;
  object[] arguments = { "test", test_number };
  bg.RunWorkerAsync(arguments);
}

void bg_RunWorkerCompleted(object sender, RunWorkerCompletedEventArgs e)
{
      // done.
}

void bg_DoWork(object sender, DoWorkEventArgs e)
{
     // do actual work here
}

Answer 1

由Primoz Gabrijelcic研究OmniThreadLibrary，或者由Andreas Hausladen研究AsyncCalls，它们都应该给你类似的功能。

Answer 2

对于你的解决方案，这是：delphi-components/backgroundworker这个组件就像c＃backgroundworker的事件，属性等。