|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Как получить путь к файлу процесса?
Добрый день, уважаемые!
Появилась такая проблемка: реализовал программу для завершения запущенных процессов (точь в точь диспетчер задач Windows). Нужно, чтобы в столбце StringGrid'a отображался путь до запущенного файла. Как это можно реализовать? Код самой процедуры забития инфы в грид прилагаю Код:
var hsnap: Thandle; procentry: TProcessEntry32; k:byte; begin k:=1; hsnap:=CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS,0); procentry.dwSize:=sizeof(procentry); Process32First(hsnap,procentry); repeat with procinfogrid do begin if k>rowcount-1 then rowcount:=rowcount+1; cells[0,k]:=procentry.szexefile; //имя файла cells[1,k]:=inttostr(procentry.th32ProcessID); //PID cells[2,k]:=inttostr(procentry.cntThreads); //потоки cells[3,k]:=GetPriority(procentry.th32processid); //приоритет end; k:=k+1; until Process32Next(hsnap,procentry)<>true; if k<procinfogrid.RowCount then procinfogrid.RowCount:=k; CloseHandle(hsnap); end; |
#2
|
||||
|
||||
Цитата:
|