怎么才能知道我调用的记事本是什么时候关闭的?(100分)

  • 主题发起人 主题发起人 peterluolaw
  • 开始时间 开始时间
P

peterluolaw

Unregistered / Unconfirmed
GUEST, unregistred user!
本人写的一个小东西里面通过shellexecute调用了记事本,但是我怎么知道什么时候关闭了记事本,然后跟着在代码中做一些自己需要的处理呢?请各位给指点一下应该如何做才行.<br><br>procedure TForm3.Button8Click(Sender: TObject);<br>var<br> &nbsp;fileini : pchar;<br> &nbsp;myhandle : integer;<br>begin<br> &nbsp;fileini:=pchar(extractfilepath(application.ExeName)+'dianbao.ini');<br> &nbsp;shellexecute(handle, 'open', fileini, nil, nil, SW_SHOWNORMAL);<br>end;
 
Function WinExecExW(cmd,workdir:pchar;visiable:integer):DWORD; <br>var <br>StartupInfo:TStartupInfo; <br>ProcessInfo:TProcessInformation; <br>begin <br>FillChar(StartupInfo,SizeOf(StartupInfo),#0); <br>StartupInfo.cb:=SizeOf(StartupInfo); <br>StartupInfo.dwFlags:=STARTF_USESHOWWINDOW; <br>StartupInfo.wShowWindow:=visiable; <br>if not CreateProcess(nil,cmd,nil,nil,false,Create_new_console or Normal_priority_class,nil,nil,StartupInfo,ProcessInfo) then <br> &nbsp; result:=0 <br>else <br>begin <br> &nbsp; waitforsingleobject(processinfo.hProcess,INFINITE); <br> &nbsp; GetExitCodeProcess(ProcessInfo.hProcess,Result); <br>end; <br>end; <br><br>调用时,WinExecExW(&quot;a.exe&quot;,&quot;c:/&quot;,SW_SHOW);WinExecExW(&quot;b.exe&quot;,&quot;c:/&quot;,SW_SHOW);WinExecExW(&quot;c.exe&quot;,&quot;c:/&quot;,SW_SHOW);<br>a.exe执行完了才执行b.exe然后才是c.exe
 
上面已经说完了,采用createprocess
 
kgm已经说的很清楚了<br>只要照着做就行了
 
多人接受答案了。
 
后退
顶部