Как использовать найденный Pointer для чтения адреса

[Гость dsssssss3ssss]

Всем привет! Вот мой "поинтер" в DMA игре:

Мне нужно читать этот адрес в программе на Delphi.

пробовал записать так, но не сработало:

var
Form1: TForm1;
WindowName : integer;
ProcessId : integer;
ThreadId : integer;
HandleWindow : Integer;
b:dword;
readwrite:cardinal;
buf : dword;
Const WindowTitle = 'играааа';///////
Address = $1430C;////////
NumberOfBytes = 4;
implementation
{$R *.dfm}
procedure TForm1.Btn1Click(Sender: TObject);
begin
WindowName := FindWindow(nil,WindowTitle);
If WindowName = 0 then
begin
MessageDlg('запусти игру', mtwarning,[mbOK],0);
end;
ThreadId := GetWindowThreadProcessId(WindowName,@ProcessId);
HandleWindow := OpenProcess(PROCESS_ALL_ACCESS,False,ProcessId);
ReadProcessMemory(HandleWindow,ptr(address),@b,4,readwrite);
b:=b+$12fa8;////////
buf:=$FF;/////////////
WriteProcessMemory(HandleWindow, ptr(, @buf, 4, readwrite);
end;

очень надеюсь на вашу помощь. весь форум перелопатил но ..не помогло

[MasterGH]

Наверно надо только исправить

Address = $0x01E42498;

[DenkA003]

http://forum.gamehacklab.ru/topic/2403-pointer-trainer-base-address-by-denka003/

уже готовая тема для Delphi ))

[Xipho]

Наверно надо только исправить

Address = $0x01E42498;

Скорее

Address = $01E42498;

ибо приставка 0х - это прерогатива плюсов, но не дельфей )))

[MasterGH]

Да, это ошибка сделанной по невнимательности, в полудреме. С пятницы на субботу лег под три ночи. А с субботы по воскресение под 7 часов утра.

[DenkA003]

Скорее

Address = $01E42498;

ибо приставка 0х - это прерогатива плюсов, но не дельфей )))

или просто дек кодировку 31728792 без префикса $