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

Вниз

Как из FD : TWin32FindData - получить дату в формате TDateTime   Найти похожие ветки 

 
frost ©   (2003-12-28 20:17) [0]

Получаю Handle файла используя FindFirstFile дальше имею структуру
FD : TWin32FindData надо дату записанную в FD.ftLastAccessTime преобразовать к формату TDateTime. Чего то у меня не получается Спасибо!


 
dmk ©   (2003-12-28 21:03) [1]

YourTDateTime := SystemTimeToDateTime(TWin32FindData.ftCreationTime);


 
frost ©   (2003-12-28 22:04) [2]

Нет TWin32FindData.ftCreationTime - FILETIME
SystemTimeToDateTime ожидает SYSTEMTIME


 
frost ©   (2003-12-28 22:14) [3]

Пишу

GetFileTime(FH, nil, nil, @aAccess);
FileTimeToSystemTime(aAccess, bAccess);
label1.Caption:=DateToStr(SystemTimeToDateTime(bAccess));

Выдает ерунду, смущает 1789 год :(

Но пока писал решил попробывать

FileTimeToSystemTime(FD.ftLastAccessTime, bAccess);
label1.Caption:=DateToStr(SystemTimeToDateTime(bAccess));

ВСЕ OK, в чем дело ???
где
FD : TWin32FindData;
bAccess : TSystemTime;


 
frost ©   (2003-12-29 06:01) [4]

Черт, и все равно получается какаято ерунда смотри дату последнего открытия explorer.exe в директории windows у меня получается 28.12.2003 в свойствах 29.12.2003 - HELP!!!


 
Rad ©   (2003-12-29 09:21) [5]

Часовой пояс, наверное, влияет
См FileTimeToLocalFileTime



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

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

Наверх




Память: 0.47 MB
Время: 0.02 c
3-12290
Anton
2004-02-07 13:12
2004.03.05
Транзакзии на IB


3-12251
Layner
2004-02-09 13:18
2004.03.05
Как работать с XML файлом, как с таблицей БД?


1-12421
VID
2004-02-23 00:42
2004.03.05
Добавление файла в ресурсы


11-12312
avakss
2003-06-19 10:33
2004.03.05
FTPSERVER


1-12380
Laymer
2004-02-25 07:45
2004.03.05
Числа с плавующей запятой.