Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

процессы   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.03 c
1-41720
Ivolg
2003-11-03 18:12
2003.11.13
Перехват (X)


3-40840
gag
2003-10-25 13:05
2003.11.13
ODBC - как оно пашет


1-41469
Симба
2003-10-29 08:44
2003.11.13
Наложение PageControl


3-41029
Post
2003-10-23 12:48
2003.11.13
Коннект к MSSQL через dbExpress


4-42304
-AGGRESSOR-
2003-09-04 18:51
2003.11.13
Open Directory