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

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

HOOK WIN32 [D5, Win95/98]


GBX ©   (2002-02-15 07:38:00) 

Господа подскажите как поймать Hook"ом WM_ACTIVATE. Если можно, с примером.


GBX   (2002-02-20 00:36:00) [1]

Спасибо. Тогда еще один вопрос. Как поймать WM_CHAR с помощью Hook"a WH_KEYBOARD, или отловив допустим WM_KEYDOWN получить ANSII код введеного символа. Знаю что вопрос суперизбитый, но хорошего ответа я не видел нигде.


Alx2   (2002-02-18 09:47:00) [2]

Так все правильно. В момент щелчка по иконке активизируется program manager. Когда закрываем "Диск С", это окошко сначала активизируется, а потом закрывается.


GBX   (2002-02-16 14:13:00) [3]

Спасибо. Пока ждал ответ, сам сделал то же самое. Но при таком подходе наблюдаются глюки. Берем Handle окна которое активизируется, читаем текст его заголовка. Теперь если шелкнуть по иконке на рабочем столе например "Диск C" то возвращается "Program maneger", хотя на экране окно с заголовком "Диск C", если теперь его закрыть то возвращается "Диск C". Как с этим бороться?


Fellomena   (2002-02-15 14:43:00) [4]

ok - принято :)


Alx2   (2002-02-15 13:59:00) [5]

> Fellomena (15.02.02 13:50)
Привет! :)
Можно, конечно, WH_GETMESSAGE.
А WH_CBT - что-то типа для обучющих прог. ( Тут можно и активизацию окошка запретить, если ShellProc в ответ вернет 1). Я ее написал, во-первых, потому-что рядом затравка готовая была с WH_CBT, а во-вторых, (по-моему) будет меньше сыпаться вызовов ShellProc от "левых" месседжей.


Fellomena   (2002-02-15 13:50:00) [6]

Hi Alx2 !
Почему WH_CBT, а не WH_GETMESSAGE ?
Если я не ошибаюсь, то WH_CBT используется как тренировочная или что-то типа того...
Хотя... она ведь всё что из Очереди принимает + мышь+ клава... - так ?
Тогда вообще-то можно... надо попробовать.


Alx2   (2002-02-15 11:37:00) [7]

Если для всех, то через DLL

SetWindowsHookEx(WH_CBT, @ShellProc, AInstance, 0 );


А вот хучная функция:

Function ShellProc(nCode: Integer; WPARAM, LPARAM: Integer): Integer; Stdcall;
Var
Begin
Result := CallNextHookEx(hhk, nCode, WPARAM, LPARAM);
If nCode = hcbt_ACTIVATE
Then
Begin
// что-то делаем
End;
End;



Наверх

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