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