Товарищи, возымел я нужду в написании программы с базой данных ACCESS и возможностью поиска по ней. Нашел в сети ролик в котором создается аналог, но так как мой уровень знания языка Delphi равен 0 и автор не удосужился объяснить все связи, функции, аргументы и логику я пришел уже в конце пути в тупик. Моё предположение что я что-то напутал прописывая код поиска, а что найти не могу. Уже кучу вариантов перепробовал меняя местами операторы, читал форум –правил синтаксис. Короче тупик. Помогите поправить поиск. (Есть ошибка в слове стеллаж, но и столбец с ошибкой. Это потом поправлю). Заранее Спасибо.
Код:
procedure TForm1.Edit1Change(Sender: TObject);
var help1, help2:string;
begin
help1:='%'+Form1.Edit1.Text+'%';
help2:=QuotedStr(help1);
with Form1.ADOQuery1 do
begin
close;
SQL.Clear;
SQL.Add('SELECT * FROM DBTel WHERE [Ячейка] like'+help2+' or [Номенклатурный номер] like'+help2+' or [Название материала] like'+help2+' or [Стелаж] like'+help2+' order by Fam');
Open;
end;
end;
Таблица называется Fam.