有请（Eastunfail(龙子龙孙)==(恶鱼杀手)）

Question

http://community.csdn.net/Expert/topic/3291/3291578.xml?temp=.5386316
本贴为感谢贴！
您看看还有没有什么关于我的问题的资源啊？最好是中文的，谢谢！

Answer 1

HookProc函数改为：
function HookProc(Code:integer;wParam:wparam;lParam:lparam):LRESULT;stdcall;
begin  
 if icode < 0 then
    begin
    Result := CallNextHookEX(0,icode,wparam,lparam);
    exit;
    end;
  result:=0;
  if (wparam=WM_LBUTTONDOWN) then
    begin
      MessageBeep(MB_ICONASTERISK);
      FunCall();
      result:=1;
    end;
end;
有人说这样写，您看能行吗？