[VALERO]

Есть цикл, в котором нужно запускать два паралельных одинаковых потока (с разными параметрами). После их реализации нужно вернуться в главную програму. Потом цикл повторяется.

Как сделать так, чтобы поток не создавать и удалять каждый раз в цыкле? Тоесть, чтобы объявить его перед цыклом один раз и удалить после него... Пробывал с ф-цией waitfor, но она ожидает пока поток закончится и я не знаю, как запустить поток потом обратно(только через Create, который со временем без уничтожения Destroy выдает нехватку памяти)... Тоесть мне нужно либо ф-ция типа waitfor, которая ждет то остановки потока(suspend), или как можно запускать повторно поток. Это все связанно с тем, чтобы увеличить быстродействие, а при каждом создании и уничтажении в цикле программа работает даже дольше чем без потоков...

Огромная просьба помочь с этой проблемой побыстрее. Спасибо.

[lmikle]

На вскидку:
1. Передать в поток некоторый callback, который будет вызван по завершению работы потока (не по завершению самого потока).
2. Внутри потока его не завершать, а просто делать ожидание задания работы. После того, как поток все выполнит, он вызывает переданный callback и переходит в режим ожидания (т.е. пустой цикл).

[Aristarh Dark]

Есть свойство FreeOnTerminate ставь его в истину, поток будет освобождаться по окончании работы самостоятельно.

[VALERO]

Сообщение от Aristarh Dark

Есть свойство FreeOnTerminate ставь его в истину, поток будет освобождаться по окончании работы самостоятельно.

В таком случае не будет работать ф-ция waitfor. Хотя если знаешь как без нее обойтись, скажи...

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

На вскидку:
1. Передать в поток некоторый callback, который будет вызван по завершению работы потока (не по завершению самого потока).
2. Внутри потока его не завершать, а просто делать ожидание задания работы. После того, как поток все выполнит, он вызывает переданный callback и переходит в режим ожидания (т.е. пустой цикл).

Нужно попробывать... А не будет ли поток, который преостановлен, загружать ядро процессора, в то время, когда после него будет запущен другой поток под это ядро? И еще... как сделать, чтобы основная программа ждала остановки потока? Если вызывать какойто колбек, то нужно както проверять в программе, что поток остановлен... Я пока знаю только два способа : через waitfor, который ожидает именно заверщения потока и через цикл, в котором проверяется остановлен ли поток или нет (но это помоему занимает много ресурсов)...

[VALERO]

Ну вот таким образом через некоторое время выскакивает недостаточно памяти

Код:

T1:=TT1.Create(true); //создание 1 потока
T1.FreeOnTerminate:=false;
T1.Priority:=TpNormal;
T2:=TT1.Create(true); //создание 2 потока
T2.FreeOnTerminate:=false;
T2.Priority:=TpNormal;
цикл начинается
T1.Resume;
T2.Resume;
s:=T1.WaitFor;
s:=T2.WaitFor;
T1:=TT1.Create(true);
T2:=TT1.Create(true);

lmikle: последнее китайское предупреждение. Надо тегами пользоваться...

...какоето действие
цикл заканчивается


А если после waitfor удалить их(Free), то не выдает...
Это еще связанно с тем, что я указал FreeOnTerminate:=false; - это для того, чтобы работала ф-ция waitfor....

[lmikle]

А циклы с проверкой флага тебя не устраивают.
Фактически, waitfor это цикл, проверяющий наличие хэндла потока (если правильно помню). А тебе надотпросто проверять какой-либо флаг, выставляемый калбэком.

[Aristarh Dark]

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

В таком случае не будет работать ф-ция waitfor. Хотя если знаешь как без нее обойтись, скажи...

а почему не будет???? в справке же английским по белому написано:

Call WaitFor to obtain the value of ReturnValue when the thread finishes executing. WaitFor doesn't return until the thread terminates, so the thread must exit either by finishing the Execute method or by exiting when the Terminated property is true.

и в догонку: а если ты все равно ждешь окончания работы нити (потока) - то зачем тебе отдельная нить?

[VALERO]

Мне нужно ускорить работу, поэтому я части програмы запускаю в потоки... Мне тут посоветовали восспользоваться PostMessage и в потоке сделать бесконеччный цыкл, сейчас буду пробывать

[Karsh]

Сообщение от Aristarh Dark

и в догонку: а если ты все равно ждешь окончания работы нити (потока) - то зачем тебе отдельная нить?

согласен. нет смысла создавать поток и ждать его завершения в цикле, да и это никак не ускорит работу программы, а наоборот замедлит.