调用WinRAR命令时,如何得知rar压缩文件已经完成?
在网上找到了一个函数WinExecExW,返回值是DWORD的,不知道返回值是什么时,这个函数执行成功了?
Function WinExecExW(cmd:pchar;visiable:integer):DWORD;
var
StartupInfo:TStartupInfo;
ProcessInfo:TProcessInformation;
begin
FillChar(StartupInfo,SizeOf(StartupInfo),#0);
StartupInfo.cb:=SizeOf(StartupInfo);
StartupInfo.dwFlags:=STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow:=visiable;
if not CreateProcess(nil,cmd,nil,nil,false,Create_new_console or Normal_priority_class,nil,nil,StartupInfo,ProcessInfo) then
begin
result:=0;
end
else
begin
waitforsingleobject(processinfo.hProcess,INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess,Result);
end;
end;
在网上找到了一个函数WinExecExW,返回值是DWORD的,不知道返回值是什么时,这个函数执行成功了?
Function WinExecExW(cmd:pchar;visiable:integer):DWORD;
var
StartupInfo:TStartupInfo;
ProcessInfo:TProcessInformation;
begin
FillChar(StartupInfo,SizeOf(StartupInfo),#0);
StartupInfo.cb:=SizeOf(StartupInfo);
StartupInfo.dwFlags:=STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow:=visiable;
if not CreateProcess(nil,cmd,nil,nil,false,Create_new_console or Normal_priority_class,nil,nil,StartupInfo,ProcessInfo) then
begin
result:=0;
end
else
begin
waitforsingleobject(processinfo.hProcess,INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess,Result);
end;
end;
解决方案 »
- ShellExecute 打开 一个 盘符(光驱Z:) 如何模拟F5刷新 一下 z盘 ?
- 怎样得到某一控件在窗体中的位置坐标
- 在delphi程序中控制word里文字方向是竖的(也就是如何设置word里的文字方向为竖排)
- 在delphi中如何获取表中的记录数?
- 公司需要系统分析加技术支持!!北京!up有分!!!斑竹别删!非技术版没人里我!
- ★请教ADODB问题及Automation问题,高手请进【200分】★
- 关于messagebox函数
- 关于控件发声的问题
- 高分请教高手:socket的问题
- delphi怎么封装组件
- 简单问题,如果不能解决,请帮我顶一下,谢谢
- 关于类型转换,怎样将一个oleVariant类型的变量赋值(转换)给一个指定类型的变量,比如将olevariant赋值给TColumns类型的变量
code of non-zero means the operation is cancelled due to error: 255 USER BREAK User stopped the process 9 CREATE ERROR Create file error 8 MEMORY ERROR Not enough memory for operation 7 USER ERROR Command line option error 6 OPEN ERROR Open file error 5 WRITE ERROR Write to disk error 4 LOCKED ARCHIVE Attempt to modify an archive previously locked
by the 'k' command 3 CRC ERROR A CRC error occurred when unpacking 2 FATAL ERROR A fatal error occurred 1 WARNING Non fatal error(s) occurred 0 SUCCESS Successful operation (User exit)