DoW - это функция
DoW( Dt )
День недели: Вск=1
Понедельник
DoW( Date() )
DayOfTheWeek
Функции Delphi
Полезные функции