Delphi и база данных Access

[вася радугов]

прочитал на форуме темы про параметрические запросы, решил переделать свой запрос:

procedure TForm7.CheckBox1Click(Sender: TObject);
begin
if checkbox1.Checked=true  then  begin
 form7.ADOQuery1.Close;
 form7.ADOQuery1.SQL.Clear;
 form7.ADOQuery1.SQL.add('select * from prihod');
  form7.ADOQuery1.SQL.Add('where prihod.datа_prihod between :pdate1 and :pdate2');
 form7.ADOQuery1.Parameters.ParamByName('pdate1').Value:=DateTimePicker1.Date;
 form7.ADOQuery1.Parameters.ParamByName('pdate2').Value:=DateTimePicker2.Date;
 form7.ADOQuery1.Open;
end;
end;

Теперь когда ставишь галочку CheclBox появляется ошибка:
Project1.exe raised exception class EOLeException with message 'Несоответствие типов данных в выражении условия отбора'.

Поле Дата прихода у меня типа Дата/время. В чем ошибка?

[Serge_Bliznykov]

на первый взгляд, всё правильно.

попробуйте отрезать время (оно иногда мешает):

....
 form7.ADOQuery1.Parameters.ParamByName('pdate1').Value:= trunc(DateTimePicker1.Date);
 form7.ADOQuery1.Parameters.ParamByName('pdate2').Value:= trunc(DateTimePicker2.Date);
 form7.ADOQuery1.Open;

в DateTimePicker1 и DateTimePicker2 даты выбраны?

Если ничего не поможет, то покажите структуру вашей таблицы prihod (можно скриншотик из конструктора)

[вася радугов]

К сожалению, ничего не помогло. В DataTimepicker1,2 даты выбраны.

[Streletz]

Сообщение от вася радугов

Теперь когда ставишь галочку CheclBox появляется ошибка:
Project1.exe raised exception class EOLeException with message 'Несоответствие типов данных в выражении условия отбора'.

Поле Дата прихода у меня типа Дата/время. В чем ошибка?

Похоже, что мой пост #10 прошёл не замеченным. Дата в запросе, не воспринимается ядром СУБД, как дата. Приведите дату к нужному виду.

[вася радугов]

Простите, не понимаю, к какому виду надо привести дату. В самом запросе или где?

[Аватар]

Непосредственно trunc(DateTimePicker1.Date) присваивать не желательно. Лучше через промежуточный DateTime

var d: TDateTime;
...
d:=trunc(DateTimePicker1.Date);
form7.ADOQuery1.Parameters.ParamByName('pdate1').Value:= d;
d:=trunc(DateTimePicker2.Date);
form7.ADOQuery1.Parameters.ParamByName('pdate2').Value:= d;

Дата в запросе, не воспринимается ядром СУБД, как дата. Приведите дату к нужному виду

Зачем её ручками приводить? Параметризированный запрос нормально приводит

[Streletz]

Сообщение от вася радугов

Простите, не понимаю, к какому виду надо привести дату. В самом запросе или где?

Простите, но зачем я тогда в посте #10 давал ссылку на статью?
Дата для отправки в Access должна иметь вид: #MM/DD/YYYY#, где MM-месяц, dd-день, YYYY-год.
Есть ещё альтернативный способ приведения даты, который предложил Аватар.
Так что пробуйте, дерзайте...

[вася радугов]

спасибо огромное! теперь такой вопрос, как сделать , чтобы результат запроса выводился в DBGrid? Когда нажимаешь CheckBox, все данные из DBGrid пропадают.

Простите за назойливость, но правда не понимаю почему не отображается результат запроса в DBGrid. ADOQuery1 подключен к таблице prihod,
DataSource1.DataSet=ADOQuery1, DBGrid1.DataSource=DataSource1
когда нажимаю на checkbox, почему в DBGrid1 вообще ничего не отображается?

[Streletz]

А, в БД есть данные которые соответствуют условиям отбора?

[Vanta11a]

Я просто оставлю цитату из поста №6 здесь

И да, вы добавляете в строку не преобразованную в string дату, а текстовую строку вида "QuotedStr(DateToStr(DateTimePi cker 1.Date))"

Вам объясняют, что делать надо не так.