Память

[Ghennadiy]

Помогите пожалуйста разобратся:
Программа при запуске пишет переменную в адрес памяти, но при следующем запуске адрес памяти менияется. Можно найти адрес через Cheat Engine например, но он потом опять изменется. Нужно что бы прога на Delphi сама искала адрес этой переменной и ставила ее себе на поток.

[Altera]

А если переменную в файл сохранять?
Вам вообще для чего это надо. Может есть способ по проще...

[Stilet]

Нужно что бы прога на Delphi сама искала адрес этой переменной и ставила ее себе на поток.

Зачем?? при запуске все используемые переменки загрузчик расставит как надо.

[Utkin]

Используйте указатели. Или Вам необходимо контролировать чужие данные по типу ArtMoney?

[Alter]

Это типа трейнер для игр, я полагаю. Наверняка можно найти смещение адреса.

[Пепел Феникса]

в стары играх адреса были постоянные.
а в новых можно найти указатель который хранит в себе нужную переменную(то есть адрес её)
и использовать его

[Ghennadiy]

Осцилограф! Переменная постоянно меняется и ее нужно подхватить для дальнейшей обработки уже в другой программе

Используйте указатели

можно подробнее пожалуйста

Немножко разобрался: по адресу есть указатель который пишет значение Double, может кото подскажет с кодом, нужно отобразить эту переменную в проге делфи в Edit text

может кто поможет оптимизировать код что бы работал с Double..
и еще вопрос, как поменять поиск не по заголовку окна а по запущеному процессу?

procedure TForm1.Button2Click(Sender: TObject);
var hWnd : THandle;
    ipBase: Pointer;
    IpBuf : PWideChar;
    hProc, PID, numberRead : DWORD;
begin
 hWnd:=FindWindow(nil, 'Delphi - 7');
 Edit1.Text:=inttostr(hWnd);
 GetWindowThreadProcessId(hWnd, @PID); //ïîëó÷àåì pid çíàÿ õýíäë îêîøêà èíòåðåñóþùåé íàñ ïðîãðàììû
 Edit2.Text:=inttostr(PID); // çàíîñèì â edit ID
 ipBase:=ptr($01756398);
 hProc:=OpenProcess(PROCESS_VM_READ, False, PID);
 Edit3.Text:=inttostr(hProc); // çàíîñèì â edit Process
 ReadProcessMemory(hWnd, ipBase, Addr(ipbuf), 4, numberRead);
 Edit4.Text:=WideCharToString(ipbuf); // çàíîñèì â edit Buffer
 CloseHandle(hProc);
//FreeMem(ipBuf); // îñâîáîæäàåì ïàìÿòü

--------------
в Edit4.Text выдает следубщее: ??????????????????????????????????? ?????R????????????????????????????? ??????????????????þ????????~??????? Q??????????????D??????????????????? ?????Q????????????????????????????? ????S?????????????????@??????
????? ???p??
end;

Если поменять PWideChar на String, что пологаю и нужно то не выдет ничего, а нужно считать значение Double

[Пепел Феникса]

Сообщение от Ghennadiy

->и еще вопрос, как поменять поиск не по заголовку окна а по запущеному процессу?

поиск по форуму.

[Ghennadiy]

Сообщение от Пепел Феникса

поиск по форуму.

нету .

[Stilet]

нету .

Есть. Вот пример получения списка процессов.
http://www.programmersforum.ru/showt...Help32SnapShot