Вниз
Скачать: CL | DM;

Отловить PopUp   Найти похожие ветки 

 
Mortal ©   (2003-06-22 18:10) [0]

Уважаемые мастера, помогите решить проблему:
мне нужно отлавливать появление всех окон в системе. Я поставил хук WH_CBT, код - HCBT_ACTIVATE, но он не ловит активацию PopUp"ов. HCBT_CREATEWND ловит всё, но проблема в том, что мне нужно ловить не собирающееся создаться, а уже созданное окно.
Может есть другие способы? Помогите пожалуйста! Очень надо!
Заранее спасибо.


 
Song ©   (2003-06-22 20:44) [1]

>>Я поставил хук WH_CBT, код - HCBT_ACTIVATE, но он не ловит активацию PopUp"ов.
Не верю. Напиши код.


 
Mortal ©   (2003-06-23 16:33) [2]

.........
//основная CallBack-функция хука
Function WindowHook(Code: Integer; ParamW: WPARAM; ParamL: LPARAM): LRESULT;stdcall;
Begin
if code < 0 then
begin
Result:= CallNextHookEx(ShareInfoW^.AppWndHandle, Code, ParamW, ParamL);
Exit;
end;
if (code =HCBT_ACTIVATE) then
Begin
//передаем информацию полученую хуком в главное приложение
SendMessage(ShareInfoW^.AppWndHandle, WM_USER, ParamW, Paraml);
End;
//вызывается следующий хук в цепочке
Result := CallNextHookEx(ShareInfoW^.OldHookHandle, Code, ParamW, ParamL)
End;

//установка хука
Function SetWindowHook(Wnd: HWND): BOOL; stdcall;
Begin
If ShareInfoW<>Nil Then
Begin
//записываем в расшареную память хендл окна главного приложения,
//куда будут отправляться даные, отловленые хуком
ShareInfoW^.AppWndHandle:=Wnd;
//собственно установка хука и сообщение результата установки
ShareInfoW^.OldHookHandle:=SetWindowsHookEx(WH_CBT, @WindowHook, HInstance, 0);
Result:=ShareInfoW^.OldHookHandle<>0;
End
Else Result:=False
End;

.........



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
1-81626
Itsme
2003-08-12 15:24
2003.08.25
ошибка RPC-сервера


11-81603
Ал
2002-12-17 21:16
2003.08.25
KOL RichEdit - текст и рисунки?


14-81906
Jaxtor
2003-08-07 17:02
2003.08.25
Ctrl-C,Ctrl-V


1-81803
deninside
2003-08-13 22:37
2003.08.25
Вопрос про закладки и массив строк.


1-81694
Miralex
2003-08-11 12:59
2003.08.25
Mouse right click




   Наверх