[Amilman]

Пытаюсь заблокировать правую кнопку мыши, глобальным хуком, но при отработке программы правая кнопка начинает действовать как постоянно нажатая левая и при этом, сама левая кнопка перестает отвечать вообще. Что не так в коде?

Код:

function Mouse_Hooks(code: integer; wParam: longint; lParam: longint)
  : longint; stdcall;
begin
  if code = HC_ACTION then
  begin
    if wParam = WM_RBUTTONUP then
      result := -1
    else
      result := CallNextHookEx(Mouse_SysHook, code, wParam, lParam);
  end
  else
    result := CallNextHookEx(Mouse_SysHook, code, wParam, lParam);
end;

Вопрос снят, решение найдено:

Код:

if (wParam = WM_RBUTTONUP) or (wParam = WM_RBUTTONDOWN)  then