delphi 创建多级目录

本文整理自网络，侵删。

 
function MyCreateDir(const Path: String): Boolean;
begin
  // 建目录
  if DirectoryExists(Path) then
    Result := True
  else
    Result := ForceDirectories(Path);
end;
 

相关阅读 >>

Delphi 将自己的app.ico应用程序图表添加到dephi资源文件res中

Delphi强制关闭执行程序(杀进程)

Delphi 异或加解密

Delphi实现tedit控件的外观只有一条下划线

dbgrid的cellclick事件，单击当前行记录的那一行时，不发生

Delphi gridpanel percent百分比设置

Delphi中输入法模式imemode属性的解释

Delphi中用idhttp获取json数据乱码问题

Delphi穿墙自启动下载者4.0

Delphi setprivilege 提权代码

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 创建多级目录