Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.12.02;
Скачать: CL | DM;

Вниз

Как узнать откуда запущен чужой процес?   Найти похожие ветки 

 
-=Le][=- ©   (2007-11-05 17:41) [0]

Как с помощью ID чужого процесса узнать откуда он был запущен?
У кого нибуть есть компактный код?


 
Riply ©   (2007-11-05 17:45) [1]

> [0] -=Le][=- ©   (05.11.07 17:41)
А откуда они(процессы) могут запускаться ?


 
Юрий Зотов ©   (2007-11-05 17:57) [2]

GetModuleFileNameEx(OpenProcess(...), ...)


 
vpbar ©   (2007-11-05 17:58) [3]

Если имеется ввиду путь до модуля, то такой код есть. Если то кто запустил процесс, то тоже есть. TaskManagerEx есть в исходниках


 
-=Le][=-   (2007-11-05 18:02) [4]

Riply
Я имел в виду: Как узнать путь к ехе-файлу с какова запущен процес!
Тоесть путь к ехе-шнику по ID чужого процесса!


 
vpbar ©   (2007-11-05 18:10) [5]

-=Le][=-   (05.11.07 18:02) [4]
см  [2]


 
-=Le][=-   (2007-11-05 18:21) [6]

Юрий Зотов, vpbar
Спасибо!


 
MetalFan ©   (2007-11-05 18:55) [7]


> [2]

нехорошо получится... ибо CloseHandle не к чему будет применить...


 
Юрий Зотов ©   (2007-11-05 19:03) [8]

> MetalFan ©   (05.11.07 18:55) [7]

Не может быть!
:о)


 
-=Le][=- ©   (2007-11-06 10:44) [9]

Народ, не получается!

var
 pId: Cardinal;
 PrcMdl: array[0..255] of Char;
 pPrcMdl:PChar;
 h:HWND;
...
  pPrcMdl:=@PrcMdl;
...
  GetWindowThreadProcessId(h,pId);
  pId:=OpenProcess(PROCESS_QUERY_INFORMATION,False,pId);
  FillChar(PrcMdl,255*sizeof(Char),#0);
  if pID<>0 then
     if GetModuleFileNameEx(pID, 0, pPrcMdl, 255)<>0 then
        pl.ExePht:=pPrcMdl
       else ShowMessage(IntToStr(GetLastError));
  CloseHandle(pId);
...


GetLastError =5   Отказано в доступе!!!
Учетная запись администратор домена, пробовал на WinXP и Win2k3 Server R2!
У кого нибуть есть соображения?


 
Igor Zorkov ©   (2007-11-06 10:47) [10]


> -=Le][=- ©



http://www.delphisources.ru/pages/sources/system/2007_year/processes_killer.html



Страницы: 1 вся ветка

Текущий архив: 2007.12.02;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
15-1193684400
Evanescence
2007-10-29 22:00
2007.12.02
Redhat 9 на VirtualPC


15-1193813295
ZeroDivide
2007-10-31 09:48
2007.12.02
Программа для учета персональных финансов - бесплатно...


15-1193511669
Kick
2007-10-27 23:01
2007.12.02
как получить значение [i,j] элемент в StrigGrid?


15-1192084197
de.
2007-10-11 10:29
2007.12.02
to Delphi 7


15-1193855856
Silver...
2007-10-31 21:37
2007.12.02
Сканер Штрих кода