启动长时间运行后台进程并检查状态(Start long running background process and check the status)

 我想从Delphi开始一个可能长时间运行的后台进程。 我想让流程独立运行，但首先我想检查流程是否正常运行。 
 
 如果在启动时出现任何问题，我想捕获写入standardErr的任何输出并记录它。 如果后台进程启动正常，我的程序需要能够退出并使生成的进程继续运行。 
 
 psuedo代码将是这样的： 
 
process:=RunProgramInBackground('someCommand.exe');
sleep(1000); // Wait a bit to see if the program started OK
if process.Finished and process.ExitCode=FAIL then 
    Raise Exception.Create(process.ErrorStream);
process.Dispose; // Close any connection we may still have to the running process
Program.Exit; // Background process keeps running
 
 我已经看了几件事（WinExec，CreateProcess，ShellExecute，JclMiscel），但找不到我正在尝试做的任何示例。 做这个的最好方式是什么？ 
 
 我正在使用Delphi 2010 
 
 后台进程是我没有源代码的第三方程序。 

I want to start a potentially long running background process from Delphi. I want to leave the process running independently, but first I want to check that the process started OK.
 
If anything went wrong on startup, I want to capture any output written to standardErr and log it. If the background process starts OK, my program needs to be able to exit and leave the spawned process running.
 
The psuedo code would be something like this:
 
process:=RunProgramInBackground('someCommand.exe');
sleep(1000); // Wait a bit to see if the program started OK
if process.Finished and process.ExitCode=FAIL then 
    Raise Exception.Create(process.ErrorStream);
process.Dispose; // Close any connection we may still have to the running process
Program.Exit; // Background process keeps running
 
I've looked at a few things (WinExec, CreateProcess, ShellExecute, JclMiscel) but can't find any examples for what I'm trying to do. What is the best way to do this?
 
I'm using Delphi 2010
 
The background process is a 3rd party program I don't have the source to.

原文：https://stackoverflow.com/questions/7102514