• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    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);

    知识点扩展:Delphi - 创建text文件并添加数据到文件中

    创建文本文件

    代码如下:

     //创建一个文本文件
    procedure CreateTextFile();
    var
     TF: TextFile; 6 begin 8  AssignFile(TF,'C:\tmp\1.txt');
     ReWrite(TF);
     CloseFile(TF);
    end;

    向文本文件中添加内容

    代码如下:

    //向文本文件中追加内容
    Procedure AppendText(str: String);
    var 
     TF: TextFile; 
    begin 
     assignfile(TF,'C:\tmp\1.txt'); 
     rewrite(TF); 
     append(TF);//TMP中如不存在1.TXT这个文件,会自动创建
     writeln(TF, str);
     closefile(TF); 
    end;
    

    总结

    以上所述是小编给大家介绍的Delphi 本地路径的创建、清空本地指定文件夹下的文件,希望对大家有所帮助,如果大家有任何疑问请给我留言,小编会及时回复大家的。在此也非常感谢大家对脚本之家网站的支持!
    如果你觉得本文对你有帮助,欢迎转载,烦请注明出处,谢谢!

    您可能感兴趣的文章:
    • delphi制作wav文件的方法
    • Delphi实现木马文件传输代码实例
    • Delphi用TActionList实现下载文件的方法
    • Delphi中判断文件是否为文本文件的函数
    • Delphi建立、读取、存贮INI文件的方法《一》
    • delphi建立、读取、存贮INI文件的方法《二》
    • delphi建立、读取、存贮INI文件的方法《三》
    上一篇:滑动验证码的设计与理解
    下一篇:Delphi - Indy idMessage和idSMTP实现邮件的发送
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

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