摘要：
Object Pascal 使用ASCII 字符集，包括A-Z、a-z、0-9、以及其它标准字符，字母是大小写无关.单字符特殊符号：# $ & ' ( ) * + , - . / : ; < = > @ [ ] ^ { }组合字符特殊符号：(* *) (. .) .. // := <= >= <>其中:‘[]’相当于‘(..)’; ‘(**)’相当于‘{}’! " % ? \ _ | ~ 不是特殊符号.标志符用来给常量、变量、字段、类型、属性、过程、函数、程序、单元、库以及包等起名的.标识符必须是 _ 或字母开头,后面可以是字母、数 阅读全文
摘要：
unit Unit1;interface {接口部分开始}uses {引用单元列表,这是可选的,如果包含必须紧跟interface关键字} {接口部分声明常量/类型/变量/过程和函数,这些声明对引用单元就像自己的声明一样} {在接口部分声明的过程和函数,就像使用了forward关键字} {接口部分结束}implementation {实现部分}uses {如果包含uses字句,必须紧跟关键字implementation} {在这里实现interface中定义的过程和函数,可以任意顺序的定义和调用.} {在这里可以省略过程和函数的列表,如果包括,必须一样.} {可以定义单元私... 阅读全文
摘要：
{鼠标软模拟：好处就是不会真的移动鼠标 开始按钮 坐标 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); 函数功能 该函数将指定的消息发送到一... 阅读全文
摘要：
刚学习的时候直接读取基值是很简单的，但是类型[[[00a41ff0+1c]+34]+490]这样的偏移数值应该如何读取呢？下面给大家分享下Delphi 的代码：var GameH:HWND; {定义窗口句柄} GamePid:DWORD; {定义窗口进程ID} ReadByte:SIZE_T; {实际读取字节} Gamehprocess: THandle; {就是非负数的整数类型 定义进程句柄} HP:DWORD; Text:DWORD; {看下面代码你就知道为什么要定义它了} //完美血值基值 ... 阅读全文
摘要：
procedure TForm1.btn1Click(Sender: TObject);const GameName ='对对碰角色版';var GameH:HWND; //定义进程窗口句柄 PidGame:DWORD; //定义进程ID readByte:DWORD; //实际读取字节 Gamehprocess: THandle; //可以理解为DWord，也就是非负数的整数类型 定义进程句柄 SitNum :DWORD;begin GameH:=FindWindow(nil,GameName); ... 阅读全文