Ошибка "Параметр не имеет значения по умолчанию" при поиске

 ADOQuery1.Active:=False;
 ADOQuery1.SQL.Text:='select * from Bookroom where Кни='+Edit1.Text;
 ADOQuery1.Open;

ADOQuery1.SQL.Text:='select * from Bookroom where Кни='+QuotedStr(Edit1.Text);

if combobox1.ItemIndex=0 then
begin
ADOQuery1.Active:=False;
ADOQuery1.SQL.Text:='select * from Bookroom where Book='+QuotedStr(Edit1.Text);
ADOQuery1.Open;
end;

if combobox1.ItemIndex=0 then
begin
 
ADOQuery1.Active:=False;
ADOQuery1.SQL.Text:='select * from Bookroom where Книга='+QuotedStr(Edit1.Text);
ADOQuery1.Open;
end;
 
if combobox1.ItemIndex=1 then
begin
ADOQuery1.Active:=False;
ADOQuery1.SQL.Text:='select * from Bookroom where Автор='+QuotedStr(Edit1.Text);
ADOQuery1.Open;
end;
 
if combobox1.ItemIndex=2 then
begin
 
ADOQuery1.Active:=False;
ADOQuery1.SQL.Text:='select * from Bookroom where Жанр='+QuotedStr(Edit1.Text);
ADOQuery1.Open;
end;
 
if combobox1.ItemIndex=3 then
begin
 
ADOQuery1.Active:=False;
ADOQuery1.SQL.Text:='select * from Bookroom where Дата издания книги='+QuotedStr(Edit1.Text);
ADOQuery1.Open;
end;

case combobox1.ItemIndex of

var s:string;
  case combobox1.ItemIndex of
    0:s:='книга= ';
    1:s:='автор= ';
    2:s:='жанр= ';
    3:s:='[дата издания книги]= ';
  end;
 
ADOQuery1.Active:=False;
ADOQuery1.SQL.Text:='select * from Bookroom where '+s+QuotedStr(Edit1.Text);
ADOQuery1.Open;