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

本地路径的创建

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

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

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

  if not DirectoryExists('C:\Tmp') then
    if not CreateDir('C:\Tmp') then
      raise
        Exception.Create('Opps, Create New Dir Failed！');

 

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

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

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

 

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