[delphi] 复制 删除 移动文件

一、复制文件

CopyFile(pchar('c:\sql.txt'), pchar('d:\sql.txt'), True);

复制文件，false表示替换相同文件，设置成true就不替换

二、删除文件

DeleteFile('e:\xuchao.txt');//在SysUtils单元下

三、移动文件

MoveFile(PChar('c:\sql.txt'), PChar(Dir + '\' + ExtractFileName('c:\sql.txt')));//需要引用 Windows 单元