无法定位程序输入点 hook 与动态连接库hook32.dll上
调用dll是这么写的
function HookOn(lpHwnd:HWND;lpType:Longint):Longint;stdcall;external 'hook32.dll';
function HookOff:Boolean;stdcall;external 'hook32.dll';
输出是这么写的
library hook32;uses
SysUtils,
Forms,
myDLl in 'myDLl.pas';
{$R *.res}
exports
hookon,hookoff;
begin
end.
dll和exe文件放在一个文件夹里面的!
问题到底出在那里呢!请大家帮帮我!
调用dll是这么写的
function HookOn(lpHwnd:HWND;lpType:Longint):Longint;stdcall;external 'hook32.dll';
function HookOff:Boolean;stdcall;external 'hook32.dll';
输出是这么写的
library hook32;uses
SysUtils,
Forms,
myDLl in 'myDLl.pas';
{$R *.res}
exports
hookon,hookoff;
begin
end.
dll和exe文件放在一个文件夹里面的!
问题到底出在那里呢!请大家帮帮我!
解决方案 »
- TSpeedButton 如何让Caption内容以 竖形文字 形式显示
- 在线急等、点击树NODE3读取数据时报错。
- 关于时间的问题
- 以下是一个TXT文件的内容,我怎么把前四个四符等于PORV的所有记录提出,并打印出报表..
- 哈哈﹐終于又能上網了﹗
- Delphi 7 竟然没有 QuickReport ?! Really??
- 急死我了,我怎麼也進不去Enterprise Manager ,誰指導指導????
- Delphi做的一个图标工具
- 执行线程时引发“因为应用程序正在发送一个输入同步呼叫,所以无法执行传出的呼叫”的错误提示!!
- DELPHI 如何检测HP打印是否缺纸?
- 还是label字体属性的问题!
- ~~~~~~~~~~请问为什么这样的SQL不对?马上给分~~~~~~~~~
function HookOn(lpHwnd:HWND;lpType:Longint):Longint;stdcall;external 'hook32.dll' name 'hookon';试一下?
var
libhandle:Thandle;
THookOn:THookOn;
begin
libhandle:=loadlibrary('你的library名稱');
try
if libhandle=0 then
raise Edllloaderror.Create('Unable to Load Dll');
我测试过了,把函数声名
function HookOn(lpHwnd:HWND;lpType:Longint):Longint;stdcall;external 'hook32.dll';
function HookOff:Boolean;stdcall;external 'hook32.dll';
改为:
function hookon(lpHwnd:HWND;lpType:Longint):Longint;stdcall;external 'hook32.dll';
function hookoff:Boolean;stdcall;external 'hook32.dll';
就可以了,视视看,还有没有问题