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

Вниз

Поиск файла   Найти похожие ветки 

 
Ezhik   (2004-09-16 18:08) [0]

Вобщем я нашел файлы и папки с помошью FindFirst, FindNext. Теперь весь список атрибутов и т.д. хранитса в переменной типа TSearchRec. Я все понимаю, но как мне перевести тип REC.FindData.ftCreationTime: _FILETIME в String???
Спасибо!!!!


 
sniknik ©   (2004-09-16 18:23) [1]

> Я все понимаю, но как мне перевести тип REC.FindData.ftCreationTime: _FILETIME в String???
завидую... понять все(!) это же круто, на мелочи внимания не обращай, ну подумаеш одна непонятка. ;о)

DateTimeToStr(FileDateToDateTime(REC.FindData.ftCreationTime))


 
Ezhik   (2004-09-16 19:20) [2]

А сам то порбывал??? Компилятор выдает ишибку несовместимости типов ЕDateTime и _FILETIME!!!


 
begin...end ©   (2004-09-16 19:28) [3]

function FileTimeToDateTime(FileTime: TFileTime): TDateTime;
var
 SystemTime: TSystemTime;
 LocalTime: TFileTime;
begin
 FileTimeToLocalFileTime(FileTime, LocalTime);
 FileTimeToSystemTime(LocalTime, SystemTime);
 Result := SystemTimeToDateTime(SystemTime);
end;


 
Ezhik   (2004-09-16 20:01) [4]

ооо, эт тошо нада!!! Спасибо.


 
Fay ©   (2004-09-16 20:04) [5]

2 Ezhik   (16.09.04 18:08)
У тебя F1 не работает?



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

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

Наверх




Память: 0.47 MB
Время: 0.036 c
1-1097017042
Kirilllius
2004-10-06 02:57
2004.10.17
TreeView


3-1095423240
pashaz
2004-09-17 16:14
2004.10.17
DBWARE Для ZEOS


1-1096532602
awp
2004-09-30 12:23
2004.10.17
Invalid Pointer Operation при вызове DLL


1-1096549347
roma
2004-09-30 17:02
2004.10.17
Button1 i Button2


4-1095073086
UsAd
2004-09-13 14:58
2004.10.17
Запуск процесса