|
Платные хостинги
Раскрутка сайта
Книги по программированию
WaitForSingleObject
- Если я хочу подождать переход процесса в активное состояеие, то какои параметр нужно ставить в hHandle? Дескриптор процесса?
- Привет!DWORD WaitForSingleObject( HANDLE hHandle, // handle of object to wait for DWORD dwMilliseconds // time-out interval in milliseconds ); ParametershHandleIdentifies the object. For a list of the object types whose handles can be specified, see the following Remarks section. Windows NT: The handle must have SYNCHRONIZE access. For more information, see Access Masks and Access Rights.
- Вам нужен WaitForInputIdle()
- Привет!function ExecAndWait(const FileName, Params: ShortString; const WinState: Word): Boolean; export;var StartInfo: TStartupInfo; ProcInfo: TProcessInformation; CmdLine: ShortString; begin CmdLine := '"' + Filename + '" ' + Params; FillChar(StartInfo, SizeOf(StartInfo), 0); with StartInfo do begin cb := SizeOf(StartInfo); dwFlags := STARTF_USESHOWWINDOW; wShowWindow := WinState; end; Result := CreateProcess(Nil, PChar( String( CmdLine ) ), Nil, Nil, false, CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS, Nil, PChar(ExtractFilePath(Filename)), StartInfo,ProcInfo); if Result then begin WaitForSingleObject(ProcInfo.hProcess, INFINITE); CloseHandle(ProcInfo.hProcess); CloseHandle(ProcInfo.hThread); end; end;Кусок кода, который вызывает ф-цию содержащую WaitForSingleObjectВ данном примере запускается исполняемый файл _set.ex_ , а нашапрограмма минимизируется и ждет пока не закончит работать _set.ex_ ,а затем восстанавливается. APath - директория, где находитьсяфайл _set.ex_ . ...........Application.Minimize;try SetCurrentDir(Apath); ExecAndWait(APath + '_set.ex_', '', SW_SHOW);finally Application.Restore;end;.................
Интернет казино
Онлайн игры
Увеличение члена
Купить DVD
|
