Показать сообщение отдельно
  #1  
Старый 02.06.2017, 06:13
PiP3 PiP3 вне форума
Прохожий
 
Регистрация: 02.06.2017
Сообщения: 1
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Проблема с запросов в ACCESS

Товарищи, возымел я нужду в написании программы с базой данных 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.
Изображения
Тип файла: jpg 111111.jpg (50.0 Кбайт, 5 просмотров)
Тип файла: jpg 222222222.jpg (86.4 Кбайт, 4 просмотров)
Ответить с цитированием