Текущий архив: 2004.02.02;
Скачать: CL | DM;
Вниз
Ничего не понимаю! Помогите разобраться. Найти похожие ветки
← →
Вадим © (2003-11-25 21:13) [0]Пытаюсь отловить нажатие правой кнопки мыши на заголовке чужого окна.
Компилирую .dll:
----------------------------------------------------------------------------------
library testhook;
uses
SysUtils,
Windows,
Messages;
var
CallWndHook: HHOOK;
function CallWndProc(nCode: Integer; wParam, lParam: Longint): LRESULT; stdcall;
var
p: PCWPStruct;
h: THandle;
begin
p := Pointer(lParam);
// если пытаюсь отловить WM_CLOSE, то все работает!
// if p.message = WM_CLOSE then Windows.Beep(100, 100); - в этом случае спикер пищит
// а вот так не пищит :-(
if p.message = WM_NCRBUTTONDOWN then Windows.Beep(100, 100);
Result := CallNextHookEx(CallWndHook, nCode, wParam, lParam);
end;
procedure SetCallWndHook; stdcall;
begin
CallWndHook := SetWindowsHookEx(WH_CALLWNDPROC, @CallWndProc, HInstance, 0);
end;
procedure RemoveCallWndHook; stdcall;
begin
UnhookWindowsHookEx(CallWndHook);
end;
exports SetCallWndHook, RemoveCallWndHook;
begin
end.
----------------------------------------------------------------------------------
В чем может быть дело? Почему отловить WM_CLOSE получается, а WM_NCRBUTTONDOWN никак?
Пожалуйста, помогите разобраться.
← →
chi (2003-11-26 00:46) [1]if TMsg(Pointer(lParam)^).message = WM_NCRBUTTONDOWN then Windows.Beep(100, 100);
все :)
Страницы: 1 вся ветка
Текущий архив: 2004.02.02;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.031 c
