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

Вниз

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

 
DelphiN! ©   (2004-12-17 07:18) [0]

Как узнать полный путь к процессу, если извесна вся структура TProcessEntry32, данного процесса ?


 
-=SS=- ©   (2004-12-17 10:32) [1]

ProcHand:=OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, False,ID);
if ProcHand = 0 then
   raise Exception.Create("No information available for this process/driver");
try
   EnumProcessModules(ProcHand, @ModHandles, SizeOf(ModHandles), Count);
   for I := 0 to (Count div SizeOf(DWORD)) - 1 do
     if (GetModuleFileNameEx(ProcHand, ModHandles[I], ModName,
       SizeOf(ModName)) > 0) and GetModuleInformation(ProcHand,
       ModHandles[I], @ModInfo, SizeOf(ModInfo)) then
       with ModInfo do

         DetailLists.Add(Format(SModuleStr, [ModName, lpBaseOfDll,
           SizeOfImage, EntryPoint]));


 
DelphiN! ©   (2004-12-17 11:14) [2]


>  [1] -=SS=- ©   (17.12.04 10:32)


Спасибо !


 
Digitman ©   (2004-12-17 11:36) [3]


> DelphiN! ©   (17.12.04 11:14) [2]


все бы ничего, вот только не есть корошо использовать для вышеозначенной цели одновременно и tlhelp32 и psapi .. последний полностью реализует функциональность первого (там ф-ция и для енумерации процессов) и, более того, "заточен" именно под НТ



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

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

Наверх




Память: 0.47 MB
Время: 0.04 c
3-1105006708
YurikGL
2005-01-06 13:18
2005.02.06
Дата-время в access


14-1106066184
olookin
2005-01-18 19:36
2005.02.06
Прогулка. Нестандартно для Земфиры, как вы считаете?


1-1106062293
Дмитрий В. Белькевич
2005-01-18 18:31
2005.02.06
Как изменить границы страницы принтера?


6-1101386016
aret99
2004-11-25 15:33
2005.02.06
БД в интернете.


9-1098878181
FRick
2004-10-27 15:56
2005.02.06
GLScene & 3ds