Внимание! TDateTime 1899

Delphi , Синтаксис , Дата и Время

Для обратной сортировки во многих моих таблицах я использую инвертирование поля типа дата (12/31/9999 минус реальная дата).

В первой версии Delphi все было нормально, но во второй это не сработало, зато вот что я обнаружил в на странице 135 Reference Library Guide:

Delphi 1.0 вычислял дату первого года с 1899. Для преобразования даты Delphi 1.0 в формат даты Delphi 2.0, необходимо вычесть 693594.0 из даты Delphi 1.0. Формат даты был изменен для обеспечения совместимости с OLE 2.0 Automation.

Классическая проблема! Статья обсуждает проблему с расчетами дат в Delphi, конкретно при конвертации дат из Delphi 1.0 в Delphi 2.0.

В Delphi 1.0 год 1900 считался частью года 1899 (поэтому значение TDateTime было равно 1899). Это потому, что григорианский календарь, используемый большинством современных календарей, не учитывал високосный год в году 1900.

Когда разработчики переходили на Delphi 2.0, они обнаружили, что их расчеты дат больше не работали так, как ожидали. Для решения этой проблемы им нужно было вычитать определенное значение из дат, рассчитанных в Delphi 1.0. Это значение было установлено в 693594.0, эквивалентное разнице между значениями TDateTime для 31 декабря 1899 (даты отсечения) и 1 января 1900.

Эта проблема возникла из-за изменения способа хранения дат в Delphi 2.0, чтобы обеспечить совместимость с OLE 2.0 Automation. Новый формат требовал коррекции расчетов дат для учета этой разницы.

В essence статья подчеркивает важность понимания underlying механизмов расчета дат и потенциальных проблем, которые могут возникнуть при обновлении программного обеспечения или систем.

Автор статьи Kenneth D. James уведомляет о том, что в Delphi 1.0 год считался начальным с 1899, а для преобразования даты в формат Delphi 2.0 необходимо вычесть из неё 69,3594.

Комментарии и вопросы

:: Главная :: Дата и Время ::