Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];




Вниз

SetWindowsHookEx 


YUS   (2001-11-18 19:07) [0]

Мастера,подскажите почему функция SetHook возвращает false при (IDProc=ID процесса куда устанавливаем хук), но если
SetWindowsHookEx(WH_GETMESSAGE,@GetMsdProc,hInstance,0); ,то true. Почему хук не устанавливается в заданный процесс???

function SetHook(IDProc:Cardinal):boolean; export;
begin
HookID:=SetWindowsHookExWH_GETMESSAGE,@GetMsdProc,
hInstance,IDProc);
if HookID = 0 then Result:=false else Result:=true;



paul_shmakov   (2001-11-18 19:13) [1]

потому как последний параметр функции SetWindowsHookEx не идентификатор процесса, а идентификатор потока.



YUS   (2001-11-18 19:28) [2]

Прошу прошения --потока. Его нахожу функцией, GetWindowThreadProcessId(hwnd,@IDProc);где hwnd- хэндл окна.



Polevi   (2001-11-18 19:51) [3]

hMod

Identifies the DLL containing the hook procedure pointed to by the lpfn parameter. 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.

dwThreadId

Specifies the identifier of the thread with which the hook procedure is to be associated. If this parameter is zero, the hook procedure is associated with all existing threads.


HookID:=SetWindowsHookEx(WH_GETMESSAGE,@GetMsdProc,
0,IDProc);



YUS   (2001-11-18 20:48) [4]

СПАСИБО за ПОМОЩЬ!!!!!!!!



YUS   (2001-11-18 22:51) [5]

Нет, ничего не выходит.Возвращает false. Привожу полное описание функции.

function SetHook(hMain:THandle):boolean; export;
var
IDProc : cardinal;
begin
hServ:=hMain;
GetWindowThreadProcessId(hStol,@IDProc); //находим его ID
HookID:=SetWindowsHookEx(WH_GETMESSAGE, @GetMsdProc,0,IDProc);
if HookID <> 0 then begin
PostThreadMessage(IDProc,WM_NULL,0,0);
Result:=true;
end else Result:=false;
end;



paul_shmakov   (2001-11-19 00:21) [6]


ThreadID := GetWindowThreadProcessId(hStol,@IDProc);
HookID:=SetWindowsHookEx(WH_GETMESSAGE, @GetMsdProc,0,ThreadID);



YUS   (2001-11-19 07:02) [7]

Хук устанавливается, но обращения к GetMsgProc функции нет.



YUS   (2001-11-19 07:26) [8]

Всем Спасибо HookID:=SetWindowsHookEx(WH_GETMESSAGE, @GetMsdProc,hinstance,ThreadID);




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
1-66279           Antoniz               2002-01-04 15:12  2002.01.21  
Как через TopenDialog выбрать папку


7-66374           nikkie                2001-08-09 15:52  2002.01.21  
fax software


1-66245           Snake                 2002-01-02 17:21  2002.01.21  
Запись графики в поток


6-66314           LAMMER                2001-08-15 06:06  2002.01.21  
Проблемма в работе с сокетами!!!


3-66191           Гоша                  2001-12-13 19:00  2002.01.21  
Delete from master-detail via stored procedure