Страница 1 из 1
Номера процессов (PID) запущенной программы и ее родителя
Добавлено: 19.11.2015 17:10:52
PapaNT
Уважаемые форумчане, автоматизируя рабочие задачи, столкнулся с задачей как программе узнать свой PID и PID своего родителя (платформа Win32)...
Функции GetProcessID и GetThreadID, как ни странно, возвращают одинаковое значение N, а результатах работы программы tasklist (штатная команда Windows) я вижу совершенно иные значения PID для запущенной задачи

Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 19.11.2015 18:07:30
скалогрыз
Может ты не от админа запускаешь?
попробуй такой код:
Код: Выделить всё
{$mode delphi}{$H+}
uses
Windows, jwatlhelp32;
function GetProcessID(AHandle: HANDLE): DWORD; stdcall; external 'kernel32.dll' name 'GetProcessId';
var
h : DWORD;
res: TProcessEntry32W;
ws : WideString;
pid : DWORD;
begin
pid:=GetCurrentProcessId;
writeln('My PID: ',pid);
writeln('My PID by GetProcess: ',GetProcessID(GetCurrentProcess));
h:=CreateToolhelp32Snapshot(TH32CS_SNAPALL, GetCurrentProcessId);
FillChar(res, sizeof(res),0);
res.dwSize:=sizeof(res);
if Process32FirstW(h, res) then begin
if (res.th32ProcessID<>pid) then
repeat
until (res.th32ProcessID=pid) or not Process32NextW(h, res);
if res.th32ProcessID=pid then
writeln('My Parent PID: ', res.th32ParentProcessID)
else
writeln('failed to find my parent!');
end else
writeln('failed to find my parent!');
CloseHandle(h);
writeln('Hit enter or open Task Manager to compare values!');
readln;
end.
Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 23.11.2015 18:44:55
PapaNT
Огромное спасибо!

Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 23.11.2015 21:55:36
alex208210
неправильно закрыт Toolhelp32Snapshot. Будет утечка памяти.
Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 23.11.2015 22:40:39
скалогрыз
alex208210 писал(а):неправильно закрыт Toolhelp32Snapshot. Будет утечка памяти.
как правильно?
Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 24.11.2015 17:54:03
alex208210
Toolhelp32Snapshot нужно закрывать CloseToolhelp32Snapshot(h);
Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 24.11.2015 21:18:42
скалогрыз
alex208210 писал(а):Toolhelp32Snapshot нужно закрывать CloseToolhelp32Snapshot(h);
судя по всему
CloseToolhelp32Snapshot есть только в Windows CE (Mobile).
Тогда как в WinAPI наборе такой
функции нет. И согласно документации
CreateToolhelp32Snapshot, её результат должен быть закрыт именно CloseHandle().
Проверка на практике (см приложение), доказывает это.
Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 24.11.2015 21:25:04
alex208210
проблему с утечкой памяти обнаружил именно в wince, на больших виндах не проверял, тогда точно утверждать не буду.
Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 24.11.2015 22:06:12
скалогрыз
alex208210 писал(а):проблему с утечкой памяти обнаружил именно в wince, на больших виндах не проверял, тогда точно утверждать не буду.
для кроссплатформенности, добавь такой вот заголовок:
Код: Выделить всё
function CloseToolhelp32Snapshot(AHandle: HANDLE): LongBool; stdcall; external 'kernel32.dll' name 'CloseHandle';
но $IFDEF-ы не забудь!
Re: Номера процессов (PID) запущенной программы и ее родител
Добавлено: 09.12.2015 09:13:44
PapaNT
Всем спасибо! Вопрос решен

В результате получилась прелестная утилита командной строки для вставления оной в батники с поддержкой многопоточности
