MyChat Scripts Engine: HoursBetween

MyChat Scripts: функция HoursBetween, сколько часов между датами

Узнать, сколько полных часов между двумя датами.

 

Синтаксис

function HoursBetween(dNow, dThen: double): integer;

 

Параметры и возвращаемые значения

Параметр

Тип

Значение

dNow

double

первое значение даты и времени;

dtThen

double

второе значение даты и времени.

 

Результат функции

Число, количество полных часов между двумя датами.

 

Пример

var
  dtFrom, dtNow: double;
begin
  dtFrom := Now;
  // and +8.5 hours
  dtNow  := IncMinute(Now, 510);

  // print this dates
  mLogScript('From date: ' + FormatDateTime('dd.mm.yyyy hh:nn:ss', dtFrom), '');
  mLogScript('To date: ' + FormatDateTime('dd.mm.yyyy hh:nn:ss', dtNow), '');
  
  mLogScript('Full hours between 2 dates: ' + IntToStr(HoursBetween(dtFrom, dtNow)), '');
end.

Результат работы скрипта

[10:46:26] (Log "HoursBetween"): From date: 04.07.2016 10:46:26

[10:46:26] (Log "HoursBetween"): To date: 04.07.2016 19:16:26

[10:46:26] (Log "HoursBetween"): Full hours between 2 dates: 8

 

Ещё посмотреть
IncMinute
IntToStr
mLogScript

Now