СОРТИРОВКА ДАТ DELPHI

В Delphi для сортировки дат используется стандартная функция Sort:

Sort(MyDatesArray);

Функция Sort сортирует массив MyDatesArray по возрастанию. Для сортировки по убыванию необходимо передать в качестве второго параметра функцию Compare в обратном порядке:

Sort(MyDatesArray, DescendingCompareFunction);

Функция DescendingCompareFunction должна сравнивать две даты и возвращать -1, 0 или 1 в зависимости от того, какая дата должна идти раньше. Пример реализации:

function DescendingCompareFunction(const Left, Right: TDateTime): Integer;
begin
if Left > Right then
Result := -1
else if Left < Right then
Result := 1
else
Result := 0;
end;

37 Delphi 7 Win32 Компоненты DateTimePicker, MounthCalendar

#6 Программирование в Delphi. Массивы

Сортировка документов по дате, инстанции и степени влияния на дело

Урок на делфи 71. работа с датой (date)

Delphi программирование Урок №3 - Время и Дата

#1. отрывок платного урока. Типизированные файлы и работа с разными компонентами

(Создание БД) 8. Фильтрация записей в базе данных Delphi

Реклама
Новое
Реклама