复制函数，文件复制函数。 其基本结构为以下：
版权文件(
lpcstr lpexistingfilename，//源文件路径
lpcstr LP new文件名称，//新文件路径
如果bool bfailifexists //为true，则如果新文件已经存在，则返回false； 如果为false，则如果新文件已经存在，将复盖原始文件。
)；
函数返回true，失败返回false；
例：
版权文件(pchar (SQL.txt )、pchar (extract file path ) application.exename )、2.txt )、true )；
稍后的实验表明，可以在源文件前不添加pChar函数进行转换，但不能进行新文件，会发生类型转换错误。 如果不在源文件名称前添加路径，则默认值为
在程序的这个目录中。
因为函数返回布尔型，所以也可以这样写：
if copyfile (d :/yun _ yue/SQL.txt )，pchar ) extractfilepath ) application.exename (.txt )，true ) )
//然后，请确认文件路径正确。 否则，函数返回将失败。
show message (压缩完成！ ' )
else
showmessage('copyfilefailed！' )；
CopyFile函数还可以与网络相邻的文件复制。 使用上述示例，可以将格式更改为：如下所示
if copyfile (/sh-sfis/yun _ yue/yun _ yue/copy text.txt )，pchar ) extractfilepath (应用程序. exename ) )
//如果函数的第三个自变量设置为false，则会复盖位于我的原始APP应用程序手册目录下的“2.txt”文件
show message (压缩完成！ ' )
else
showmessage('copyfilefailed！' )；
容易忽略的是最后一个参数，笔者经常犯这个错误。