Вопрос Проблема с инжектом

[relquado]

Пишу на дельфи, нашёл функцию клиента, хочу заинжектить, инжектор ниже в спойлере

Спойлер: инжектор

procedure InjectFunc(ProcessID: Cardinal; Func, aParams: Pointer;
  aParamsSize: DWord);
var
  hThread: THandle;
  lpNumberOfBytes: SIZE_T;
  lpNumberOfBytesDword: DWord;
  ThreadAddr, ParamAddr: Pointer;
begin
  if ProcessID<>0 then
  begin
    // ---- Выделяем место в памяти процесса, и записываем туда нашу функцию
    ThreadAddr := VirtualAllocEx(ProcessID, nil, 256, MEM_COMMIT, PAGE_READWRITE);
    WriteProcessMemory(ProcessID, ThreadAddr, Func, 256, lpNumberOfBytes);

    // ---- Также запишем параметры к ней
    ParamAddr := VirtualAllocEx(ProcessID, nil, aParamsSize, MEM_COMMIT, PAGE_READWRITE);
    WriteProcessMemory(ProcessID, ParamAddr, aParams, aParamsSize, lpNumberOfBytes);

    // ---- Создаем поток, в котором все это будет выполняться.
    hThread := CreateRemoteThread(ProcessID, nil, 0, ThreadAddr, ParamAddr, 0, lpNumberOfBytesDword);

    // ---- Ожидаем завершения функции
    WaitForSingleObject(hThread, INFINITE);

    // ---- подчищаем за собой
    CloseHandle(hThread);
    VirtualFreeEx(ProcessID, ParamAddr, 0, MEM_RELEASE);
    VirtualFreeEx(ProcessID, ThreadAddr, 0, MEM_RELEASE);
  end
end;

Cобсна игра валится на 23 строчке, с ошибкой по памяти

Пожалуйста, авторизуйтесь для просмотра ссылки.

ThreadAddr как раз равен тому адресу который указан в ошибке (видно в посте imgur)
Это защита от инжектов или у меня кривой инжектор?

 

[qqqqqq111111]

Пишу на дельфи, нашёл функцию клиента, хочу заинжектить, инжектор ниже в спойлере

Спойлер: инжектор

procedure InjectFunc(ProcessID: Cardinal; Func, aParams: Pointer;
  aParamsSize: DWord);
var
  hThread: THandle;
  lpNumberOfBytes: SIZE_T;
  lpNumberOfBytesDword: DWord;
  ThreadAddr, ParamAddr: Pointer;
begin
  if ProcessID<>0 then
  begin
    // ---- Выделяем место в памяти процесса, и записываем туда нашу функцию
    ThreadAddr := VirtualAllocEx(ProcessID, nil, 256, MEM_COMMIT, PAGE_READWRITE);
    WriteProcessMemory(ProcessID, ThreadAddr, Func, 256, lpNumberOfBytes);

    // ---- Также запишем параметры к ней
    ParamAddr := VirtualAllocEx(ProcessID, nil, aParamsSize, MEM_COMMIT, PAGE_READWRITE);
    WriteProcessMemory(ProcessID, ParamAddr, aParams, aParamsSize, lpNumberOfBytes);

    // ---- Создаем поток, в котором все это будет выполняться.
    hThread := CreateRemoteThread(ProcessID, nil, 0, ThreadAddr, ParamAddr, 0, lpNumberOfBytesDword);

    // ---- Ожидаем завершения функции
    WaitForSingleObject(hThread, INFINITE);

    // ---- подчищаем за собой
    CloseHandle(hThread);
    VirtualFreeEx(ProcessID, ParamAddr, 0, MEM_RELEASE);
    VirtualFreeEx(ProcessID, ThreadAddr, 0, MEM_RELEASE);
  end
end;

Cобсна игра валится на 23 строчке, с ошибкой по памяти

Пожалуйста, авторизуйтесь для просмотра ссылки.

ThreadAddr как раз равен тому адресу который указан в ошибке (видно в посте imgur)
Это защита от инжектов или у меня кривой инжектор?

PAGE_EXECUTE_READWRITE

 

[relquado]

PAGE_EXECUTE_READWRITE

Ошибка стала такой.

Пожалуйста, авторизуйтесь для просмотра ссылки.

 

[relquado]

Если кому интересно, разобрался. По итогу проблема была в самой функции которую я инжектил, а не в инжекторе. Инжектор рабочий, главное поменяйте PAGE_READWRITE на PAGE_EXECUTE_READWRITE