Как получить список запущеных exe-шников? Не окон, а файлов.

← →
MikeZ (2002-08-22 16:52) [0]

См. Subj.

← →
Esu (2002-08-22 16:58) [1]

uses ...TlHelp32,...
...
han := CreateToolhelp32Snapshot( TH32CS_SNAPALL, 0 );
ProcStruct.dwSize := sizeof( PROCESSENTRY32 );
if Process32First( han, ProcStruct ) then
begin
repeat
sID := ExtractFileName( ProcStruct.szExeFile );
memo1.lines.add(sID);
until not Process32Next( han, ProcStruct );
end;
CloseHandle( han );
...

← →
MikeZ (2002-08-22 18:29) [2]

Огромное спасибо.
Для тех, кому может понадобится:
Var Han : THandle; ProcStruct : TProcessEntry32; sID : String;

← →
PVOzerski (2002-08-22 18:41) [3]

>Esu ©
Это верно только для W"9x/ME, но не для линейки NT. Там по-хорошему эту инфу надо как-то добывать через функции ntdll.dll, но проще делать это через функции библиотеки psapi.dll (только вот есть у меня нехорошее подозрение, что она не ставится в NT при инсталляции по умолчанию, хотя и доступна для скачивания в Сети. Доку поищите в Сети.

← →
Ученик (2002-08-22 18:44) [4]

>PVOzerski © (22.08.02 18:41)
А также для >=Windows 5.0 (Windows 2000)

← →
PVOzerski (2002-08-22 18:51) [5]

2Ученик © (22.08.02 18:44):
W"2K/XP относятся тоже к линии NT

← →
Ученик (2002-08-22 18:59) [6]

>PVOzerski © (22.08.02 18:51)
CreateToolhelp32Snapshot

Requirements
Windows NT/2000: Requires Windows 2000.
Windows 95/98: Requires Windows 95 or later.
Header: Declared in Tlhelp32.h.
Library: Use Kernel32.lib.

← →
PVOzerski (2002-08-22 19:04) [7]

Что ж, M$, оказывается, прибавил совместимости. Хотя автор вопроса, согласно тому, что он выставил во флажках, заинтересован в совместимости и с NT4. А у меня Help старый... :^)

← →
BJValentine (2002-08-22 22:39) [8]

Esu, ты гений! Спасибо!

Как получить список запущеных exe-шников? Не окон, а файлов. Найти похожие ветки