Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Определние файла наименьшего размера.


AlexanderMS ©   (2006-09-03 18:18:00) 

Ищу файлы с помощью FindFirst и FindNext. Скажите, пожалуйста, как найти самый старый файл?


Zeqfreed   (2006-09-03 19:16:00) [1]

Time содержит дату и время последней записи файла в DOS-формате, как показало вскрытие :)


Zeqfreed   (2006-09-03 19:12:00) [2]

> [6] AlexanderMS ©   (03.09.06 19:05)


> Ещё одно уточнение: нужно определить файл с самой ранней
> датой и временем создания.

Ну да, тогда используй SR.FindData.ftCreationTime.


AlexanderMS   (2006-09-03 19:05:00) [3]

> Zeqfreed ©   (03.09.06 18:46) [4]

Итак, я использую FileDateToDateTime, передаю в качестве параметра SR.Time( SR: TSearchRec), а затем просто сравниваю. Так?

Ещё что такое:

SR.FindData.ftCreationTime.dwLowDateTime
SR.FindData.ftCreationTime.dwHighDateTime


Зачем это? Просто сомневаюсь, что Integerхватит для хранения и даты, и времени. Если да, то зачем эти 2 поля?

Да ладно, сейчас попробую [4].

Ещё одно уточнение: нужно определить файл с самой ранней датой и временем создания.


AlexanderMS   (2006-09-03 18:47:00) [4]


> Опреде лние файла наименьшего размера.

Только сейчас заметил!
Пардон!
На уме - одно, пишу другое. :))

Определение самого старого файла.


Zeqfreed   (2006-09-03 18:46:00) [5]

> [3] AlexanderMS ©   (03.09.06 18:42)

Time contains the time stamp of the file. It can be converted to a TDateTime value using FileDateToDateTime.

Преобразование в TDateTime для выбора новейшего файла не потребуется.


AlexanderMS   (2006-09-03 18:42:00) [6]

Zeqfreed ©   (03.09.06 18:21) [1]

В том-то и дело, что не только время, но и дату учитывать нужно. А где дата?


Zeqfreed   (2006-09-03 18:21:00) [7]

TSearchRec = record
    Time: Integer;
   Size: Integer;
   Attr: Integer;
   Name: TFileName;
   ExcludeAttr: Integer;
   FindHandle: THandle;
   FindData: TWin32FindData;
end;


?


Palladin   (2006-09-03 18:21:00) [8]

:) наименьший не значит что самый старый, а самый старый не факт что самый наименьший

в любом случае задача для детей младшего школьного возраста

должны использоватся временные переменные которые, будут содержать наименьший размер/дату создания
пользоватся нужно конструкцией if/then
использовать операторы сравнения и присваивания


Наверх

Титульная страница Поиск, карта сайта Написать письмо