Форум: "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.72 MB
Время: 0.023 c
1-46436           Socrat                2002-04-02 05:32  2002.04.15  
От чего зависит доступность кнопок печати в QuickReports Preview?


3-46268           Sergey_R              2002-03-23 19:13  2002.04.15  
Вложенный подзапрос.


1-46347           SeF                   2002-03-27 02:55  2002.04.15  
Запихивание в DLL


1-46346           ArmArt                2002-04-03 23:34  2002.04.15  
Как сделать Экспорт Quick Report в Excel


1-46348           semion                2002-04-02 17:14  2002.04.15  
Помогите! Событие OnExit вызывается 2 раза!!