Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  

форум программистов

Основы Delphi
DaySpan
Функция
Выдает дробное число дней между 2 датами DateUtils unit
  function DaySpan ( const ToDate, FromDate : TDateTime ) : Double;
Описание
Функция DaySpan вычитает FromDate из ToDate, возвращая дробную разность дней.

Возвращаемое Double значение содержит число дней как целую часть, и остаток части дня как дробную часть.

Например, разность 2 дней и 6 часов дало бы значение 2.25
Похожие команды
DaysBetween  Выдает целый число дней между 2 датами

DaysInAMonth  Выдает число дней в месяце

DaysInAYear  Выдает число дней в году

 
Пример кода : Нахождение разности дней между двумя значениями date+time.
var
  fromdate, toDate : TDateTime;

begin
  // Установка наших переменных дат
  fromDate := EncodeDateTime(2000, 01, 01, 0, 0, 0, 0);
  toDate   := EncodeDateTime(2000, 01, 02, 12, 0, 0, 0);

  // Отображение этих дат и дней между ними
  ShowMessage('С даты = '+DateTimeToStr(fromDate));
  ShowMessage('До даты = '+DateTimeToStr(toDate));
  ShowMessage('Дробная разность дней = '+
              FloatToStr(DaySpan(toDate, fromDate))+' дней');
end;

С даты = 01/01/2000
До даты = 02/01/2000 12:00:00
Дробная разность дней = 1.5 дней
 


Оплата за обучение в Kata Academy только после твоего трудоустройства в IT, начни карьеру Middle Java-разработчика



Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки? Slurm подготовили для вас особенный продукт!





форум программистов


© Форум Delphi  |  Форум Pascal   |  Блог программистов   |  Исходники Delphi   |  Автор сайта  |  Ссылки   |  Английская версия