Чтобы узнать время последнего изменения файла, можно воспользоваться следующей функцией на Delphi:
function FileLastWrite (const filename : string) : string; var FileHandle : THandle; LocalFileTime : TFileTime; DosFileTime : DWORD; LastAccessedTime : TDateTime; FindData : TWin32FindData; begin Result := ''; FileHandle := FindFirstFile(PChar(filename), FindData); if FileHandle <> INVALID_HANDLE_VALUE then begin Windows.FindClose(FileHandle); if (FindData.dwFileAttributes and FILE_ATTRIBUTE_DIRECTORY) = 0 then begin FileTimeToLocalFileTime(FindData.ftLastWriteTime, LocalFileTime); FileTimeToDosDateTime(LocalFileTime, LongRec(DosFileTime).Hi,LongRec(DosFileTime).Lo); LastAccessedTime := FileDateToDateTime(DosFileTime); Result := DateTimeToStr(LastAccessedTime); end; end; end;