delphi DeleteFile 函数删除硬盘中的文件
4.DeleteFile 函数
DeleteFile 函数将一个文件从记录盘上删除,如果文件不存在或无法删除,则返回False。函数原型如下:
function DeleteFile(const FileName: string): Boolean;
实现删除一个文件的过程的代码如下:
if OpenDialog1.Execute then
if DeleteFile(OpenDialog1.FileName) then
ShowMessage(’删除文件成功’)
else
ShowMessage(’删除文件失败’);