Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

datetimepicker

11K
26 июля 2005 года
galas
5 / / 26.07.2005
имеется в аксессовской базе данных поле типа дата, текст вводиться через datetimepicker, проблемы возникли с:
1. как поставить ограничения на запрет ввода выходных и праздничных дней?
2. праздничные дни вводить в соответсвующую
таблицу и делать проверку с нее?
3. а если воскресенье рабочий день то тогда что?

Заранее спасибо
11K
26 июля 2005 года
aleba
9 / / 20.07.2005
Цитата:
Originally posted by galas
имеется в аксессовской базе данных поле типа дата, текст вводиться через datetimepicker, проблемы возникли с:
1. как поставить ограничения на запрет ввода выходных и праздничных дней?
2. праздничные дни вводить в соответсвующую
таблицу и делать проверку с нее?
3. а если воскресенье рабочий день то тогда что?

Заранее спасибо



Определение дней недели:
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
if (DayOfWeek(DateTimePicker1.Date) = 1) then ShowMessage('Воскресенье');
end;
...'2' - соответственно понедельник и т.д.

11K
27 июля 2005 года
galas
5 / / 26.07.2005
все получилось, огромаднейшее спасибо за помощь.
10
27 июля 2005 года
Freeman
3.2K / / 06.03.2004
Цитата:
Originally posted by aleba

procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
if (DayOfWeek(DateTimePicker1.Date) = 1) then ShowMessage('Воскресенье');
end;
...'2' - соответственно понедельник и т.д.


Дурной стиль. Можно и нужно использовать LongDayNames и ShortDayNames из SysUtils.

11K
01 августа 2005 года
aleba
9 / / 20.07.2005
Цитата:
Originally posted by Freeman
Дурной стиль. Можно и нужно использовать LongDayNames и ShortDayNames из SysUtils.



Freeman ты не понял - надо определить текущий день недели, а не название недели: здесь Showmessage стоит просто для наглядности.

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог