Дни недели

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Espada
Местный житель
Сообщения: 336
Зарегистрирован: 07 май 2013, 17:32
Откуда: РБ, Минск

Дни недели

Сообщение Espada »

Доброго времени суток. такой вопросик: в печатную форму табеля учета рабочего времени, попросили вывести, под каждым числом, день недели. может подскажете какую функцию, или алгоритм, как бы это можно было рассчитать и вывести?
под каждым красивым павлиньим хвостом, скрывается самая обычная куриная жопа!!! так что меньше пафоса господа!!!
Buddy
Постоянный обитатель
Сообщения: 119
Зарегистрирован: 02 июн 2016, 15:18
Откуда: Галактика СПб

Re: Дни недели

Сообщение Buddy »

Возможно, вам поможет функция Функция Day_Of_Week

Назначение

Вычисление дня недели (с 1 по 7).

Описание

function Day_Of_Week(d: date): byte;

Параметры

d: date — дата.

Возвращаемое значение

Результатом является номер дня недели указанной даты (1 — понедельник, 2 — вторник, ..., 7 — воскресенье).

Пример

Day_Of_Week(Date(13,3,1972)) = 1;
Espada
Местный житель
Сообщения: 336
Зарегистрирован: 07 май 2013, 17:32
Откуда: РБ, Минск

Re: Дни недели

Сообщение Espada »

Спасибо, то что надо)
под каждым красивым павлиньим хвостом, скрывается самая обычная куриная жопа!!! так что меньше пафоса господа!!!
Ответить