Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.05.2009, 13:50   #31
Koter1984
Пользователь
 
Регистрация: 02.05.2009
Сообщений: 21
По умолчанию

Только теперь ровно за семь дней выводит((
Koter1984 вне форума Ответить с цитированием
Старый 02.05.2009, 13:54   #32
S@fer
Форумчанин
 
Аватар для S@fer
 
Регистрация: 29.01.2009
Сообщений: 411
По умолчанию

Form1.ADOQuery1.SQL.Add('WHERE (datakontrol>= #'+FormatDateTime('yyyy-mm-dd',IncDay(DateTimePicker1.Date,-7))+'#) AND (datakontrol<= #'+FormatDateTime('yyyy-mm-dd',DateTimePicker1.Date)+'#)');
Так надо?
S@fer вне форума Ответить с цитированием
Старый 02.05.2009, 14:00   #33
Koter1984
Пользователь
 
Регистрация: 02.05.2009
Сообщений: 21
По умолчанию

что то не то выводит(( есть есть множество дат из них необходимо вывести даты за семь дней до исполнения
Koter1984 вне форума Ответить с цитированием
Старый 02.05.2009, 14:01   #34
Koter1984
Пользователь
 
Регистрация: 02.05.2009
Сообщений: 21
По умолчанию

А дата исполнения это текущая дата(дата пикер)
Koter1984 вне форума Ответить с цитированием
Старый 02.05.2009, 14:06   #35
S@fer
Форумчанин
 
Аватар для S@fer
 
Регистрация: 29.01.2009
Сообщений: 411
По умолчанию

Немогу понять что нужно чтобы выводило. за семь дней - это семь дней назад или все даты от семь дней назад до текущей?
В приложении сделал все даты от семь дней назад до текущей
Вложения
Тип файла: zip Прога мероприятия(решения).zip (30.7 Кб, 9 просмотров)
S@fer вне форума Ответить с цитированием
Старый 02.05.2009, 14:13   #36
Koter1984
Пользователь
 
Регистрация: 02.05.2009
Сообщений: 21
По умолчанию

Думаю одно говорю другое прошу прощения!!! сегодня у нас 02.05.2009 нужно вывести все решения(мероприятия) которые будут через семь дней включительно, но не больше семи дней))
Koter1984 вне форума Ответить с цитированием
Старый 02.05.2009, 14:14   #37
Koter1984
Пользователь
 
Регистрация: 02.05.2009
Сообщений: 21
По умолчанию

будут это имееется виду datakontrol наступит
Koter1984 вне форума Ответить с цитированием
Старый 02.05.2009, 14:16   #38
S@fer
Форумчанин
 
Аватар для S@fer
 
Регистрация: 29.01.2009
Сообщений: 411
По умолчанию

Ну тогда вот так
Код:
Form1.ADOQuery1.SQL.Add('WHERE (datakontrol<= #'+FormatDateTime('yyyy-mm-dd',IncDay(DateTimePicker1.Date,7))+'#) AND (datakontrol>= #'+FormatDateTime('yyyy-mm-dd',DateTimePicker1.Date)+'#)');
S@fer вне форума Ответить с цитированием
Старый 02.05.2009, 14:21   #39
Koter1984
Пользователь
 
Регистрация: 02.05.2009
Сообщений: 21
По умолчанию

Большое огромное спасибо!!!
Koter1984 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Работа с датой Aleksandr Общие вопросы Delphi 12 29.09.2008 14:01
Работа с датой Dunpeal Общие вопросы Delphi 5 15.05.2008 12:05
Работа с датой [RR]Reaction Общие вопросы Delphi 3 07.04.2008 21:52
Несовпадение с датой RoZi Помощь студентам 26 28.11.2007 13:05
Манипуляции с датой и временем. Tatyana БД в Delphi 16 29.06.2007 19:19