Как получить только время из DateTime значения в Delphi Prism для .NET

Delphi , Компоненты и Классы , TDateTimePicker

В данной статье мы рассмотрим, как извлечь только время из значения DateTime в Delphi Prism для .NET. В отличие от Win32 Delphi, в .NET нет встроенной функции, подобной Frac, которая бы принимала параметр DateTime. Однако, мы можем использовать встроенные свойства DateTime для достижения нашей цели.

Свойство DateTime.Date возвращает дату без времени, а свойство DateTime.TimeOfDay возвращает время в виде значения TimeSpan. Так как TimeSpan не является непосредственно временем в формате "час:минута:секунда", мы можем использовать его для получения только времени из значения DateTime.

Вот пример кода на Object Pascal (Delphi), который извлекает время из значения DateTime:

uses
  System.SysUtils,
  System.Types;

procedure GetTimeFromDateTime(const ADateTime: TDateTime; var AHour, AMinute, ASecond: Byte);
begin
  AHour := ADateTime.TimeOfDay.Hours;
  AMinute := ADateTime.TimeOfDay.Minutes;
  ASecond := ADateTime.TimeOfDay.Seconds;
end;

var
  DateTimeValue: TDateTime;
  Hour, Minute, Second: Byte;
begin
  DateTimeValue := Now; // или любое другое значение DateTime
  GetTimeFromDateTime(DateTimeValue, Hour, Minute, Second);
  Writeln(Format('Время: %d:%d:%d', [Hour, Minute, Second]));
end.

В этом примере мы определили процедуру GetTimeFromDateTime, которая принимает значение DateTime и возвращает часы, минуты и секунды в виде параметров. Затем мы используем эту процедуру для получения времени из текущего значения DateTime и выводим его на экран.

Если вам нужно работать с временем в формате "час:минута:секунда" в дальнейшем, вы можете использовать полученные часы, минуты и секунды для создания значения TimeOfDay или для других целей. Например, вы можете отобразить время в виде строки с помощью функции Format:

Writeln(Format('Время: %02d:%02d:%02d', [Hour, Minute, Second]));

В этом примере мы используем формат %02d для отображения часов, минут и секунд в виде двухзначных чисел с ведущими нулями, если необходимо.

В заключение, хотя в .NET нет функции, подобной Frac в Win32 Delphi, мы можем использовать встроенные свойства DateTime для извлечения только времени из значения DateTime. Приведенный выше пример кода демонстрирует, как это можно сделать на Object Pascal (Delphi).

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

В статье описывается, как извлечь только время из значения DateTime в Delphi Prism для .NET, используя встроенные свойства DateTime и процедуру GetTimeFromDateTime, чтобы получить часы, минуты и секунды.

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

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

:: Главная :: TDateTimePicker ::