|
DayOfTheWeek
Функция |
Возвращает индекс дня недели для значения TDateTime (ISO 8601) |
DateUtils unit |
function DayOfTheWeek ( const Date : TDateTime ) : Integer;
| |
|
Описание |
Функция DayOfTheWeek возвращает индекс дня недели:
1 = Понедельник
2 = Вторник
3 = Среда
4 = Четверг
5 = Пятница
6 = Суббота
7 = Воскресенье
|
|
Примечания |
DayOfTheWeek сосгласована с ISO 8601, так как она использует Понедельник как начало недели.
DayOfWeek не сосгласована - она обрабатывает Воскресенье как стартовый день.
|
|
Похожие команды |
DayOfTheMonth Дает день месяца для значения TDateTime (ISO 8601)
DayOfTheYear Выдает день года для значения TDateTime (ISO 8601)
DayOfWeek Выдает индекс дня недели для значения TDateTime
MonthOfTheYear Выдает месяц года для значения TDateTime
| |
|
Пример кода : Какой день недели для Рождества 2002 г. |
var
myDate : TDateTime;
day : array[1..7] of string;
begin // Мы не можем использовать LongDayNames -
он начинается с воскресенья
day[1] := 'Понедельник';
day[2] := 'Вторник';
day[3] := 'Среда';
day[4] := 'Четверг';
day[5] := 'Пятница';
day[6] := 'Суббота';
day[7] := 'Воскресенье';
myDate := EncodeDate(2002, 12, 25);
ShowMessage('Рождество 2002г. '+day[DayOfTheWeek(myDate)]);
end;
|
Рождество 2002г. Среда
|
| |
Copyright © 2004-2025 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")
|