[ined]

Я тут задумался о многопоточности приложения, а стандартный метод мне как-то не понравился. И как обычно я полез в дебри....
В итоге получился вот такой модуль.
Что-же он может:

• Создаёт поток. (Ставит его на паузу)

• Запускает поток(Перезапускает).

• Запускает поток циклично.

• Останавливает цикличный поток.

• Удаляет поток.

Внутри модуля:
WaitForSingleObject - Ловит поток.
ResetEvent - Останавливает поток.
SetEvent - Запускает поток.
-----------------------------------------------------------
Коментарии от Гуру приветствуются.
Может есть ошибки, а они скорей всего есть!

[M.A.D.M.A.N.]

Для чего это нужно? Для каких задач может быть пригодно?
Лично я, например, пользуюсь пулами, объекты-потоки, как таковые, не использую вообще, управление потоками соуществляю через стандартный монитор потоков.

[ined]

Данный модуль создан в познавательных целях. Так как о потоках в интернете маловато нормальной инфы.
Если есть конкретная критика по модулю или я где-то сделал ошибку в коде, пишите.

[M.A.D.M.A.N.]

Плохой у вас интернет значит.

Итак, критика:
1. при создании потока необходимо передавать указатель на процедуру и указатель на параметры — не очень удобно, удобнее было бы сделать замыкания.при создании потока необходимо передавать указатель на процедуру и указатель на параметры — не очень удобно, удобнее было бы сделать, как минимум, замыкания (2010 дельфи должна это уметь);
2. после создания потока на выходее имеем некий идентификатор, который банально можно потерять или он как-то изменится по ошибке, тоже не очень удобно, быыло бы удобнее это обернуть как минимум в некий класс (становится похоже на реализацию класса tthread, не так ли?);
3. если я работаю с критической секцией и мне необходимо приостановить поток до возникновения сигнала — как я это реализую приведенными тобой api (в частности, как мне помогут ф-ии PlayThread и StopThread)?
4. ф-я DestroyThread не дает понятия, что он делает, прерывает выполнение потока с завершением, или же высвободает хендл потока, и надо эту ф-ю использовать в try finally блоке?
5. в каком случае нужен StartСycleThread?
6. будет ли код компилироваться под х64 и другие платформы?
ну и 7-е: каким образом это может понять новичкам принципы работы с потоками и чем это лучше «отсутствующей» нормальной документации по потокам?

[ined]

Ещё раз повторюсь. Модуль создан в познавательных целях.
Это означает что его удобство в использовании и возможность его как-то применить не обсуждаются.
У каждого подход к потокам разный. Кто-то пользуется классом tThread, а кто-то просто CreateThread.
Попытка показать, что вы негативно относитесь к данному "Велосипеду", вам удалась, но всё-же. Ближе к теме.

[M.A.D.M.A.N.]

Ну если ближе к теме, то ответ «плохо» устроит?
Перечень замечаний я выдал, ты отмазался на них отвечать, дальше чего обсуждать, если ты не можешь за свой код ответить? Потому см. строку 1.

[NumLock]

Сообщение от ined

Кто-то пользуется классом tThread, а кто-то просто CreateThread.

Так-то в VCL BeginThread() рекомендуется.