Hook钩子如何屏蔽鼠标右键菜单

一段Delphi下的代码,HOOK鼠标的,请教一下如何将系统本来右键的菜单屏蔽掉不显示。

function HookProc(iCode: Integer;
wParam: WPARAM;
lParam: LPARAM): LRESULT; stdcall; export;
begin
Result := 0;
try
if iCode < 0 then
Result := CallNextHookEx(hHook, iCode, WParam, LParam)
else
if (GetKeyState(VK_CONTROL) and $8000 <> 0) then
case wParam of
WM_LBUTTONUP: //检测到鼠标左键,相应代码

     WM_RBUTTONUP: //检测到鼠标右键,此处想屏蔽正常右键弹出的菜单,应该如何写,感谢!
   end;
except
end;

end;

跳过调用CallNextHookEx不知道行不行。