ошибка в уничтожении потока Delphi+Thread+TerminateThread [D6, WinXP]
Страницы:
<
1
2
3
>
Delphi5.01 © (2006-05-31 06:13:00)
Хотя в конкретном моем случае речь идет о Delphi, но думаю
вопрос больше общий так как касается API функции, которые
одинаковые как по синтаксису так и среде использованию для всех
(почти) языков. Дело касается потоков и функции
TerminateThread(thread.Handle, 0);
Теперь немного о моей программе. В программе есть потоки
которые выполняют некую работу. Допустим качают данные с какого-то
сайта. Назовем его "поток скачки". Так как у скачки должен быть
timeout, я "поток скачки" поместил в другой поток который сделал за
временем, и в случае его истечения заверещал "поток скачки"
аварийно, TerminateThread("поток скачки".handle, 0); Назовем этот
"поток проверки".
В итоге что бы выполнить задания закачки одновременно я
создавал несколько "потоков проверки" и ждал пока они все закончат
работу. Результат мог быть или положительный, а значит "поток
скачки" завершил работу удачно, либо отрицательный, не смогли
скачать или кончилось время. После чего данный "поток проверки"
убивался также функцией TerminateThread("поток проверки".handle,
0); после чего заново запускался но уже с новыми параметрами.
Но при тестировании и наблюдениями за поведением кода, было
замечено что после того как первые 10 "потоков проверки" (а это был
массив) завершал работу и запускались новые 10 потоков некоторые
вообще исчезали. Другими словами есть подозрение что функция
TerminateThread убивала больше одного потока за раз! Так как при
подсчете, а я учитывал когда поток заканчивал работу, разница была
в 50%. Толи потоки не могли быть убиты, толи наоборот их убили
случайно :-)
Одним словом, конечно сложно что-то советовать прочитав выше
указанный алгоритм, но может у вас была похожая ситуация? И вообще
как можно завершить работу потока аварийно. Что бы наглухо, так как
алгоритм Thread.Teriminate не подходит, он завершает работу только
после того как внутренние компоненты (созданные в потоке) завершат
работу.
Заранее благодарю всех сначала за время потраченное на
прочтение такого большого текста и потом за ответ :-)
Delphi5.01 (2006-05-31 06:29:00) [41]
Должно быть:
...поток который следит за временем...
Страницы:
<
1
2
3
>
Наверх 
ЧАТ |
Орешник |
|
