GameHwnd:= FindWindow(nil,‘对对碰角色版‘);//得到进程IDGetWindowThreadProcessId(GameHwnd,GamePid);//得到进程句柄GameProcess:= OpenProcess(PROCESS_VM_READ or PROCESS_VM_WRITE,False,GamePid);//读取进程内存ReadProcessMemory(GameProcess,Pointer($0048F128),@sitnum,4,readbyte);