帖个HOOK鼠标滚轮滚动的DLL。

帖个HOOK鼠标滚轮滚动的DLL。（我很菜，大家板砖少点，谢谢合作！！）

//====================================
library hookprj;
uses
  SysUtils,
  Classes,
  Unit1 in 'Unit1.pas';
exports
EnableMsgHook,  //只要把这两个函数输出就可以了，
DisableMsgHook;//
begin
end.
//====================================


//====================================
unit Unit1;

interface

uses
Windows,Messages;

var
HookHandle:  HHOOK;//钩子的句柄值。

fun