Задача такова: Список процессов :: вывести информацию об активных процессах(имя .exe,имя модуля,полный путь к программе,ID процесса, приоритет,кол-во потоков).
Проблема в том,что не выводится инф-ия о пути...
Често говоря,не могу понять,корректно ли работает прога...
Если не сложно-посмотрите..на форме компоненты мемо и кнопка + кнопка для очистки мемо
Прилагаю исходник..
Вывод информации делается так:
if (bGotModule)
{
HANDLE hProcess;
hProcess = OpenProcess (PROCESS_ALL_ACCESS,
FALSE, pe32.th32ProcessID);
dwPriorityClass = GetPriorityClass (hProcess);
CloseHandle (hProcess);
Memo1->Lines->Add("Priority "+
IntToStr(pe32.pcPriClassBase));
Memo1->Lines->Add("PID "+
IntToStr(pe32.th32ProcessID));
Memo1->Lines->Add("Thread_Count "+
IntToStr(pe32.cntThreads));
char inf;
s="---EXE--- ";
for (int i=0; i<50; i++)
{
inf=pe32.szExeFile[i];
s+=inf;
}
Memo1->Lines->Add(s);
s="---MODULE---";
for (int i=0; i<50; i++)
{
inf=me32.szModule[i];
s+=inf;
}
Memo1->Lines->Add(s);
s="---Path---";
for (int i=0; i<50; i++)
{
inf=me32.szExePath[i];
s=+inf;
}
Memo1->Lines->Add(s);
}
else
{
Memo1->Lines->Add("bGotModule failed PID "+IntToStr(pe32.th32ProcessID));
};