Форум: "WinAPI";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];

Вниз

Process ID   Найти похожие ветки 

← →
drpass   (2002-02-07 16:48) [6]

>Demn вот кусок кода, структура TProcessEntry32 содержит разнообразную информацию - ProcessID, путь к исполняемому файлу и т.д. Будет работать на 9x/2000/XP
var
pe:TProcessEntry32;
ppe:PProcessEntry32;
snap:THandle;
res:string;
li:TList;

snap:=CreateToolhelp32Snapshot(th32cs_snapprocess, 0);
if integer(snap)=-1 then begin
res:="#Message$Не могу получить список процессов!%";
exit;
end else begin
pe.dwSize:=sizeof(pe);
if Process32First(snap, pe) then
repeat
new(ppe);
ppe^:=pe;
li.Add(ppe);
res:="";
until not Process32Next(snap, pe)
else res:="#Message$Нет процессов в списке! Вероятно, имеем дело с WinNT%";
end

>VuDZ
А что, ты пишешь программы, которые будут использоваться только на твоем компьютере, и нигде больше? Сочувствуем-с

---

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

Форум: "WinAPI";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.006 c