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




Вниз

Hook 


Beast   (2002-02-13 03:58) [0]

Пишу компонент, так вот там такие строчки : SysHook:HHook;

function TGHook.SysMsgProc(code:integer; wParam:Word; LParam:LongInt):LongInt;stdcall;
var wnd:hWnd;
begin
Result:=CallNextHookEx(FSysHook,Code,wParam,LParam);
Wnd:=TMsg(Pointer(LParam)^).hwnd;
case TMsg(Pointer(LParam)^).message of

Вопрос: Как тут из LParam (или wParam)получить координаты
мыши?

end;
end;



Юрий Зотов (M)   (2002-02-13 11:46) [1]

TMsg(Pointer(LParam)^).Pt

А можно и просто вызвать GetCursorPos.



Cobalt   (2002-02-13 12:02) [2]

См. сообщение типа WM_MouseXXX




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




Наверх







Память: 0.73 MB
Время: 0.02 c
3-46291           alexandervasjuk       2002-03-21 14:06  2002.04.15  
MySQL. Что день грядущий мне готовит?


1-46303           andrew_f              2002-04-02 18:29  2002.04.15  
Internal error: U704


1-46447           Ghost.                2002-04-03 10:41  2002.04.15  
Может это очень просто...


14-46514          BAHO                  2002-02-21 05:51  2002.04.15  
Клава-Крыс


1-46455           Glonia Zbanov         2002-04-03 13:37  2002.04.15  
Размер форм