Показать сообщение отдельно
  #7  
Старый 21.02.2012, 21:43
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Думаю, надо получать дебаг-привилегии прежде, чем вводить ДЛЛ-ку. Была такая тема.
Вполне возможно, код инжекта один и тот же.
И, разумеется, программа должна работать от имени администратора. У меня сие творение работало со сторонней программой примерно так:
Код:
if not EnableDebugPrivilege then
  begin
   MessageBox(0,'Не получены привилегии дебаг',0,0);
   exit;
  end;
  Handle:=FindWindow(nil,'SinaProg 1.4.5.8');
  if Handle = 0 then
  begin
   MessageBox(0,'Не найдено окно SinaProg',0,0);
   exit;
  end;
  if not InjectDll(Handle,'SPAddDll.dll') then
  begin
   MessageBox(0,'Не удалось внедрить DLL',0,0);
   exit;
  end;
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием