DELPHI,读指针

Emar	2008-08-18 22:07
请问Delphi指针读数组的问题 var  base,NowHP,Name0:^DWORD;  Name:array[0..32] of WideChar; //这里用指针知道怎么读呀？  begin        Base:=Pointer($0093AFBC);        Base:=Pointer(Base^+$24);        NowHP:=Pointer(Base^+$25C);        Name0:=Pointer(Base^+$3A8);        Name:=Pointer(Name0^+$0); //哎呀，不知道怎么读    谁能帮帮我呀？谢谢！！！

 

Emar	2008-08-18 22:09
最近老被封，想不用ReadProcessMemory之类的API，谁能帮帮我？

 

asir99	2008-08-19 01:51
你下面的代码已经注入到游戏进程了吗？如果没有注入，是实现不了的，不出意外的话，程序肯定出错    var  base,NowHP,Name0:^DWORD;  Name:array[0..32] of WideChar; //这里用指针知道怎么读呀？  begin        Base:=Pointer($0093AFBC);        Base:=Pointer(Base^+$24);        NowHP:=Pointer(Base^+$25C);        Name0:=Pointer(Base^+$3A8);        Name:=Pointer(Name0^+$0); //哎呀，不知道怎么读    谁能帮帮我呀？谢谢！！！        如果上面代码是注入的，这么写也是不对的， [s:57]

 

Emar	2008-08-19 03:04
谢谢2楼的大哥帮忙，  代码已经注入进程了，代码在DLL里读HP些读出来都是正确的

 

sixfor	2009-04-26 23:34
Name用String类型，Name:=PChar(Pointer(Name0^+$0));  就OK