[ApxaHGe1]

Здравствуйте, есть поток, в котором выполняется определнный код

Код:

procedure TMyThread1.DoWork;
begin
for i:=0 to Form1.Listbox1.items.count - 1 do
begin
// 
end;
end;

Суть в том что после каждого итема взятого из лист бокса мне нужно сделать паузу в 30 секунд, и следовательно если итемов > 100 то процесс займет значительно долгое время!
Уважаемые знатоки, вопрос: "Как сделать мой этот цикл в 10 потоках? или более" ?

Отвечает...

[Pyro]

В потоках не шарю, но я бы сделал, чтобы поток работал с одним итемом, который при создании ему передается, и при нажатии на кнопку создать по потоку на каждый итем

[ApxaHGe1]

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

В потоках не шарю, но я бы сделал, чтобы поток работал с одним итемом, который при создании ему передается, и при нажатии на кнопку создать по потоку на каждый итем

Думаю 10.000 потоков будет круто, не правда ли ?

[Aristarh Dark]

Я в потоках шарю, но все равно не могу понять в чем задача заключается.

[ApxaHGe1]

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

Я в потоках шарю, но все равно не могу понять в чем задача заключается.

Запустить мой цикл в 10 потоках

Я сейчас создал массив потоков, вроде все нормально, но каждый из потоков берет одинаковый итем из ЛистБокса, что не желательно...

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

Можно создать n-е кол-во потоков с такимусловием, что кадый поток будет обрабатывать свой диапазон айтемов.
Или я чето не понимаю в твоей %PROGRAM%.