Функция DayOfWeek в Delphi выдает индекс дня недели для значения TDateTime.
SysUtils unit
function DayOfWeek (Date : TDateTime) : Integer;
Функция DayOfTheWeek возвращает индекс дня недели:
1 = Понедельник
2 = Вторник
3 = Среда
4 = Четверг
5 = Пятница
6 = Суббота
7 = Воскресенье
Предупреждение
Эта функция НЕ согласована с ISO 8601.
DayOfTheWeek является согласованной с ISO 8601, и использует Понедельник как начало недели.
Функция DayOfWeek: Показ дня недели для Рождества 2002 года
var
myDate : TDateTime;
day : string;
begin
myDate := EncodeDate(2002, 12, 31);
day := LongDayNames[DayOfWeek(myDate)];
ShowMessage('Рождество 2002 года '+day);
end;
Результат
Рождество 2002 года Вторник
Похожие функции, процедуры и команды
DayOfTheMonth — дает день месяца для значения TDateTime (ISO 8601).
DayOfTheWeek — возвращает индекс дня недели для значения TDateTime (ISO 8601).
DayOfTheYear — выдает день года для значения TDateTime (ISO 8601).
MonthOfTheYear — выдает месяц года для значения TDateTime.
