Сортировка по Пикеру с переменной

[ins813]

Здравствуйте, Почему не правильно сортирует по дате, если выставить Два дататаймпикера допустим с 1,05,2012 по 30,05,2012 выводятся данные и с предыдущего месяца ?

  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Text :='SELECT date,time,name,ed_izm,kol_vo,street,predpr FROM dbo.material'
 + ' WHERE date BETWEEN :StartDate AND :FinishDate and predpr =: predpr';
  ADOQuery1.Parameters.ParamByName('predpr').Value:=pred;
  Dt1 := Trunc(DateTimePicker1.Date);
  ADOQuery1.Parameters.ParamByName('StartDate').Value := Dt1;
  Dt2 := Trunc(DateTimePicker2.Date);
  ADOQuery1.Parameters.ParamByName('FinishDate').Value := Dt2;
  ADOQuery1.Active:=true;

___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[Аватар]

Dt1 и Dt2 какого типа? И Trunc зачем - DateTimePicker.Date содержит дату без времени

[ins813]

var
Dt1, Dt2 : TDateTime;

Trunc- убрать ?

[Аватар]

Попробуйте так

  ADOQuery1.Parameters.ParamByName('StartDate').Value := DateTimePicker1.Date;
  ADOQuery1.Parameters.ParamByName('FinishDate').Value :=DateTimePicker2.Date;

Если в date и время есть, то ваше 30,05,2012 не попадет в выборку, Between не прокатит, нужно date>=01.05.2012 and date<31.05.2012

[Serge_Bliznykov]

код очень похож на мой (мне кажется, что я такой писал в примере на форуме)

Dt1 и Dt2 какого типа?

впрочем, Аватар прав насчёт типа переменных Dt1 и Dt2
должны быть типа TDateTime

Trunc зачем - DateTimePicker.Date содержит дату без времени

А вот это не так!
попробуйте. киньте на форму DateTimePicker и поместите код:

  Caption := DateTimeToStr( DateTimePicker1.Date );

ins813, формально у вас всё нормлаьно. и, если с типами Dt1 и Dt2 всё нормально (они типа TDateTime), тогда проверьте структуру БД - смотрите тип поля date. чудес не бывает, либо с полем date что-то не так, либо данные там не те, что Вы ожидаете, либо ещё что-то..
p.s. в вашей СУБД - date не ключевое слово?

добавлено

1,05,2012 по 30,05,2012

а почему, собственно, запятые? Это что за формат представления даты?!

[ins813]

Не работате ( А как узнать или отключить время в Пикере ?

Serge_Bliznykov, Что то запутался если не сложно объясните:
1. Кидаем заново Пикеры ?
2. Caption прописывать в пикер ?
3. А мой старый код оставть полностью ?
в моей БД вроде все нормально,единственное может в столбце Date указана тип Varchar, если это влияет?




_________________
Не используйте форум как чат - не пишите несколько коротких сообщений подряд!
Есть что добавить - нажимайте кнопку "Правка/Редактировать" на своём крайнем сообщении
и изменяйте, добавляйте....

Прошу учесть на будущее...

Модератор.

[Serge_Bliznykov]

Serge_Bliznykov, Что то запутался если не сложно объясните:
1. Кидаем заново Пикеры ?
2. Caption прописывать в пикер ?

Забудьте, это было не Вам, а Аватар'у!

в столбце Date указана тип Varchar, если это влияет?

ДА!!! ЭТО И ЕСТЬ ПРИЧИНА!!


СУБД у Вас какая?
Конвертируйте поле Date в дату, а потому уже используйте вышеприведённый код.

[Аватар]

А вот это не так!
попробуйте. киньте на форму DateTimePicker и поместите код:

И правда, help-у доверился где написано

TDate represents a special type of TDateTime value that has no decimal part. A TDate value represents the number of days that have elapsed since 12/30/1899.

Брешут.
У ТС вся проблема в varchar для date.

[ins813]

СУБД - MS SQL 2008.
А C

aption := DateTimeToStr( DateTimePicker1.Date ); вставлять в FORM.Create ?

[Serge_Bliznykov]

А C

Caption := DateTimeToStr( DateTimePicker1.Date ); вставлять в FORM.Create ?

Забудьте об этом. Совсем!! это к вашей проблеме никакого отношения не имеет!

СУБД - MS SQL 2008.

это уже интереснее. в поле Date у вас именно такие значения, как вы привели в примере?

1,05,2012
30,05,2012

Именно так? Буквально?