WaitforSingleObject 出错(100分)

  • 主题发起人 主题发起人 sxflmandy
  • 开始时间 开始时间
S

sxflmandy

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大侠们:
我在控制台程序中的脚本,在XP中运行正常,把程序移到没有DEPHI环境的2000机器中就报错:"application failed to initialize property ..."
请大侠们帮助。

tmp := 'cmd /c copy ' + SourceFile + ' ' + DestFile;
CreateProcess(nil,PChar(tmp),nil,nil,False,NORMAL_PRIORITY_CLASS,nil,nil,StartupInfo,ProcessInfo);
WaitforSingleObject(ProcessInfo.hProcess,INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess,Result);
 
编程习惯,
if CreateProcess(nil,PChar(tmp),nil,nil,False,NORMAL_PRIORITY_CLASS or CREATE_NEW_CONSOLE ,nil,nil,StartupInfo,ProcessInfo) then
begin
WaitforSingleObject(ProcessInfo.hProcess,INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess,Result);
end;
 
后退
顶部