Hallo
Delphi-Quellcode:
...
hProcSnap: THandle;
pe32 : TProcessEntry32;
...
// Snapshot machen
hProcSnap := CreateToolHelp32SnapShot(TH32CS_SNAPALL, 0);
if (hProcSnap <> INVALID_HANDLE_VALUE) then
begin
pe32.dwSize := SizeOf(pe32);
if (Process32First(hProcSnap, pe32) = True) then
begin
writeln(LowerCase(pe32.szExeFile)); // (*)
while (Process32Next(hProcSnap, pe32) = True) do
writeln(LowerCase(pe32.szExeFile)); // (*)
end;
CloseHandle(hProcSnap);
end;
...
Siehe (*), in
pe32.szExeFile steht schon der Dateiname drin
Die PIDs stehen aber auch in der pe32 Datenstruktur, falls Du die trotzdem noch benötigst...