Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2004.10.10;
Скачать: [xml.tar.bz2];

Вниз

как по изветсному 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 вся ветка

Форум: "WinAPI";
Текущий архив: 2004.10.10;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.036 c
3-1095238218
Medik
2004-09-15 12:50
2004.10.10
INNER JOIN, OUTER JOIN


14-1095436250
Igorek
2004-09-17 19:50
2004.10.10
Проблема с сетевым принтером HP LaserJet 2300d


4-1094233172
musk
2004-09-03 21:39
2004.10.10
ширина текста-подсчет


14-1095281471
Marser
2004-09-16 00:51
2004.10.10
Рома-Динамо


14-1095717751
VAmpiro$
2004-09-21 02:02
2004.10.10
Что такое "Hendle" и как с ним боротся?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский