11 2011 档案

摘要:1、显示所有窗口的标题2、根据关键字查询窗口3、某一窗口内的所有控件及其内容 .unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, ... 阅读全文
posted @ 2011-11-16 12:16 cuibq 阅读(392) 评论(0) 推荐(0)
摘要:原文出处:http://blog.csdn.net/htiscold/article/details/3962817 在delphi xe2下调试运行成功。代码:unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.Sy... 阅读全文
posted @ 2011-11-13 21:00 cuibq 阅读(422) 评论(0) 推荐(0)
摘要:原文:http://blog.csdn.net/iseekcode/article/details/4740168 原文的代码可能适用于delphi7,我修改了一下,使它可以在delphi xe2下运行,效果还不错。代码:unit Unit1;interfaceuses Winapi.Windo... 阅读全文
posted @ 2011-11-13 20:47 cuibq 阅读(222) 评论(0) 推荐(0)
摘要:一个简单的例子。只有一个exe文件,窗体中没有任何控件,鼠标操作可以从debugview.exe中看到。unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialog... 阅读全文
posted @ 2011-11-04 15:37 cuibq 阅读(187) 评论(0) 推荐(0)
摘要:在dll工程中,我们use windows。 需要输出内容的地方,使用OutputDebugString,例如 OutputDebugString(PChar('处理HookProc,Code值:'+intToStr(Code))); 打开Dbgview.exe,可以看到输出值。 下载地址: ht... 阅读全文
posted @ 2011-11-04 11:58 cuibq 阅读(159) 评论(0) 推荐(0)
摘要:系统钩子必须做成dll文件,否则不能映射到其他进程。挂钩的执行过程:1、声明一个全局变量(钩子句柄) var HookHandle: HHOOK;2、定义一个钩子函数。不同的钩子类型对应着不同的钩子函数结构。stdcall不能少。function TestHookProc(Code: Intege... 阅读全文
posted @ 2011-11-04 11:14 cuibq 阅读(220) 评论(0) 推荐(0)