var
Threads : array of TWebThread;
i:integer;setlength(Threads,listbox.count+1);for i:= 0 to listbox1.count-1{count: 2 rows} do
begin
Threads[i] := TWebThread.Create(i,memo1); //创建3条线程
end;这些没问题,现在我关闭掉其中两条, 例如Threads[2]和Thread[0], Thread[1]还在运行.问题来了,我现在又要开启一条新线程, 如何从Threads数组里面找到一条或多条空闲的线程编号,重新创建呢? Threads[?] := TWebThread.Create(i,memo1);