Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.06.03;
Скачать: CL | DM;

Вниз

Как узнать дату изменения файла?   Найти похожие ветки 

 
vamp_avp   (2007-05-14 08:51) [0]

Здравствуйте дорогие знатоки и знаточки делфи!
Модскажике как можно найти дату изменения файла!
Заранее благодарен!


 
MBo ©   (2007-05-14 08:58) [1]

FindFirst + TSearchRec.FindData


 
vamp_avp   (2007-05-14 09:02) [2]

Всем спасибо, сам нашел!

Для выяснения даты последнего изменения файла можно воспользоваться следующей функцией:

function GetFileDate(FileName: string): string;var  FHandle: Integer;begin  FHandle := FileOpen(FileName, 0);  try    Result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle)));  finally    FileClose(FHandle);  end;end;

сам только что проверил, работает!
Всем спасибо!


 
Desdechado ©   (2007-05-14 11:21) [3]

Вообще-то на NTFS у файла 3 даты. Какую тебе надоть?

ЗЫ приведенный "найденныЙ" код ужасен.


 
Плохиш ©   (2007-05-14 11:24) [4]


> vamp_avp   (14.05.07 09:02) [2]

FindFirstFile даёт три даты, не требуя открытия этого файла...



Страницы: 1 вся ветка

Текущий архив: 2007.06.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.047 c
4-1167294371
iXT
2006-12-28 11:26
2007.06.03
WinNT Accounts


2-1178941012
Iv_
2007-05-12 07:36
2007.06.03
Цветная бегущая строка


3-1173958678
SergTT
2007-03-15 14:37
2007.06.03
Как обойти ситуацию с заполнением значения ключевого поля


2-1179215722
asd_
2007-05-15 11:55
2007.06.03
Русская кодировка в DBF


2-1179000044
WebSQLNeederr
2007-05-13 00:00
2007.06.03
Сохранить картинку с инета на жесткий диск