1.6w+
社区成员
- 全部
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
JeffChung 2008-08-30
copyfile(
pcstr lpexistingfilename, // 源文件路径
lpcstr lpnewfilename, //新文件路径
bool bfailifexists //为true的话,如果新文件已存在,则返回false;
//如果為false的話,如果新文件已經存在,會將原來的覆蓋.
);
函數成功返回true,失敗返回false;
举例:
CopyFile(pChar('sql.txt'),pChar(ExtractFilePath(Application.ExeName) + '2.txt'),true);
pcstr lpexistingfilename, // 源文件路径
lpcstr lpnewfilename, //新文件路径
bool bfailifexists //为true的话,如果新文件已存在,则返回false;
//如果為false的話,如果新文件已經存在,會將原來的覆蓋.
);
函數成功返回true,失敗返回false;
举例:
CopyFile(pChar('sql.txt'),pChar(ExtractFilePath(Application.ExeName) + '2.txt'),true);
pgz_007 2008-08-30
如果是单个复制呢？有没有copyfile函数？
老之 2008-08-30
WinExec('xcopy c:\test\*.txt d:\temp\', SW_HIDE);
