請有"编写断点续传和多线程下载模块"這個源程序?
http://www.ccrun.com/article/go.asp?i=581&d=jk22p5
我按上面這一個來做,頭都大了,還是沒有調試出來,真失敗,
希望能提供以上這個源程序來參考一下
有的話,請發到500800@gmail.com
謝謝
十分感謝!
问题点数:20、回复次数:2Top
1 楼F117p(走两步,你走两步?)回复于 2005-06-04 18:32:05 得分 20
断点须串:先FileExsist查询文件是否存在,然后移动指针
if(FileExsist(FileName))
{
hFile=FileOpen(FileName,fmOpenWrite);
Count=GetFileSize(HANDLE(hFile),NULL);
if(Count>0)
{
FileSeek(hFile,0,2);
InternetSetFilePointer(hRequest,Count,NULL,FILE_BEGIN,NULL);
}
}
else
hFile=FileCreate(FileName);
下载:
调用InternetReadFile,代码绿。
多县城,
tfile1=new TFileThread(Count1,...);
tfile2=new TFileThread(Count2,...);
tfile1->Resume().
...
... Excute()
{ While(!end)Synchroize(DownFileData); }
Top
2 楼BlueCapricorn(修罗)回复于 2005-06-06 09:27:32 得分 0
到网络上查一查一个叫做“电驴”的下载程序,有源代码,Delphi做的。希望能够有帮助。可惜俺忘了^0^;……Top




