我的程序用到了键盘钩子,并且有个句柄的变量,下面的代码老出错,
procedure TForm1.FormDestroy(Sender: TObject);
begin
closehandle(hh);  //加这句就出错,不加就没事!     if hhook <> 0 then
         begin
           UnHookWindowsHookEx(hHook);
           hHook := 0;
          // MessageBox(0, '键盘监视关闭', '信息', MB_ICONINFORMATION + MB_OK);
         end;
end;
错误提示:return value of funtion 'hookproc' might be undefined高手赐教