제목처럼 에러가 납니다... 실행시키는 프로그램은 도스프로그램입니다(hwp2txt.exe)..
근데 에러가 나고, 닫기를 누르면 계속 에러가 나고, 나중에는 실행이 되는 겁니다..
왜 그럴까요??? 또 어떨때는 나지 않아요...
에러가 뭐나면요... winoldap에러랍니다...창 제목이 그거더군요...
제가 어떻게 썼나면요..
먼저 위에서, 프로그램이름이나 경로가 도스에 맞지 않을까봐, copy를 하거든요..
득정한 경로에 temp.hwp로요..
글구, fileexists check하구서, 이거를 하는데...
else 부분을 타는것두 아니구, 에러창이 떠요... 왜그걸까요??
오늘 중으로 해결나야되는데....
제발 좀 부탁드립니다...
*************************************************************************
if CreateProcess(nil,PChar('c:workhwp2txt.exe /ks 'c:worktemp.hwp'),
nil,nil,False,NORMAL_PRIORITY_CLASS,nil,nil,SI,PI) then
begin
// 프로그램이 종료될때까지 기다린다.
WaitforSingleObject(PI.hProcess,INFINITE);
// 종료후 Process를 닫는다.
CloseHandle(PI.hProcess);
//포커스를 잃어버려서, 핸들값 가져와 이 프로그램에 포커스 준다.
hWndMe := FindWindow(nil, Pchar('판결문 생성및편집'));
SetForegroundWindow(hWndMe);
end
else
begin
uf_ShowMessage('error', mtError, [mbok]);
exit;
end;
********************************************************