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:	mp*.*'), SW_HIDE);
2 Sleep(1000);

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

原文地址:https://www.cnblogs.com/jeremywucnblog/p/11427564.html