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

Вниз

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

 
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 вся ветка

Форум: "WinAPI";
Текущий архив: 2004.10.17;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.034 c
1-1096814924
V l a d i m i r
2004-10-03 18:48
2004.10.17
Экземпляр формы (создание)


3-1095766322
Adnrei
2004-09-21 15:32
2004.10.17
Microsoft SQL Сервер


1-1096895878
Idoga
2004-10-04 17:17
2004.10.17
Отключиться от Excel


1-1096965334
jeka
2004-10-05 12:35
2004.10.17
Разница между двумя датами


8-1090748068
Окна
2004-07-25 13:34
2004.10.17
Допустим есть два окна, одно перекрывает другое..





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский