Страница 55 из 96
Получение дня недели (VCL вариант)
Для получения дня недели воспользуйтесь функцией DayOfWeek() из модуля Sysutils, передав ей текущую дату. DayOfWeek возвращает значение от 1 до 7, где 1 - воскресенье, 2 - понедельник, и т. д.int Day = DayOfWeek(Date());