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