[Помогите!] Чтение строки из другого процесса средством WinAPI

[ZigaRex]

[Ссылки могут видеть только зарегистрированные пользователи. ]
Адрес: 00533974

Сам код:

var
  HandleWindow: hWnd;
  ProcessId: Cardinal;
  hProcess: THandle;
  Adress: dword;
  readwrite: cardinal;

procedure TForm1.Button1Click(Sender: TObject);
var strfromprocess : array[0..20] of wChar;
begin
  ZeroMemory(@strfromprocess[0], sizeof(strfromprocess));
  HandleWindow := FindWindow(nil, 'SA-MP 0.3');
  GetWindowThreadProcessId(HandleWindow,@ProcessId);
  hProcess := OpenProcess(PROCESS_ALL_ACCESS,False,ProcessId);
  ReadProcessMemory(hProcess, ptr($00863974), @strfromprocess[0], sizeof(strfromprocess), readwrite);
  ShowMessage(strfromprocess);
end;

Итог вывода — пустая строка: [Ссылки могут видеть только зарегистрированные пользователи. ]

[Dinmaite]

Цитата: Адрес: 00533974

Цитата: ptr($00863974)

Они разные, не?

[ZigaRex]

Цитата: Сообщение от Dinmaite Они разные, не?

Пардон, заменить забыл xD

[ZigaRex]

Проблема все еще актуальна.

[Dinmaite]

Тогда давайте поступим иначе. В аттаче приложение в приложении строка Test_1. Найди её, и напиши минипрограммку для чтения её из памяти.

[ZigaRex]

Но строка же юникодовская?

[Dinmaite]

А разница не большая, я хочу увидеть живой код. Потом будем думать над неюникод строкой.

[ZigaRex]

Цитата: Сообщение от Dinmaite А разница не большая, я хочу увидеть живой код. Потом будем думать над неюникод строкой.

var
  h: hWnd;
  ProcessId: Cardinal;
  hProcess: THandle;
  readwrite: cardinal;

procedure TForm1.Button1Click(Sender: TObject);
var adress : array[0..20] of widechar;
begin
  h:= FindWindow(nil, 'Project1');
  GetWindowThreadProcessId(h, @ProcessId);
  hProcess:= OpenProcess(Process_All_Access, False, ProcessId);
  ReadProcessMemory(hProcess, ptr($0054356C), @Adress[0], sizeof(adress), readwrite);
  ShowMessage(adress);
end;

Результат: [Ссылки могут видеть только зарегистрированные пользователи. ]

Добавлено через 1 час 12 минут
Кажется, суть уловил — WideChar для Юникода, Char — для Неюникода. Но возникла другая проблема: почему антивирус блочит процесс, считывающий строку Неюникода, в то время как процесс, считывающий строку Юникода, антивирус не блочит? AVG Internet Security

[Dinmaite]

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