|
#1
|
|||
|
|||
Поиск
Поиск по БД в любимом Acess'e
----------------------------------------- Код:
procedure TForm6.Edit1Change(Sender: TObject); var help1: string; begin help1:='%'+Form6.Edit1.text+'%'; help1:= QuotedStr(help1); with DataModule2.ADOQuery1 do begin DataModule2.ADOQuery1.Close; DataModule2.ADOQuery1.SQL.Clear; DataModule2.ADOQuery1.SQL.Add('select*from Клиенты where Имя like '+help1+' '); DataModule2.ADOQuery1.Open; end; end; Последний раз редактировалось BlacKCheT, 18.06.2018 в 18:20. |
Этот пользователь сказал Спасибо BlacKCheT за это полезное сообщение: | ||
Alegun (18.06.2018)
|
#2
|
|||
|
|||
И снова седая ночь...
Что то пошло не так.. Приходится обращаться к магам)))
|
#3
|
||||
|
||||
Пжлст, пока никто не видит, оформите ваш код тегом [СODE]..[СODE]
Небольшой ликбез,конструкция with..do специально разработана для сокращения набираемого кода,все что между точек после набирать не обязательно т.е. DataModule2.ADOQuery1.Close можно сократить до просто Close; По теме - поля кириллицей в запросе следует "заковычивать", знак процентов при выборке вроде выдаст все и вся,а искомая строка и так уже в кавычках после функции QuotedStr Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
#4
|
|||
|
|||
Нет тут в другом дело
Нужно установить библиотеку EHlib. Вот сейчас колдую
|
#5
|
|||
|
|||
Установки библии...
Поставил библиотеку, указал путь, а она не появляется в чем дело?
|
#6
|
|||
|
|||
Вопрос решен.
Вопрос решен, можно удалять.
|