|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Работа со временем
Доброго дня всем! вывожу в DbGrid данные за дату выбранную в DateTimePicker1. Добавил второй DateTimePicker2, нужно сделать чтобы выводились данные за период времени между 1 и 2 DateTimePicker. Подскажите пожалуйста синтаксис. Вывожу из дб sql. таким образом:
Код:
procedure TForm1.reset(date: tdatetime); var s1,s2:string; y,m,d:word; begin order_(); decodedate(form1.DateTimePicker1.Date,y,m,d); date:=encodedate(y,m,d); dm.ADODSmed.Active:=false; s1:='select * from med_j, persons,podr where med_j.cperson = persons.nrec and persons.podr_L = podr.nrec '; s2:=' and date = cast ('+quotedstr (datetostr (date))+' as datetime ) order by '+order; dm.ADODSmed.CommandText:=s1+s2; dm.ADODSmed.Active:=true; end; |
#2
|
||||
|
||||
http://platonov-andrei.narod.ru/Delphi/DateTimeUtil.htm
Код:
...where поле_дата >= DateTimePicker1 AND поле_дата <= DateTimePicker2 Я за здоровый экстрим! Спасибо за "спасибо") Последний раз редактировалось Mrak, 31.05.2013 в 10:32. |
#3
|
|||
|
|||
не нашел там ничего подходящего.
|
#4
|
||||
|
||||
отредактировал)
Я за здоровый экстрим! Спасибо за "спасибо") |
#5
|
|||
|
|||
пишет недопустимое имя столбца DateTimePicker1
s2:=' and date > = DateTimePicker1 and date < = DateTimePicker2 order by '+order; Последний раз редактировалось Kis, 31.05.2013 в 11:03. |
#6
|
|||
|
|||
Спасибо за ответа, нашел выход
|
#7
|
||||
|
||||
в базе надеюсь дата - тип дата
на спасибо кнопка есть! Я за здоровый экстрим! Спасибо за "спасибо") |