Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];

Вниз

работа с датами   Найти похожие ветки 

 
CAHbKA   (2003-02-18 07:32) [0]

Как узнать разницу (в секундах) между изменением файла и текущим временем.


 
MBo   (2003-02-18 07:36) [1]

F1 на TDateTime


 
dimonxp   (2003-02-18 10:26) [2]

В RXlib куч фунций по работе с датами


 
han_malign   (2003-02-18 10:42) [3]

примерно так:

uses Windows;
...............
function CmpFT(aFileName: string): int64;
var st: TSystemTime;
ft: TFileTime;
h: THandle;
fd: TWin32FindData;
begin
Result:=0;
h:=FindFirstFile(PChar(FileName),fd);
if((h<>0)and(h<>INVALID_HANDLE_VALUE))then begin
CloseHandle(h);
GetLocalTime(st);
if(SystemTimeToFileTime(st,ft))
then Result:=(int64(ft)-int64(fd.ftLastWriteTime))div 10000;
end;
end;


 
CAHbKA   (2003-02-18 11:14) [4]

Спасибо han_malign. Теперь осталось только на C++builder переложить.
Может еще у кого на чистом API есть варианты.


 
han_malign   (2003-02-18 12:49) [5]

Извиняюсь ... div 10000000 (FileTime в 100-наносекундах)
З.Ы. А это что грязное WinAPI???
function FindFirstFile; external kernel32 name "FindFirstFileA";
function CloseHandle; external kernel32 name "CloseHandle";
procedure GetLocalTime; external kernel32 name "GetLocalTime";
function SystemTimeToFileTime; external kernel32 name "SystemTimeToFileTime";
.............


 
Izyum   (2003-02-18 14:50) [6]

Точно не помню синтаксис, чего-то вроде DateTimeToDateStump. Поищи в хелпе - там все просто до безобразия


 
CAHbKA   (2003-02-19 05:23) [7]

я имел ввиду TFileTime...



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

Форум: "Основная";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.006 c
4-87761
Шоломицкий
2003-01-12 22:52
2003.02.27
PlaySound


1-87525
Sharik_212
2003-02-14 20:20
2003.02.27
Прозрачный CheckBox


14-87681
Manulo
2003-02-11 13:32
2003.02.27
Help, please необученому студенту!


14-87683
Мазут Береговой
2003-02-11 11:47
2003.02.27
Интересно, а кто первый придумал программу


1-87516
stikriz
2003-02-16 00:28
2003.02.27
RTTI





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский