Question

Delphi idhttp创建多个线程怎么实现啊可自定义线程数

我想试下下载远程一个文件 多线程下载 ，主要单线程太慢了
最好能自定义线程数的那种 有进度条显示进度的
我自己写的单线程的， 实在太慢 希望好心人帮看看 如何改多线程可自定义的

procedure TForm1.Button1Click(Sender: TObject);
var
tStream: TMemoryStream;
s:string;
begin

tStream := TMemoryStream.Create;
try
IdHTTP1.Get('http://dlsw.baidu.com/sw-search-sp/soft/dc/23411/dotnetfx35.2792382908.exe', tStream);
tStream.SaveToFile('c:/zend222.rar');
ShowMessage('下载成功!');
application.ProcessMessages;
except
ShowMessage('下载失败！');
end;
tStream.Free;
idhttp1.Free;
end;

end.

Answer 1

一般继承tthread实现自己的线程（读模式），文件按需要启动的线程数均分，或者按固定的块大小切分。具体实现还是要费些手脚的，这点分不够。

追问

求源码啊，第一次接触多线程不懂，分无所谓啊 可以全部给你啊
非常感谢