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);