您现在的位置:首页 >> 硬件系统 >> 硬件系统 >> 内容

Delphi文件操作所涉及的一些函数(2)

时间:2011/9/3 15:20:08 点击:

//判断文件是否存在 FileExists   
var  
  f: string;   
begin  
  f := 'c:\temp\test.txt';   
  if not FileExists(f) then  
  begin  
   //如果文件不存在   
  end;   
end;    
       
  
//判断文件夹是否存在 DirectoryExists   
var  
  dir: string;   
begin  
  dir := 'c:\temp';   
  if not DirectoryExists(dir) then  
  begin  
   //如果文件夹不存在   
  end;   
end;    
   

  
//删除文件 DeleteFile; Windows.DeleteFile   
var  
  f: string;   
begin  
  f := 'c:\temp\test.txt';   
//DeleteFile(f);  //返回 Boolean   
  
//或者用系统API:   
  Windows.DeleteFile(PChar(f)); //返回 Boolean   
end;    
   

上一页1234567下一页

作者:webfly 来源:转载
共有评论 0相关评论
发表我的评论
  • 大名:
  • 内容:
  • 盒子文章(www.2ccc.com) © 2024 版权所有 All Rights Reserved.
  • 沪ICP备05001939号