[turat86]

Помогите пожалуйста записывать код кнопки «Поиск» в БД созданную с помощью технологии ADO.
Я записывал код кнопки «поиск по автору» в следующем виде:

Код:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
DataModule1.FindQuery.Active:=false;
DataModule1.FindQuery.Parameters.ParamByName('avtor').Value:=FindavtorEdit.Text;
DataModule1.FindQuery.Active:=true;
FindResultForm.ShowModal;
DataModule1.BookTable.Refresh;
end;

Admin: Учимся пользоваться тегами!!!

В свойстве SQL компонента ADOQuery записывал:

Код:

select * from book WHERE автор LIKE :avtor 

Но это не выводить результат по запросу. Выводить только пустую DBGrid.
Чего надо сделать? Изменить свойства sql-запроса или изменить код. Помогите пожалуйста!

[TOJluK]

'avto r' - тут наличие пробела это опечатка?

DataModule1.FindQuery.Open - надо.

[Aristarh Dark]

и запрос поменяй на:

Код:

select * from book WHERE автор LIKE %:avtor%

либо в коде напиши:

Код:

DataModule1.FindQuery.Parameters.ParamByName('avto r').Value:='%'+Trim(FindavtorEdit.Text)+'%';

или то, или то, но не оба сразу.