![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Процессы [D7]
X-Disa © (2003-11-10 13:27:00)
Подскажите пожалуйста, как получить список процессов в системе?
Pattern (2003-11-10 18:22:00) [1]По сслыке сходи, уже готовый пример изучай
http://faq.pp.ru/forums/index.php?showtopic=1129&st=0entry11714
Demetrius2003 (2003-11-10 16:16:00) [2]
Для win98 :
var
hSnapShot: THandle;
ProcInfo: TProcessEntry32;
begin
if List = nil then Exit;
hSnapShot := CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS, 0);
if (hSnapShot <> THandle(-1)) then
begin
ProcInfo.dwSize := SizeOf(ProcInfo);
if (Process32First(hSnapshot, ProcInfo)) then
begin
List.Add(inttostr(Procinfo.th32ProcessID)+" "+ProcInfo.szExeFile);
while (Process32Next(hSnapShot, ProcInfo)) do
List.Add(inttostr(Procinfo.th32ProcessID)+" "+ProcInfo.szExeFile);
end;
CloseHandle(hSnapShot);
end;
end;
для хр
enumprocesses
fishca (2003-11-10 15:49:00) [3]
ищи по форуму NtQuerySystemInformation
Игорь Шевченко (2003-11-10 14:30:00) [4]
toolhelp, psapi