Вниз
Скачать: CL | DM;

Как получить полное имя запущенного файла если известен только PI   Найти похожие ветки 

 
Roughneck   (2005-09-30 07:51) [0]

Нужно получить полное имя файла по известному PID


 
Игорь Шевченко ©   (2005-09-30 11:10) [1]

Начиная с WinXP в psapi появилась функция GetProcessImageFileName.

function GetProcessImageFileName (hProcess: THandle; lpImageFileName: PChar;
 nSize: DWORD): DWORD; stdcall; extrenal "psapi.dll" name "GetProcessImageFileNameA";


 
alpet ©   (2005-09-30 11:16) [2]

1. создай список процессов, например средствами ToolHelp API (unit Tlhelp32)
2. Ищи в нем искомый процесс


 
BiN ©   (2005-09-30 11:18) [3]

The GetModuleFileNameEx function retrieves the fully qualified path for the specified module.

(С) msdn


 
BiN ©   (2005-09-30 11:20) [4]

alpet ©   (30.09.05 11:16) [2]

1. создай список процессов, например средствами ToolHelp API (unit Tlhelp32)
2. Ищи в нем искомый процесс


В NT этого недостаточно для получения полного пути.


 
alpet ©   (2005-09-30 18:08) [5]

BiN ©   (30.09.05 11:20) [4]

У меня получается полный путь, правда не для всех процессов (кроме системных).

uses windows, messages, TlHelp32;

function FindProcess (pid: DWORD): String;
var
   pe: TProcessEntry32;
   me: TModuleEntry32;
  h: THandle;
begin
result := "";
h := CreateToolHelp32Snapshot (TH32CS_SNAPPROCESS, 0);
pe.dwSize := SizeOf (pe);
if Process32First (h, pe) then
  repeat
   if pid = pe.th32ProcessID then
    begin
     me.dwSize := sizeof (me);
     CloseHandle (h);
     h := CreateToolHelp32Snapshot (TH32CS_SNAPMODULE, pid);
     Module32First (h, me);
     result := me.szExePath;
     break;
    end;
  until not Process32Next (h, pe);
CloseHandle (h);
end; // FindProcess

...


 
Roughneck   (2005-10-03 11:25) [6]

Всем спасибо. Этого достаточно.


 
BiN ©   (2005-10-03 11:37) [7]

alpet ©   (30.09.05 18:08) [5]

Хм, точно.
Как-то упустил возможность использования  Module32First для получения сабжа.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c
6-1124997496
Дмитрий_
2005-08-25 23:18
2005.12.04
Подскажите, как это проще реализовать


5-1115295849
Priest
2005-05-05 16:24
2005.12.04
Редактор компонент в RunTime


14-1131600217
ZeroDivide
2005-11-10 08:23
2005.12.04
Что за контора такая: ОЛДИ (Москва)


2-1132232845
Alexunder
2005-11-17 16:07
2005.12.04
AsyncFetch


6-1125044882
DeGlucker
2005-08-26 12:28
2005.12.04
Клиент-сервер(WinXP-Win98)




   Наверх