Delphi打开关闭exe文件及运行批处理文件,该怎么处理

Delphi打开关闭exe文件及运行批处理文件
如何运行一个exe文件,延时1秒,运行一个批处理文件,延时50ms关闭另外一个exe文件
希望哪位高手能给段代码

------解决方案--------------------
你这个延时,可以直接使用sleep,顺着执行就是了

ShellExecute可以执行一个程序(exe,bat等)
------解决方案--------------------
Delphi(Pascal) code

 ShellExecute(handle, 'open','c:\1.exe',nil,nil, SW_SHOWNORMAL);
  Sleep(1000);
  Application.ProcessMessages;
 ShellExecute(handle, 'open','c:\2.bat',nil,nil, SW_SHOWNORMAL);
  Sleep(50);
  Application.ProcessMessages;
  SendMessage(handle,WM_CLOSE,0,0);

------解决方案--------------------
探讨
2楼正解

------解决方案--------------------
在批处理中直接延时关闭另一个程序行不?
------解决方案--------------------
createprocess
Terminateprocess
winexec
shellexecute