关于回调函数的问题 - 编程论坛

我在程序中定义了一个回调函数如下:

function HookHandler(iCode: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT;
begin
end;

在下面的函数中使用回调函数:

NextHook :=SetWindowsHookEx(WH_mouse, HookHandler, GetModuleHandle(nil), 0);stdcall;

但提示编译错误，错误代码:project1.lpr(91,50) Error: Wrong number of parameters specified for call to "HookHandler"

这个例子我是照书上抄下来的，错在哪个地方了呢？请各位前辈指点。谢谢！