DayOfWeek: Integer;
Свойство DayOfWeek возвращает номер дня недели в текущей переменной.
Возможные возвращаемые значения:
1 - Понедельник
2 - Вторник
3 - Среда
4 - Четверг
5 - Пятница
6 - Суббота
0 - Воскресенье
Sub Main;
Var
DT: DateTime;
i, i1: Integer;
Begin
DT := DateTime.Now;
i := DT.DayOfWeek;
DT := DateTime.AddMonths(DT, 1);
i1 := DT.DayOfWeek;
End Sub Main;
После выполнения примера в переменной «i» будет содержаться номер дня текущей недели, а в переменной «i1» будет содержаться номер дня недели, соответствующего текущему числу через месяц.
См. также: