Главная страница
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.033 c
1-1095848836
webpauk
2004-09-22 14:27
2004.10.10
TPoint


1-1095773917
vigo
2004-09-21 17:38
2004.10.10
Если кто работал с юлианской датой...


11-1081096004
Delphi5.01
2004-04-04 20:26
2004.10.10
To: Владимиром Кладовым


14-1095918599
Lexxx
2004-09-23 09:49
2004.10.10
Мастера, подскажите, можно ли в XP Home поставить IIS 5.0?


14-1095502426
Программер_
2004-09-18 14:13
2004.10.10
Почему много кратный вызов SetWindowRgn Вызыват неправильную