Как выяснить дату последнего изменения файла? |
Previous Top Next |
Code: |
function GetFileDate(FileName: string): string; var FHandle: Integer; begin FHandle := FileOpen(FileName, 0); try Result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle))); finally FileClose(FHandle); end; end;
|
©Drkb::03141
Взято с сайта http://blackman.wp-club.net/