delphi 中如何获得一个文件及文件夹的各种属性

解决方案 »

  1.   

    [DELPHI]处理文件属性
    attr:=filegetattr(filelistbox1.filename);
    if (attr and faReadonly)=faReadonly then ... //只读
    if (attr and faSysfile)=faSysfile then ... //系统
    if (attr and faArchive)=faArchive then ... //存档
    if (attr and faHidden)=faHidden then ... //隐藏
      

  2.   

    http://expert.csdn.net/Expert/topic/1515/1515339.xml?temp=.3538782
      

  3.   

    1. 在interface下的uses中引用filectrl单元2. 首先取文件属性
        var        attr     : integer;        filename : string;    begin        filename := 'myfile';        attr     := FileGetAttr(filename);    end;3. 设置文件属性(如设置归档属性 -> faArchive )
       
        attr := attr or faArchive;    //如要去掉某一属性,则如下句    attr := attr and (not faArchive);    //保留其它属性    if FileSetAttr(filename, attr)=0 then        //成功代码    else        //失败代码4. 附文件属性常量
        Constant Value Description
        faReadOnly $00000001 Read-only files 只读文件
        faHidden $00000002 Hidden files 隐藏文件
        faSysFile $00000004 System files 系统文件
        faVolumeID $00000008 Volume ID files 卷标文件
        faDirectory $00000010 Directory files 目录
        faArchive $00000020 Archive files 归档文件
        faAnyFile $0000003F Any file 任意文件
      

  4.   

    转的太乱
    重发一篇1. 在interface下的uses中引用filectrl单元2. 首先取文件属性
    var
            attr     : integer;
            filename : string;    
    begin
            filename := 'myfile';
            attr     := FileGetAttr(filename);
    end;3. 设置文件属性(如设置归档属性 -> faArchive )
       
        attr := attr or faArchive;    //如要去掉某一属性,则如下句    
        attr := attr and (not faArchive);    //保留其它属性    
        if FileSetAttr(filename, attr)=0 then        
            //成功代码    
        else 
           //失败代码4. 附文件属性常量
        Constant Value Description
        faReadOnly $00000001 Read-only files 只读文件
        faHidden $00000002 Hidden files 隐藏文件
        faSysFile $00000004 System files 系统文件
        faVolumeID $00000008 Volume ID files 卷标文件
        faDirectory $00000010 Directory files 目录
        faArchive $00000020 Archive files 归档文件
        faAnyFile $0000003F Any file 任意文件
      

  5.   

    用一个常用函数就可以搞掂:
    文件属性:
    function FileGetAttr(const FileName: string): Integer;
      

  6.   

    那么象.DOC文件中的 
    文件名 作者 创建时间 访问时间 标题 主题 关键字等等
    是如何获得的呀
      

  7.   

    回 flyhot(阳光清晨) :
       仍然不能得到文件名 作者  标题 主题 关键字等信息