Delphi - 本地路径的创建、清空本地指定文件夹下的文件

本地路径的创建

在做下载操作时,我们一般先把文件下载到本地指定的路径下,然后再做其他使用。

为了防止程序出现异常,我们通常需要先判断本地是否存在指定的路径。

以C盘Tmp文件夹为例,我们可以这样做,代码如下:

1   if not DirectoryExists('C:\Tmp') then
2     if not CreateDir('C:\Tmp') then
3       raise
4         Exception.Create('Opps, Create New Dir Failed!');

 

清空本地指定文件夹下的文件

以C盘Tmp文件夹为例,清空Tmp下所有的文件,我们可以这样做,代码如下:

1 WINEXEC(PCHAR('CMD /C DEL /Q/F C:\tmp\*.*'), SW_HIDE);
2 Sleep(1000);

 

  作者:Jeremy.Wu
  出处:https://www.cnblogs.com/jeremywucnblog/
  本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接,否则保留追究法律责任的权利。

posted @ 2019-08-29 08:13  Jeremy.Wu  阅读(681)  评论(0编辑  收藏  举报