MyChat Scripts Engine: DecodeDateTime

MyChat Scripts: DecodeDate, получение года, месяца, дня и времени из даты

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

 

Синтаксис

procedure DecodeDateTime(dt: double; var wYear, wMonth, wDay, wHour, wMinute, wSecond, wMilliSec: word);

 

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

Параметр

Тип

Значение

dt

double

дата и время;

wYear

word

возвращаемое значение, год;

wMonth

word

возвращаемое значение, месяц;

wDay

word

возвращаемое значение, день;

wHour

word

возвращаемое значение, часы;

wMinute

word

возвращаемое значение, минуты;

wSecond

word

возвращаемое значение, секунды;

wMilliSecond

word

возвращаемое значение, миллисекунды.

 

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

Год, месяц, день, часы, минуты, секунды и миллисекунды, соответствующие указанной дате.

 

Пример

var
  wYear, wMonth, wDay, wHour, wMinute, wSecond, wMilliSecond: word;
begin
  DecodeDateTime(Now, wYear, wMonth, wDay, wHour, wMinute, wSecond, wMilliSecond);
 
  mLogScript('        Year : ' + inttostr(wYear), '');
  mLogScript('       Month : ' + inttostr(wMonth), '');
  mLogScript('         Day : ' + inttostr(wDay), '');
  mLogScript('       Hours : ' + inttostr(wHour), '');
  mLogScript('     Minutes : ' + inttostr(wMinute), '');
  mLogScript('     Seconds : ' + inttostr(wSecond), '');
  mLogScript('Milliseconds : ' + inttostr(wMilliSecond), '');
end.

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

[13:49:43] (Log "DecodeDateTime"):         Year : 2016

[13:49:43] (Log "DecodeDateTime"):        Month : 7

[13:49:43] (Log "DecodeDateTime"):          Day : 7

[13:49:43] (Log "DecodeDateTime"):        Hours : 13

[13:49:43] (Log "DecodeDateTime"):      Minutes : 49

[13:49:43] (Log "DecodeDateTime"):      Seconds : 43

[13:49:43] (Log "DecodeDateTime"): Milliseconds : 904

 

Ещё посмотреть

IntToStr
mLogScript

Now