/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/NETLibraries/System.DateTime/DateTime1.pas
26 строк
1023 B
Mikhalkovich Stanislav
Примеры - устранил неточности
04 янв 2025, 14:44
04 янв 2025, 14:44
c2347e6
Код
Авторство
О чём код?
begin // Получение текущей даты - вызов статического метода var d1 := DateTime.Now; Println(d1); // Дата и время через один месяц var d2 := d1.AddMonths(1); Println(d2); // Дата и время на 12 часов раньше d2 := d1.AddHours(-12); Println(d2); // Формирование даты - вызов конструктора объекта (год, месяц,число) var d3 := new DateTime(2001, 1, 1); Println(d3); // Определение времени, прошедшего с начала тысячелетия (разность дат) var ts: System.TimeSpan := d1.Subtract(d3); // Промежуток времени в днях (результат - вещественное число) Println(ts.TotalDays); // Промежуток времени в днях, часах, минутах и секундах Println($'{ts.Days} {ts.Hours}:{ts.Minutes}:{ts.Seconds}'); end.