Решение проблемы с конвертацией дат из TDateTime в Delphi для Java-приложений

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

Вопрос, поднятый пользователем, связан с необходимостью конвертации дат из компонента TDateTime в Delphi в формат, который можно использовать в Java-приложении. Основная проблема заключается в том, что значения дат в Delphi представлены в виде вещественных чисел, начиная с базовой даты 30 декабря 1899 года. Пример кода, который предполагался для конвертации, не дает корректного результата, что может быть связано с различными способами учета високосных годов в Java и Delphi.

Контекст задачи

Разработчик Java-приложения сталкивается с проблемой при обмене данными с Delphi-приложением. Delphi-приложение отображает даты в пользовательском интерфейсе, которые затем должны быть переданы в Java-приложение через файл. Вместо ожидаемых строковых представлений дат в формате UTC или другого, Delphi-приложение экспортирует вещественные числа, предполагаемые как внутренние значения TDateTime. Пример:

• UI: 10/07/2014 -> Export: 41919,00
• UI: 05/31/2017 -> Export: 42887,00
• UI: 09/30/2015 -> Export: 42277,00
• UI: 08/31/2016 -> Export: 42613,00

Известно, что TDateTime в Delphi использует 30/12/1899 как начальную точку отсчета. Предполагается, что следующий код на Java должен выполнить конвертацию:

Calendar c = Calendar.getInstance();
c.set(1899, 11, 30, 0, 0);
c.add(Calendar.DATE, <FloatingPoint>);
SimpleDateFormat sdf = new SimpleDateFormat();
System.out.println(sdf.format(c.getTime()));

Однако результаты конвертации некорректны, например:

• Export: 41919,00 -> Java: 10/07/14 00:00 (верно)
• Export: 42887,00 -> Java: 06/01/17 00:00 (неверно, на 1 день меньше)
• Export: 42277,00 -> Java: 09/30/15 00:00 (верно)
• Export: 42613,00 -> Java: 08/31/16 00:00 (верно)

Пользователь предполагает, что проблема может быть связана с разными методами учета високосных годов в Java и Delphi, но конкретное решение не найдено.

Подтвержденный ответ

program Project1;
{$APPTYPE CONSOLE}
uses
  DateUtils;
var
  t : TDateTime;
  d : double;
begin
  t := EncodeDateTime(2017,05,31,0,0,0,0);
  d := t;
  WriteLn(d);
  ReadLn;
end.

Вывод программы показывает значение 42886, а не 42887, как указано в исходных данных. Предполагается, что скриншоты и экспортируемые файлы могут быть не совсем точными.

Решение проблемы

Для корректной конвертации дат из TDateTime в Delphi в формат, понятный Java, необходимо учитывать разницу в представлении дат в этих двух средах. В Delphi даты представлены в виде количества дней, прошедших с 30 декабря 1899 года, в то время как в Java даты представлены в виде объектов java.util.Date или java.sql.Date, которые используют другие базовые даты (обычно 1 января 1970 года для java.util.Date).

Для решения проблемы можно использовать следующий алгоритм:

1. Получите значение TDateTime из Delphi-приложения.
2. Вычислите разницу в днях между базовой датой Delphi и базовой датой Java.
3. Прибавьте полученное значение к базовой дате Java для получения корректного значения в Java.

Пример кода на Object Pascal для вычисления значения TDateTime в виде вещественного числа:

function TDateTimeToFloat(t: TDateTime): Double;
begin
  Result := t - DateTime(1899, 12, 30);
end;

И на Java для конвертации:

long days = (long) (floatingPointValue - 39322);
Calendar c = Calendar.getInstance();
c.set(1970, 0, 1, 0, 0, 0); // Установка базовой даты Java
c.add(Calendar.DATE, days);
SimpleDateFormat sdf = new SimpleDateFormat();
System.out.println(sdf.format(c.getTime()));

Обратите внимание, что в данном примере используется предположение, что базовая дата в Delphi - это 30 декабря 1899 года, а в Java - 1 января 1970 года. Если в вашем конкретном случае используются другие базовые даты, необходимо соответствующим образом скорректировать алгоритм.

Альтернативный ответ

Возможной альтернативой может быть использование библиотек для работы с датами, которые уже содержат в себе функции для конвертации дат между различными системами. Например, библиотека Joda-Time или ThreeTen-Backport для Java, которые предоставляют более удобные и безопасные способы работы с датами и временем.

Заключение

При обмене данными между Delphi и Java-приложениями важно учитывать различия в представлении дат и времени. Используя предложенный алгоритм, можно успешно конвертировать даты из TDateTime в формат, пригодный для использования в Java.

Создано по материалам из источника по ссылке.

Контекст задачи заключается в необходимости корректной конвертации дат из Delphi в Java, учитывая различия в их представлении и базовых датах.

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

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

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