MyChat Scripts: DecodeDate, получение года, месяца и дня из даты
Возвращает значения года, месяца и дня из значения переменной даты и времени.
Синтаксис
procedure DecodeDate(dt: double; var wYear, wMonth, wDay: word);
Параметры и возвращаемые значения
Параметр |
Тип |
Значение |
dt |
double |
дата и время; |
wYear |
word |
возвращаемое значение, год; |
wMonth |
word |
возвращаемое значение, месяц; |
wDay |
word |
возвращаемое значение, день. |
Результат функции
Год, месяц и день, соответствующий указанной дате.
Пример
var
wYear, wMonth, wDay: word;
begin
DecodeDate(Now, wYear, wMonth, wDay);
mLogScript(' Year: ' + inttostr(wYear), '');
mLogScript('Month: ' + inttostr(wMonth), '');
mLogScript(' Day: ' + inttostr(wDay), '');
end.
Результат работы скрипта
[14:35:30] (Log "DecodeDate"): Year: 2016
[14:35:30] (Log "DecodeDate"): Month: 2
[14:35:30] (Log "DecodeDate"): Day: 23