Последние записи

made in programmersforum 8

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

18th
Ноя

Как просканировать память программы в поисках определеного значения?

Posted by Chas under Delphi

Larboss

function GetAdrValue(h: hwnd; Addres: cardinal; ByteType: integer;

  var GetValue: integer): Boolean;

var

  PID, PH: cardinal;

  rw: cardinal;

  exec: Boolean;

begin

  exec := true;

  if h = 0 then

    exec := false;

  getwindowthreadprocessid(h, PID);

  PH := openprocess(process_all_access, false, PID);

  if PH = 0 then

    exec := false;

  if readprocessmemory(PH, ptr(Addres), @GetValue, ByteType, rw) = false then

    exec := false;

  closehandle(PH);

  result := exec;

end;