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

Вниз

как по изветсному PID процесса получить список его потоков с возм   Найти похожие ветки 

 
Arnold ©   (2004-08-31 11:11) [0]

Пробую следующим образом. Но тут на сколько я понимаю он каждый цикл(2ой repeat) он начинает пробегать все потоки имеющиеся в системе. А как можно сделать чтобы просматривал за один цикл только те потоки которые принадлежат именно его потоку?

hSnap := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS or TH32CS_SNAPTHREAD, 0);
try
  pe.dwSize := SizeOf(TProcessEntry32);
  if Process32First(hSnap, pe) then repeat
   threadstruct.dwSize:=SizeOf(TThreadEntry32);
    if Thread32First(hSnap,ThreadStruct) then
    repeat
     if pe.th32ProcessID=ThreadStruct.th32OwnerProcessID then
     begin
      N:=pe.szExeFile;
      EnumThreadWindows(ThreadStruct.th32ThreadID,@EnumThreadWndProc,0);
     end;
    until
     not Thread32Next(hSnap, ThreadStruct);
  until not Process32Next(hSnap, pe);
finally
  CloseHandle(hSnap);


 
Digitman ©   (2004-08-31 13:02) [1]

никак



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

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

Наверх




Память: 0.46 MB
Время: 0.046 c
3-1095062673
Mitrofan
2004-09-13 12:04
2004.10.10
EhLib DBGrid


3-1095156701
Chery
2004-09-14 14:11
2004.10.10
Базу в Access перевожу на MySQL, Midas


8-1089990457
Serg_lys
2004-07-16 19:07
2004.10.10
ToolButton и Image


3-1095000158
Alex870
2004-09-12 18:42
2004.10.10
Видео в БД


14-1095858515
Mike B.
2004-09-22 17:08
2004.10.10
Модератор на рыбалке