Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.20;
Скачать: CL | DM;

Вниз

Процессы   Найти похожие ветки 

 
alexec   (2002-03-19 06:13) [0]

Почему под W2K при получении списка процессов отображается имя файла но не путь? Как его отобразить?


var ListProc:TStrings;
T: tagPROCESSENTRY32;
H: THandle;
begin
ListProc := TStringList.Create;
H := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
T.dwSize := sizeof(T);
Process32First(H, T);
while Process32Next(H, T) do
ListProc.Append(T.szExeFile);
Listbox1.Items.AddStrings(ListProc);


 
VuDZ ©   (2002-03-19 06:33) [1]

GetModuleFileNameEx()


 
alexec   (2002-03-19 07:33) [2]

А где ее взять в каком модуле или dll-ке


 
alexec   (2002-03-19 07:42) [3]

Нашел через минуту,модуль psapi а как ею пользоваться?


 
VuDZ ©   (2002-03-19 07:58) [4]

HANDLE h = OpenProcess()
GetModuleFileNameEx(h, NULL, buf, buf_len)...

GetModuleFileNameEx
The GetModuleFileNameEx function retrieves the fully qualified path for the specified module.

DWORD GetModuleFileNameEx(
HANDLE hProcess, // handle to process
HMODULE hModule, // handle to module
LPTSTR lpFilename, // path buffer
DWORD nSize // maximum characters to retrieve
)
;
Parameters
hProcess
[in] Handle to the process that contains the module.
hModule
[in] Handle to the module.
lpFilename
[out] Pointer to the buffer that receives the fully qualified path to the module. If the file name is longer than maximum number of characters specified by the nSize parameter, the file name is truncated.
nSize
[in] Specifies the maximum number of characters to copy to the lpFilename buffer.


 
alexec   (2002-03-19 08:27) [5]

Гадом буду нихрена не работает!!


 
MBo ©   (2002-03-19 08:43) [6]

на delphi.vitpc.com найди главы из книги Пачеко-Тексейры, там есть


 
VuDZ ©   (2002-03-19 12:01) [7]

гадом не буду, но у меня работает:

#include <windows.h>
#include <psapi.h>
#pragma comment(lib, "psapi.lib")
int main(){
DWORD need = 1024;
DWORD *dwPIDs = new DWORD[1024];
EnumProcesses(dwPIDs, need, &need);

char * c = new char[MAX_PATH];
for (int i = 0; i < need; ++i){
HANDLE hProc = OpenProcess(PROCESS_ALL_ACCESS, TRUE, dwPIDs[i]);
ZeroMemory(c, MAX_PATH);
if (hProc){
GetModuleFileNameEx(hProc, (HMODULE)NULL, c, MAX_PATH);
printf("%i - %s\n", dwPIDs[i], c);
}
}
return getch();
}

Если поставить себе привелегию DEBUG, то будет больше процессов

1248 - E:\WINDOWS\Explorer.EXE
1568 - E:\WINDOWS\System32\ctfmon.exe
1612 - E:\Program Files\The Bat!\thebat.exe
996 - E:\Program Files\Internet Explorer\iexplore.exe
660 - E:\Program Files\Forexite QuoteRoom\QuoteRoom.exe
1444 - E:\Program Files\FX Charts Lite\FXCharts.exe
1512 - E:\Program Files\Internet Explorer\iexplore.exe
1624 - F:\Microsoft Visual Studio\Common\MSDev98\Bin\MSDev.exe
2240 - F:\temp\tm\Debug\test.exe



Страницы: 1 вся ветка

Текущий архив: 2002.05.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
1-64699
mike.dld
2002-05-06 14:20
2002.05.20
Delphi 3


14-64833
Oleh
2002-04-12 11:37
2002.05.20
Динамическиє собития


1-64648
Rikoshet
2002-05-03 17:25
2002.05.20
Как в Richedit-е сделать всю строку, на которой стоит каретка, ск


1-64739
AlexGray
2002-05-07 10:24
2002.05.20
Active Directory


3-64505
ZDN
2002-04-16 09:19
2002.05.20
Где взять IB for Novell 4.x, 5.X