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