Bargest я исправил код на следующее:
PHP код:
function SysMsgProc(code : integer; wParam : word;
lParam : longint) : longint; stdcall;
begin
if code = HC_ACTION then
begin
Wnd := TMsg(Pointer(lParam)^).hwnd;
if GetParent(Wnd)=hd then
begin
if TMsg (Pointer (lParam)^).message = WM_RBUTTONUP then
SendMessage(Wnd, WM_CANCELMODE, 0, 0);
end else
begin
CallNextHookEx(SysHook, Code, wParam, lParam);
end;
end;
end;
но все равно не помогло, в этом случае я даже не смог кликать в других окнах, как бы мышь не работает.
И еще одно, оказывается:
PHP код:
if TMsg (Pointer (lParam)^).message = WM_RBUTTONUP then
SendMessage(Wnd, WM_CANCELMODE, 0, 0);
вообще не предотвращает контекст меню (т.е.)
Пожалуйста, подскажите как быть?