Форум: "Основная";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];
Внизпроцессы Найти похожие ветки
← →
md (2003-10-29 13:32) [0]как сделать так, чтобы прога ждала пока закончит работу её копия (уже работающая). если можно - пример.
← →
panov (2003-10-29 13:44) [1]http://delphimaster.net/view/1-1067249880/
← →
Digitman (2003-10-29 13:46) [2]var
hProcess: THandle;
...
hProcess := CreateProcess(.. такой-то ...);
Win32Chech(hProcess <> 0);
while True do
case MsgWaitForMultipleObjects(1, hProcess, False, INFINITE, QS_ALLINPUT) of
WAIT_OBJECT_0:
begin
CloseHandle(hProcess);
Break;
end;
WAIT_OBJECT_0 + 1:
begin
while PeekMessage(Msg, 0, 0, 0, PM_REMOVE) do
begin
TranslateMessage(Msg);
DispatchMessage(Msg);
end;
end;
end;
← →
panov (2003-10-29 14:23) [3]>Digitman © (29.10.03 13:46) [2]
Обрати внимание - в вопросе - копия (уже работающая). -)
← →
Digitman (2003-10-29 14:41) [4]
> panov
а я почем знаю, кто ее запускал ?
пример - в предположении, что копия запушена оригиналом
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.032 c