Запрос к БД.

[spotip]

Подскажите пожалуйста есть вот такой запрос:

var
dat1:TdateTime;
begin
Datamodule2.ADOQuery1.Active:=false;
Datamodule2.ADOQuery1.SQL.Clear;
Datamodule2.ADOQuery1.SQL.Add('SELECT*');
Datamodule2.ADOQuery1.SQL.Add('FROM rap');
Datamodule2.ADOQuery1.SQL.Add('Where data=:dat1');   
dat1 := Trunc(sDateEdit1.Date);
Datamodule2.ADOQuery1.Parameters.ParamByName('dat1').Value:= dat1;
Datamodule2.ADOQuery1.Active:=true;
Form2.ShowModal
end;

мне в этот запрос ещё нужно добавить условие заданное в ComboBox т.е как то так

var
dat1:TdateTime;
begin
Datamodule2.ADOQuery1.Active:=false;
Datamodule2.ADOQuery1.SQL.Clear;
Datamodule2.ADOQuery1.SQL.Add('SELECT*');
Datamodule2.ADOQuery1.SQL.Add('FROM rap');
Datamodule2.ADOQuery1.SQL.Add('Where data=:dat1');
Datamodule2.ADOQuery1.SQL.Add('and nomer=:ComboBox');     -так ничего не выдаёт
dat1 := Trunc(sDateEdit1.Date);
Datamodule2.ADOQuery1.Parameters.ParamByName('dat1').Value:= dat1;
Datamodule2.ADOQuery1.Active:=true;
Form2.ShowModal
end;

в итоге должно искать по дате и по номеру

[Stilet]

Допиши примерно такое:

Datamodule2.ADOQuery1.Parameters.ParamByName('ComboBox').Value:= ComboBox.Text;

[Человек_Борща]

голову включаем
У вас получается такой запрос:
SELECT*FROM rapWhere data=at1and nomer=:ComboBox

[Stilet]

У вас получается такой запрос:

Не должно быть. Они по разным строка разведены.

[spotip]

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

Допиши примерно такое:

Datamodule2.ADOQuery1.Parameters.ParamByName('ComboBox').Value:= ComboBox.Text;

спасибо, всё получилось.