VPF::Изменить код чужой программы - Форум программистов

Dimannn

Дата 6.8.2005, 03:11 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 318
Регистрация: 14.4.2005
Где: Владимир

Репутация: нет
Всего: 1

Подскажите, плс: мне надозапустить программу и изменить
у неё по адресу $48cd00 инструкцию на call 48CCC1

В дельфе это можно?

А то какието ... её пропатчили намертво.

--------------------

Хотите быстро и без проблем опубликовать вашу программу в сети за 5 минут?
Тогда потратьте пару минут чтобы посмотреть, что предлагает OpenProject.org.ru

rsm

Дата 6.8.2005, 08:33 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник Клуба
Сообщений: 999
Регистрация: 16.3.2005

Репутация: 1
Всего: 62

Например так...

Код


program simplpatch;

uses
  Windows;

const
   PATCH_OFFSET = $48CD00; // адрес патча
   PATCH_LEN = 5; // длина патча, байт
   PATCH: array[1..PATCH_LEN] of Byte =
      ( $0E8, $2C, $0AD, $08, $00 ); // сам патч

var
   si: TStartupInfo;
   pi: TProcessInformation;
   nRW: Cardinal;

begin
   GetStartupInfo(si);
   if not CreateProcess('c:\winnt\notepad.exe', nil, nil, nil,
      false, CREATE_SUSPENDED, nil, nil, si, pi) then
         exit;
   if not WriteProcessMemory(pi.hProcess, Pointer(PATCH_OFFSET),
      @PATCH, PATCH_LEN, nRW) then
         begin
            TerminateProcess(pi.hProcess, 0);
            exit;
         end;
   ResumeThread(pi.hThread);
   CloseHandle(pi.hProcess);
end.

Это сообщение отредактировал(а) rsm - 6.8.2005, 08:39

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »