![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
![]() Этот запрос не работает:
Код:
procedure TForm1.SpeedButton1Click(Sender: TObject); var f:string; begin f:=inputbox('Поиск по БД','Введите фамилию человека',''); if f <> '' then begin with Form1.Query1 do begin close; SQL.Add('SELECT *'); SQL.Add('FROM MobNomera'); SQL.Add('WHERE LIKE Fam %'+f+'%'); SQL.Add('ORDER BY Name'); open; end; end; end; < Invalid use of keyword. Token: WHERE Line Number: 3 > Что делать? |