一个等待Winexec执行完成后再继续执行后面代码的函数
2010-03-22 20:54
411 查看
//CMD 要执行的文件路径
//Visiable 是否显示窗口
Function WinExecExW(CMD:Pchar; Visiable:integer):DWORD;
var
StartupInfo : TStartupInfo;
ProcessInfo : TProcessInformation;
begin
FillChar( StartUpInfo, SizeOf(StartUpInfo), $00 );
StartUpInfo.dwFlags := STARTF_USESHOWWINDOW;
StartUpInfo.wShowWindow := SW_HIDE;
if CreateProcess( nil, CMD, nil, nil, {运行批处理文件}
False, IDLE_PRIORITY_CLASS, nil, nil, StartUpInfo,
ProcessInfo ) then
begin
WaitForSingleObject(Processinfo.hProcess,INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess,Result);
CloseHandle( ProcessInfo.hThread );
CloseHandle( ProcessInfo.hProcess );
end;
end;
//Visiable 是否显示窗口
Function WinExecExW(CMD:Pchar; Visiable:integer):DWORD;
var
StartupInfo : TStartupInfo;
ProcessInfo : TProcessInformation;
begin
FillChar( StartUpInfo, SizeOf(StartUpInfo), $00 );
StartUpInfo.dwFlags := STARTF_USESHOWWINDOW;
StartUpInfo.wShowWindow := SW_HIDE;
if CreateProcess( nil, CMD, nil, nil, {运行批处理文件}
False, IDLE_PRIORITY_CLASS, nil, nil, StartUpInfo,
ProcessInfo ) then
begin
WaitForSingleObject(Processinfo.hProcess,INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess,Result);
CloseHandle( ProcessInfo.hThread );
CloseHandle( ProcessInfo.hProcess );
end;
end;
相关文章推荐
- 一个等待Winexec执行完成后再继续执行后面代码的函数
- java线程池主线程等待子线程执行完成后再继续处理后面工作
- objective-c 等待多个异步函数完成后,再执行某段代码--GCD Group 的使用
- java线程池主线程等待子线程执行完成后再继续处理后面工作
- 如何等待一个线程完成后才继续执行之后的操作
- 读者-写者问题的 有一个写者等待,后面的读者就阻塞直到写者完成的代码
- java线程池主线程等待子线程执行完成后再继续处理后面工作
- 多种方法实现当jsp页面完全加载完成后执行一个js函数
- 等待JQuery异步全部完成执行语句(函数)
- 实现 java 执行 cmd 命令,打印输出,等待cmd 完全执行完成后才执行下面代码
- C 语言main 函数终极探秘(&& 的含义是:如果 && 前面的程序正常退出,则继续执行 && 后面的程序,否则不执行)
- js查看一个函数的执行时间实例代码
- CountDownLatch,一个同步辅助类,在完成一组正在其他线程中执行的操作之前,它允许一个或多个线程一直等待
- 自己写的一个计算代码执行时间的函数
- thinkphp5 构造函数 return 一个函数或者视图 不中断,还继续执行问题
- 等待block完成再执行下一句代码
- 跳转页面后,不需继续执行后面所有的代码包括事件
- java并发编程学习:如何等待多个线程执行完成后再继续后续处理(synchronized、join、FutureTask、CyclicBarrier)
- Monitor线程操作(当一个线程中处于等待状态时,另外一个线程来解锁它的等待状态继续执行下去)
- 关于ASP.NET MVC中Response.Redirect和RedirectToAction的BUG (跳转后继续执行后面代码而不结束进程)以及处理方法