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

Проблема в установке Hook   Найти похожие ветки 

 
mm0 ©   (2003-04-01 12:07) [0]

HOOK процедура как и положена находится в DLL.
Написал отельную прогу "SPO",для теста.Запустил.
Запустил прогу для установки HOOK.
При устанавливки HOOK-а на окно "SPO" следующим кодом:
-----------
hh:=FindWindow("TfrmMain","SPO");
if hh=0 then
begin
MessageBox(0, "No Window", "Error:", 0);
Exit;
end;
dwProcessId:=0;
GetWindowThreadProcessId(hh, @dwProcessId);
SysHook := SetWindowsHookEx(WH_GETMESSAGE, @SysMsgProc,Instance, dwProcessId);
-----
В SysHook HOOK возращяется 0 т.е не хочет он устанвалваться,
хотя окно находит и dwProcessID<>0.В чем может быть ошибка?


 
Polevi ©   (2003-04-01 12:59) [1]

The hMod parameter must be set to NULL if the dwThreadId parameter specifies a thread created by the current process and if the hook procedure is within the code associated with the current process.

и GetLastError полезно смотреть иногда

if SetWindowsHookEx(..)=0 then
RaiseLastWin32Error;



 
mmo   (2003-04-01 14:27) [2]

Удалено модератором
Примечание: Offtopic


 
Polevi ©   (2003-04-01 14:59) [3]

Удалено модератором
Примечание: Offtopic


 
mm2   (2003-04-01 16:40) [4]

Удалено модератором
Примечание: Разборки с модератором


 
Morfein ©   (2003-04-01 20:28) [5]

Что значит где ошибка?! Ты передаёшь функции SetWindowsHookEx ИДЕНТИФИКАТОР ПРОЦЕССА, а не идентификатор потока!

Для твоего случая код:

var
SysHook : hHook;
dwThreadId : dword;

...
...

dwThreadId:=GetWindowThreadProcessId(hh, nil);
SysHook:=SetWindowsHookEx(WH_GETMESSAGE, @SysMsgProc, Instance, dwThreadId);



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

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



Память: 0.46 MB
Время: 0.012 c
3-94718
Sour
2003-05-07 11:08
2003.05.29
CASE средства для БД


3-94752
Igor Mish
2003-05-11 12:48
2003.05.29
Пропадают знаки после запятой ?


1-94872
testthewest
2003-05-16 12:36
2003.05.29
Почему в dpr нельзя написать Application.Title := Form1.Caption


3-94680
Evgeny
2003-05-10 07:54
2003.05.29
bde 9


3-94768
Ш-К
2003-05-11 06:31
2003.05.29
Синхронизация с сервером.




   Наверх