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

 

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