摘要：var Gameh:HWND; GamePid:DWORD; Gamehprocess: THandle; SitNum :DWORD; readByte:DWORD;begin //获取游戏窗口句柄 Gameh:=findwindow(nil,'对对碰角色版'); //获取进程ID GetWindowThreadprocessID(Gameh,GamePid); //获取进程句柄 PROCESS_VM_READ or PROCESS_VM_WRITE 一个是读入内存权限 一个是写入内存数据权限 gamehProcess:=OpenProcess(PROCESS_VM_READ 阅读全文

摘要：在Window98以下，如果程序要激活自己，只需要简单的调用SetForegroundWindow即可达到目的。但到Win98以后，再也没有这么简单了。新建一个简单的工程，加进一个Timer控件，设置时间间隔为3秒，接着在时间事件中写SetForegroundWindow(Handle)，好，运行程序，将窗口切换到后台，3秒钟之后，你看到的只是任务栏上闪了闪，窗口仍然躺在后面。这是怎么回事呢，原来在Win98以后，窗口要使用SetForegroundWindow激活自己， 必须得到“允许”，允许的方式有很多种，我只介绍最简单的一种，就是利用这个API：LockSetForegroundWind 阅读全文

摘要：{鼠标软模拟：好处就是不会真的移动鼠标 开始按钮 坐标 x=386y=387 }sendmessage(hookHwnd,messages.WM_LBUTTONDOWN ,0,$0180017A); {按下鼠标左键}sendmessage(hookHwnd,messages.WM_LBUTTONUP ,0, $0180017A); {抬起鼠标左键}{硬件模拟：会真的移动鼠标}mouse_event(MOUSEEVENTF_LEFTDOWN,X ,Y ,0,0);mouse_event(MOUSEEVENTF_LEFTUP,X ,Y ,0,0); 函数功能 该函数将指定的消息发送到一个... 阅读全文

摘要：本文主要跟大家介绍Delphi中获取其它进程的窗口句柄，在Delphi中获取其它进程的窗口句柄，绝大部分人首先想到的会使用：FindWindow或者用GetWindow来遍历查找，如： handle := FindWindow(nil,PChar('窗口的标题')); 或者： procedure TForm1.Button1Click(Sender: TObject); var hCurrentWindow: HWnd; WndText:String; begin hCurrentWindow := GetWindow(Ha... 阅读全文

摘要：absolute //指令(变量)abstract //指令(方法)and //运算符(布尔)array //类型as //运算符(RTTI)asm //语句assembler //向后兼容(汇编)at //语句(异常处理)automated //访问类别符(类)begin //块标记case //语句cdecl //函数调用协定class //类型const //声明或指令(参数)constructor //特殊方法contains //运算符(集合)default //指令(属性)destructor //特殊方法dispid //dispinterface 接口类... 阅读全文

摘要：修改控件对应 showHint的属性为True并且在控件对应的Hint填写你所需要悬浮的说明文字。 阅读全文