寻找带源码的多线程的 ftp 或 http 下载 DELPHI5 控件。(300分)

如果把netants作为控件该多好。呵呵。

顺便找一下mftp下载的例子。

我用 mftp 老出错，不知什么原因。

ics里有ftp和http的控件
至于多线程嘛，估计得你自己改了

其实netants和net vampire都提供了COM接口，
你可以直接调用它的功能来下载，跟控件也差不多的
你要干什么呢

?

ICS:
http://www.rtfm.be/fpiette/indexuk.htm
至于多线程，在子线程中创建、使用，不会和其他线程的干扰

左轻侯兄，
如果 netants 和net vampire都提供了COM接口，可否简要介绍如何使用.
使用 com 接口时，会弹出 com 自己的画面么 ?

g

peta，你跑netants的站点看看就知道什么回事啦，只要你在netants中设好不提示增加、删除任务之类的就不会弹出来了
就是这样子用啦，支持netants和吸血鬼的
procedure tfrmudp.downloadbysoft(soft, fileurl: string); //download by soft like Netants or Netvampire
var
nv, na: Variant;
begin
if soft = 'nv' then
begin
CoInitialize(nil);
try
NV := CreateOleObject('Vampire.NewJob');
if VarType(NV) <> varDispatch
then raise Exception.Create('Cannot connect to Net Vampire');
NV.Initialize('', fileurl);
finally
CoUninitialize;
end;
end
else
if soft = 'na' then
begin
CoInitialize(nil);
try
Na := CreateOleObject('netants.api');
if VarType(na) <> varDispatch
then raise Exception.Create('Cannot connect to NetAnts');
na.addurl(fileurl, '', '');
finally
CoUninitialize;
end;

end;
end;

Thanks honghs, 但如何又能知道下载的文件是否已经完成。

listen

to peta:我也不在知道如何判断文件下载完成或者失败了
netants和吸血鬼的站点上都不提供这方面的资料，要不你只能打开他们的下载记录来
判断文件是否已下载完成了

peta:如果你还要继续讨论请定期提前你的帖子，如果不想继续讨论请结束帖子。

用httpscan控件,由源码,多线程,可以开发离线浏览器

where httpscan ?

多人接受答案了。