对比文件的修改时间

RT怎么判断哪个文件时最新修改的？

解决方案 »

  1.   

    挨个查找文件，然后比较时间大小，findnext，findfirst，看帮助中就有代码
      

  2.   


    //未测试，自己试试看看！
    function GetFileModifyTime(const strFileName: string): TDateTime;
    var
      Tp:TSearchRec; //申明Tp为一个查找记录
      Tct:_SystemTime;
      Temp:_FileTime;
    begin
      FindFirst(strFileName,faAnyFile,Tp); { 查找目标文件 }
      FindClose(Tp);  FileTimeToLocalFileTime(Tp.FindData.ftLastWriteTime,Temp);
      FileTimeToSystemTime(Temp,Tct);
      result:=SystemTimeToDateTime(Tct);
    end;
      

  3.   

    举个例子取得文件修改时间，至于判断哪个是最新的，自己写一下！
    使用1楼FindNext，用一个循环去查找！
      

  4.   

    不需要循环啊，我已经得到C:\a.txt的修改时间2010-7-26 11:41:16，也得到了d:\a.txt的修改时间2010-7-25 17:45:23  怎么对比这个时间？
      

  5.   

    如果是TDateTime的话，直接比较大小就可以！