如何实现:将已知下载地址的文件下载到本地目录,覆盖该目录下的同名文件?(100分)

A

asaili

Unregistered / Unconfirmed
GUEST, unregistred user!
如何实现:将已知下载地址的文件下载到本地目录,覆盖该目录下的同名文件?

请哪位大侠给我点代码学习?
logcom@21cn.com
 
procedure button1click(sender:Tobject);
var furl,fpath:array of char;
begin
furl:=你的下载位置;
fpath:=缺省目录;
ShellExecute(handle,nil,furl,nil,fpath,0);
end;
 
接受答案了.
 
顶部