注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

love3400wind的blog

like

 
 
 

日志

 
 
 
 

Delphi ForceDirectories() 函数的用法  

2012-11-05 13:27:27|  分类: IT |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

ForceDirectories()

  ForceDirectories(Dir)是Delphi和bcb中用来创建一个目录的函数。 支持多级目录。 编辑本段 说明

  bool ForceDirectories(AnsiString Dir);   返回:返回创建目录是否成功。   参数:Dir是创建目录路径。如:"D:\\aaaa\\bbb" 编辑本段 与CreateDir区别

  ForceDirectories创建多级目录,父目录不必存在。而CreateDir只创建最后一级目录,父目录必须存在。相当于Java中File中的mkdirs和mkdir的区别。 编辑本段 例子

  String dirPath="D:\\aaa\\bbb";   if(!DirectoryExists(dirPath)) //如果目录不存在   {   ForceDirectories(dirPath);   }

ShowMessage('开始');
str := 'D:\aaa\bbb\f.raw';
ShowMessage(ExtractFileDir(str));
fileDir := ExtractFileDir(str) ;

if not DirectoryExists(fileDir) then
begin
bool := ForceDirectories(fileDir);
if bool then
begin
ShowMessage('创建目录成功' + fileDir);
end
else
begin
ShowMessage('创建目录失败' + fileDir);
end;
end
else
begin
ShowMessage('不需要创建');
end;

  评论这张
 
阅读(406)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017