Текст в Адресе (String and Cardinal)

[rainzek]

Хотел создать свой трейнер-русификатор для игры но есть одна проблема, я не мастер на Delphi и мало знаю языков программирования. Пожалуйся, помогите.
Вопрос: Как сделать так чтоб в указанных байтах значение менялось не на число а на текст! Я много пытался но так и не получилось, вылазила ошибка что Кардинал и Стринг используется одновременно и что-то в этом роде.

Вот сам код:



var
Form1: TForm1;
WindowName: integer;// Для удобства объявим как глобальные переменные.
ProcessId: integer; // Все эти переменные нужны для того, чтобы найти
ThreadId: integer; // процесс с игрой.
HandleWindow: Integer; //
write: cardinal; // В эту переменную попадёт количество записанных байтов. (И как тут быть?)
buf: dword; // Тут будет содержаться значение, на которое будем изменять. (Что это я не понял)
const
WindowTitle = 'Наша игра'; // Заголовок окна с игрой

Address = $83C4BF64; // Адрес, по которому будем изменять значение на текстовое.
NumberOfBytes = 4; // Количество байт, которые будем заменять. Что тут писать? Вроде надо оставить 4, потому что 4 байтовый адрес

implementation

{$R *.dfm}

procedure TForm1.Button1Click(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,Fals e,ProcessId); // с нашей игрой.
buf:=$DEAD; // DEADh = 57005d
WriteProcessMemory(HandleWindow, ptr(address), @buf, 4, write); // Изменяем значение по этому адресу на наше.
end;





Пожалуйста, помогите.
Подробности: нужно сделать так чтоб в байтах было не числовое Value ставилось а ТЕКСТОВОЕ - string, у меня не получается. Заранее спасибо.
Например: я нашел через ArtMoney текстовое значение 'Hello' и я копирую байты и вставляю в наш код и мне надо чтоб ставилось не число а перевод вместо 'Hello' при нажатий на кнопку трейнер переиминовывал его в 'Привет'

[Стертор]

WriteProcessMemory(HandleWindow, ptr(address), @buf, 4, write);

Смотрите, как бы ваша игра "в доктора" не закончилась промыванием желудка.