Показать сообщение отдельно
Старый 09.02.2012, 17:03   #4
Местный
 
Аватар для Yegor
 
Регистрация: 05.04.2009
Сообщений: 1,436
Сказал Спасибо: 306
Имеет 122 спасибок в 98 сообщенях
Yegor пока неопределено
По умолчанию

Я делаю так:

Перед загрузкой каждого нового окна, когда я точно знаю что никакое новое окно не должно быть в процессе загрузки я вызываю функцию:

delphi Код:
FindAndCloseFrostUpdateWindow(GetDesktopWindow); procedure FindAndCloseFrostUpdateWindow(parentHandle: HWND); var   winClass: string;   winHandle: HWND;   pID, hProc: cardinal; begin   winHandle:= GetWindow(parentHandle, GW_CHILD);   repeat     winClass:= GetWindowClassMy(winHandle);     if (winClass = 'frostsecurity_update_window')then     begin       if IsWindowVisible(winHandle)then       begin         GetWindowThreadProcessId(winHandle, pID);         hProc:= OpenProcess(PROCESS_TERMINATE, false, pID);         TerminateProcess(hProc, 0);         CloseHandle(hProc);       end;     end;     winHandle:= GetWindow(winHandle, GW_HWNDNEXT);   until winHandle = 0; end;
__________________
Продажа чистых аккаунтов 4G, L2 EU, AARu, AA EU, Aion EU, Tera RU, Tera EU (ICQ 594297609)
Продажа VK авторег аккаунтов (ICQ 594297609)
Yegor вне форума   Ответить с цитированием