代码之家  ›  专栏  ›  技术社区  ›  Andrew Rumm

如何在Delphi中递归创建文件夹?

  •  19
  • Andrew Rumm  · 技术社区  · 15 年前

    在创建函数时需要一些帮助,该函数可以使用给定路径递归创建文件夹:

    C:\TestFolder\Another\AndAnother
    

    Delphi函数mkdir返回ioerror=3。

    MkDir('C:\TestFolder\Another\AndAnother');
    
    1 回复  |  直到 13 年前
        1
  •  61
  •   Andreas Rejbrand    15 年前

    使用

    ForceDirectories('C:\TestFolder\Another\AndAnother');
    

    (这是一个标准的rtl函数,可以在sysutils.pas中找到。因此,您不需要创建自己的函数,即使这并不困难。)