delphi做的读取游戏血值的问题,求高手解答
2008-08-31 09:49
423 查看
delphi做的读取游戏血值的问题,求高手解答 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiMultimedia/html/delphi_2006120223245596.html
内存地址是2A1B064 怎么Edit1.text显示出来是乱码啊??
var
wnd:hwnd;
pid:hwnd;
pHandle:hwnd;
hp:pointer;
i:integer;
nSize:DWORD;
lpNumberOfBytesRead:DWORD;
begin
i:=$2A1B064;
nSize:=4;
hp:=AllocMem(nSize);
Wnd := FindWindow(nil,'Element Client');
GetWindowThreadProcessId(wnd,@pid);
pHandle:=OpenProcess(PROCESS_ALL_ACCESS,false,pid);
ReadProcessMemory(pHandle,Pointer(i),hp,nSize,lpNumberOfBytesRead);
Edit1.text:=strpas(hp);
end;
Move(hp^, i, 4);
Edit1.Text := IntToStr(i);
谢谢楼上的,但显示出来的好象是双字节,可以边成单字节吗?
比如这个地址显示的是人物的血(176)
但是这段代码显示出来是16816
用金山游侠得到的是该地址单字节为176 双字节为16816 四字节为0000016816
怎样使代码显示的是176??
有时候又显示176了
字节显示:
i := 0;
Move(hp^, i, 1);
Edit1.Text := IntToStr(i);
字显示:
i := 0;
Move(hp^, i, 2);
Edit1.Text := IntToStr(i);
双字显示:
Move(hp^, i, 4);
Edit1.Text := IntToStr(i);
武林外传?
一定是武林外传?
直接把 hp 定义成 dword 类型的变量
然后直接显示 hp 就一切正常,你非定义成指针干么
楼主,好好写啊,我在玩呢!到时帮你测试啊,嘿嘿
http://www.delphi2007.net/DelphiMultimedia/html/delphi_2006120223245596.html
内存地址是2A1B064 怎么Edit1.text显示出来是乱码啊??
var
wnd:hwnd;
pid:hwnd;
pHandle:hwnd;
hp:pointer;
i:integer;
nSize:DWORD;
lpNumberOfBytesRead:DWORD;
begin
i:=$2A1B064;
nSize:=4;
hp:=AllocMem(nSize);
Wnd := FindWindow(nil,'Element Client');
GetWindowThreadProcessId(wnd,@pid);
pHandle:=OpenProcess(PROCESS_ALL_ACCESS,false,pid);
ReadProcessMemory(pHandle,Pointer(i),hp,nSize,lpNumberOfBytesRead);
Edit1.text:=strpas(hp);
end;
Move(hp^, i, 4);
Edit1.Text := IntToStr(i);
谢谢楼上的,但显示出来的好象是双字节,可以边成单字节吗?
比如这个地址显示的是人物的血(176)
但是这段代码显示出来是16816
用金山游侠得到的是该地址单字节为176 双字节为16816 四字节为0000016816
怎样使代码显示的是176??
有时候又显示176了
字节显示:
i := 0;
Move(hp^, i, 1);
Edit1.Text := IntToStr(i);
字显示:
i := 0;
Move(hp^, i, 2);
Edit1.Text := IntToStr(i);
双字显示:
Move(hp^, i, 4);
Edit1.Text := IntToStr(i);
武林外传?
一定是武林外传?
直接把 hp 定义成 dword 类型的变量
然后直接显示 hp 就一切正常,你非定义成指针干么
楼主,好好写啊,我在玩呢!到时帮你测试啊,嘿嘿
相关文章推荐
- C二级问题跪求高手解答!!
- 写游戏到底应该学些什么,望高手帮忙解答一下!
- 初学delphi请问一个简单得问题 望解答
- 解决delphi的 dbgrid在读取access文本型字段显示TWideMemoField的问题
- Php高手带路--问题汇总解答
- 安装和运行Image Creator时出现的问题?高手请帮助解答!
- Php高手带路--问题汇总解答
- 用JSP连接SQL时遇到的问题---求高手解答
- LINUX高手经验:Linux常见20个问题的详细解答
- Delphi读取jpg文件的问题
- 【iOS-Cocos2d游戏开发之八】开启高清(960*640)模式问题与解答、图片适配以及设置iphone横竖屏
- 使用LINQ遇到的问题,请高手解答下原理
- 【iOS-Cocos2d游戏开发之八】开启高清(960*640)模式问题与解答、图片适配以及设置iphone横竖屏 推荐
- Php高手带路--问题汇总解答
- 知乎问题"房间里100个人,每人1000元,他们玩一个游戏,每轮游戏中,每个人拿出1元,随机给另一个人,最后他们的财富分布是怎样的"实践解答
- [VB.NET]关于EXIF读取的详细问题,高手请进
- 【iOS-Cocos2d游戏开发之八】开启高清(960*640)模式问题与解答、图片适配以及设置iphone横竖屏
- 求高手解答 eclipse+tomcat启动问题
- Php高手带路--问题汇总解答
- 今天写链表时候遇到的问题,请高手解答一下