Фильтр несколько дней с интервалом

[Scorpuha]

подскажи, плз

[Serge_Bliznykov]

подсказываю, в поле SQL компонента ADOQuery1 нужно прописать текст запроса, возвращающего нужный вам набор данных

[Аватар]

Дык с запросами-то и проблема Ладно, вот код возвращающий количество записей без всяких фильтров. Вместо MyTable в запросе имя нужной таблицы в базе. В uses если нет добавить DateUtils

procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Text:='SELECT COUNT(*) AS CountRec FROM MyTable WHERE Data_pereatestat IN (:d1,:d2,:d3)';
  ADOQuery1.Parameters.ParamByName('d1').Value:=Date;
  ADOQuery1.Parameters.ParamByName('d2').Value:=IncDay(Date,2);
  ADOQuery1.Parameters.ParamByName('d3').Value:=IncDay(Date,4);
  ADOQuery1.Open;
  i:=ADOQuery1.FieldByName('CountRec').AsInteger;
  ADOQuery1.Close;
  ShowMessage(Format('Записей %d',[i]));
end;

[Scorpuha]

select * from attestat where Data_pereatestat=Now and Data_pereatestat=Now+2

вот мой наивный запрос. выдает что ноль записей хотя одна точно есть.

Adoquery1 parameter d1 not found

Datamodule2.ADOQuery1.Parameters.Pa ramByName('d1').Value:=Date;

[Аватар]

Ну не может же значение Data_pereatestat одновремнно равняться двум разным датам. Подключайте блок логики, когда запрос пишите

Adoquery1 parameter d1 not found

Подправил #23 - % вместо : зачем-то впялил туда

[Scorpuha]

работает. если мой код в первом сообщение переделать под поиск по нескольким датам , как будет выглядеть?

datamodule2.Attestat.Filtered:=false;
datamodule2.Attestat.Filter :='Data_pereatestat='''+DateToSTr(Now)+'''and Tabel='+Form7.Edit1.Text;
datamodule2.Attestat.Filtered:=true;

[Аватар]

ADOQuery1.SQL.Text:='SELECT COUNT(*) AS CountRec FROM MyTable WHERE Data_pereatestat=:d1 AND Tabel=:Tbl';

Подключайте логику. Только копипасте ни чему не научит

[Scorpuha]

нее , я про фильтр в АДОTable который в первом сообщении. как в нем написать фильтр для двух и более дат.