Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вопрос по установке ловушек


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, ..);


Наверх

Титульная страница Поиск, карта сайта Написать письмо