use ShellApi;
copyfile(pchar('newfile.txt',pchar('//computername/direction/target.txt'),false);
use ShellApi;
copyfile(pchar('newfile.txt',pchar('//computername/direction/target.txt'),false);
转载于:https://www.cnblogs.com/djcsch2001/archive/2008/09/10/2035848.html