用DELPHI编制钩子函数.docVIP

用DELPHI编制钩子函数Windows消息管理机构提供了能使应用程序访问控制消息流μc4所谓的钩子(HOOK)机制。钩子有多种，分别用于捕获某一特定类型或某一范围的消息。如：键盘消息，鼠标消息等。我们这里仅以键盘钩子的使用为例，讨论在DELPHI下怎样编写DLL程序和怎样在自己的程序中安装使用键盘钩子函数，并讨论了不同程序使用同一DLL文件时怎样共享数据。一、 钩子过滤函数的编写说明由于钩子过滤函数必须在独立的模块中，也就是说我们必须首先生成一个DLL框架，然后再在其中加入钩子函数代码以及其他相关函数代码。我们这里以键盘钩子过滤函数的编写为例来说明。具体步骤如下：1、先生成一个DLL框架2、编写自己的键盘钩子过滤函数钩子过滤函数必须是回调函数，其函数的声明为：function KeyHookProc(iCode:Integer;wParam:WPARAM;lParam:LPARAM ) : LRESULT; stdcall ;export ;在生成的DLL框架中加入自己的键盘钩子处理函数处理键盘消息。代码如下：…if(iCode=0) then beginResult:=0; //初始化返回值// 在这里加入自己的代码end elsebeginResult:=CallNextHook(hOldKeyHo