var
HSnap:THandle;
PE:TProcessEntry32;
Exename:string;
begin
listbox1.Items.Clear;
// if HSnap>0 then CloseHandle(HSnap);
HSnap:=CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS,0);
PE.dwSize :=SizeOf(TProcessEntry32);
if HSnap=-1 then Exit;
if process32First(HSnap,PE) then
repeat Exename:=PE.szExeFile;
listbox1.Items.add(ExeName);
until not Process32Next(HSnap,PE);end;列出的只有进程的文件名而无路径,如“winwps.exe","QQ.exe"
要如何才能得到包含路径的文件名??
HSnap:THandle;
PE:TProcessEntry32;
Exename:string;
begin
listbox1.Items.Clear;
// if HSnap>0 then CloseHandle(HSnap);
HSnap:=CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS,0);
PE.dwSize :=SizeOf(TProcessEntry32);
if HSnap=-1 then Exit;
if process32First(HSnap,PE) then
repeat Exename:=PE.szExeFile;
listbox1.Items.add(ExeName);
until not Process32Next(HSnap,PE);end;列出的只有进程的文件名而无路径,如“winwps.exe","QQ.exe"
要如何才能得到包含路径的文件名??
那我在XP下面搞开发,是不是要用PSAPI??学习列程时碰到,在XP下面结果有出入,郁闷得不行,呵呵