Поиск,combobox,edit,dbgrid

[Ravelin]

Я знаю что тема поиска избитая но сколько ни искал везде только Access. У меня БД Парадокс. В чём суть темы?
Суть в том что в combobox есть выпадающий список по полям BDGrid. Мне нужно чтоб в combobox выбиралось поле, а потом когда я вводил данные в edit производился поиск. А также нужно чтоб поиск производился при нажатии на кнопку. Помогите пожалуйста. Вроде всё легко,но я не могу ничего уловить.Заранее СПАСИБО!.

p.s И какой запрос писать в Query???

[Stilet]

p.s И какой запрос писать в Query???

Пример:

 .SQL.TExt:='Select * from таблица where '+Combobox1.Text+'='+QuotedStr(Edit1.Text);

[Ravelin]

я так понял запрос нужно написать в edit.change и на buttin.click???

[Stilet]

Ну в общем да.
Пиши его там где нужнее всего.

[Ravelin]

Где нужнее всего? мда ответ поражает и всё же ОГРОМНОЕ СПАСИБО!

[Stilet]

мда ответ поражает

А чего ты ожидал?
Ты что думаешь что для таких операций жестко зарезервированно одно и тоже место в программе? Дудки.
короче ставь на клик кнопки, по крайней мере не такие тормоза будут жестокие как в OnChange

[Ravelin]

Не работает
Ошибка:
invalid field name " название"

Я так понял он не может найти значения в Итем листе комбобокса.
Вот они: Название,Жанр,Датаиздания,Наличие,А втор.


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

procedure TForm1.Edit1Change(Sender: TObject);
begin
query3.Close;
Query3.SQL.TExt:='Select * from bib where '+Combobox1.Text+'='+QuotedStr(Edit1.Text);
query3.Open;
query1.Close;
query1.Open;
end;

и

procedure TForm1.Button1Click(Sender: TObject);
begin
query3.Close;
Query3.SQL.TExt:='Select * from bib where '+Combobox1.Text+'='+QuotedStr(Edit1.Text);
Query3.open;
query1.Close;
query1.Open;
end;

Что не так? Вернее что посоветуете?

[Dark_Spirit]

как пример:

procedure TForm1.Edit1Change(Sender: TObject);
  var str:string;
 begin
  if query3.active then query3.active:=false;
  case combobox1.itemindex of
    0: str:= 'Select * from bib where Nazvanie like '+QuotedStr('%'+Edit 1.Text+'%');
    1:str:= 'Select * from bib where Avtor like '+QuotedStr('%'+Edit 1.Text+'%'); 
    2:str:= 'Select * from bib where Zhanr like '+QuotedStr('%'+Edit 1.Text+'%'); 
............................................................................................
    4:str:= 'Select * from bib where Nalichie like '+QuotedStr('%'+Edit 1.Text+'%'); 
 end;
Query3.SQL.TExt:=str;
query3.Open;
query1.Close;
query1.Open;
end;

[artemavd]

Автор, попробуй)

[Ravelin]

artemavd СПАСИБО ОГРОМНОЕ, но работаю только Название и Автор, а что вы сделали если не секрет?
И кстати редактирование и удаление не работают. я так понял вы поменяли query но вот только запросов никаких не вижу,только на FormCreate.