[@GameOldHack]

Нужна ваша помощь боле опытные кодеры ...
хочу выделить блок памяти что бы внедрить свой код (тк как делает СЕ)
Пишу на Delphi вот сам код :

begin
WindowName := FindWindow(nil,'Tomb Raider');
If WindowName = 0 then
begin
MessageDlg('Игра должна быть запущена до трейнера', mtwarning,[mbOK],0);
Exit;
end;
ThreadId := GetWindowThreadProcessId(WindowName,@pid);
proces := OpenProcess(PROCESS_ALL_ACCESS, FALSE, pid);
ptr := VirtualAllocEx(proces, nil, 2049, MEM_RESERVE, PAGE_READONLY);
// Поч не работает ? 
// И как вернуть адрес созданного блока памяти
end;