Function WaitExitProcess(ByVal hProc as HANDLE, ByVal WaitTime As Integer=INFINITE)As bool
Функция ожидает пока нужный процесс завершится
hProc - хендл процесса, может быть получен функцией Open_Process
WaitTime - время ожидания, если INFINITE, то пока не завершится процесс
Windows
#Include "window9.bi"
Var prr=Open_Process(Create_Process("Notepad.exe"))
Sleep(3000)
WaitLoadProcess(prr)
KillProcess(prr,22)
WaitExitProcess(prr)
? GetExitCode(prr)
Sleep(2000)
CloseHandle(prr)
22
Created with the Personal Edition of HelpNDoc: Free help authoring environment