![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вопрос по установке ловушек
EcoloRa © (2004-01-26 09:25:00)Здравствуйте! Есть вопрос по поводу установки ловушек:
Для установки использую SetWindowsHookEx(WH_CBT, @hook1, hInstance, 0)
Ловушка срабатывает следующим образом:
if (c0de = HCBT_SETFOCUS) or (c0de = HCBT_MOVESIZE) or (c0de = HCBT_MINMAX)
then
begin
hw := FindWindow('TfMain', 'This form getting messages from dll');
SendMessage(hw, WM_SOMETHING_HAPPEND, wParam, lParam);
CallNextHookEx(H, c0de, wParam, lParam); //function passes the hook
information to the next hook procedure in the
current hook chain
end
Срабатывает нормально только HCBT_SETFOCUS, а HCBT_MOVESIZE и
HCBT_MINMAX отлавливают момент до перемещения и измененеия размеров
окна, а не после. Проводя аналогию, отлавливается onCanResize, а надо
поймать onResize. Может кто-нибудь знает как?
Digitman (2004-01-26 09:34:00) [1]см.
SetWindowsHookEx(WH_CALLWNDPROCRET, ..);