H hn_yxb Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-23 #1 我现在的要求是： 在一个文件夹下面查找后缀名为.vdb文件，再比较日期，然后取最新日期的那个文件。 这么怎么搞？
N nicai_wgl Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-24 #2 TmpPath := '*' + '.vdb'; if FindFirst(TmpPath, faAnyFile, TmpSearchRec) = 0 then begin repeat if ExtractFileExt(TmpSearchRec.Name) = '.vdb' then begin .... end; until FindNext(TmpSearchRec) <> 0; FindClose(TmpSearchRec); end;
TmpPath := '*' + '.vdb'; if FindFirst(TmpPath, faAnyFile, TmpSearchRec) = 0 then begin repeat if ExtractFileExt(TmpSearchRec.Name) = '.vdb' then begin .... end; until FindNext(TmpSearchRec) <> 0; FindClose(TmpSearchRec); end;
H hn_yxb Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-24 #3 to nicai_wgl: 还有一个重要的问题是 怎么比较他们之间的日期呢？
Q qqjm Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-24 #4 FileDateToDateTime 函数 将DOS的日期格式转换为DELPHI的日期格式 FileGetDate 函数 返回文件的DOS日期时间标记
N nicai_wgl Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-24 #5 TmpSearchRec.Time 文件很多的话可以放列表中比较。 楼上的方法也可以。
