[BURATA]

Доброго времени суток очень большая просьба ответить а то неполучаеться...

есть один календарик по которому вибераеться дата:

Код:

 { procedure TForm1.cal1Click(Sender: TObject);
begin
ADOQuery2.Close;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Add('select * from студент  where ДатаВиконання like' +QuotedStr('%'+DateToSTR(cal1.Date)+'%'));

  ADOQuery2.Open;
end;

и есть второй календарик по которому опять же вибераеться дата:

Код:

{ procedure TForm1.cal2Click(Sender: TObject);
begin
ADOQuery2.Close;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Add('select * from студент  where ДатаВиконання like' +QuotedStr('%'+DateToSTR(cal2.Date)+'%'));

  ADOQuery2.Open;
end;

Админ: Пользуемся тегами для оформления кода!

Вопрос: а как теперь мне запросом их обединить так ктоб я смог сформировать отчетность за некоторое время..........подскажите пожалусто

[Yurk@]

Код:

ADOQuery2.Close;
ADOQuery2.SQL.Text := 'SELECT * FROM студент WHERE ДатаВиконання BETWEEN :data1 AND data2';
ADOQuery2.Parameters.ParamByName('data1').Value := cal1.Date;
ADOQuery2.Parameters.ParamByName('data2').Value := cal2.Date;
ADOQuery2.Open;

[BURATA]

вибивает ошыбку что не находит параметр date2

[BURATA]

несоответствие типов даних в вираженом поле отбора

[BURATA]

project1.exe raised exception class EDatabaseError with message 'ADOQuery2:Parameter 'data1' not found'

Вот собственно и ошыбка

[Alegun]

Сообщение от BURATA

вибивает ошыбку что не находит параметр date2

Ну правильно, это же не конкретный параметр, а идиоматическое выражение такое что вы там подсовывали в запрос на выборку - что-то типа

Код:

QuotedStr('%'+DateToSTR(cal1.Date)+'%')

, вот такие "закавырки" и надо вместо примера впихивать, ИМХО.

З.Ы. Ну прям филиал тёти Аси здесь образовался, опять модераторам работка по сшиванию разрозненных мессаг появилась, тихий ужас :0