CopyFile(Pchar(Application.ExeName),Pchar('D:\test.exe'),False); [url]http://www.delphibbs.com/delphibbs/dispq.asp?lid=1391019[/url] 转载于:https://blog.51cto.com/sally/47707