要下载网上一个指定文件,用什么控件最简单和最快?请写出源码 (50分)

  • 主题发起人 主题发起人 609394
  • 开始时间 开始时间
uses URLMon;

function DownloadFile(Source: string; Dest: TFileName): boolean;
begin
try
Result := UrlDownloadToFile(nil, Pchar(Source), Pchar(Dest), 0, nil) = 0;
except
Result := False;
end;
end;
 
陈经韬有个源码,在源码空间,你找找看。
http://www.playicq.com
 
多人接受答案了。
 
后退
顶部