Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.06.2009, 15:02   #31
Derius
Пользователь
 
Регистрация: 30.06.2009
Сообщений: 21
По умолчанию

Я просто удивляюсь, авторам книг по программированию, они просто-напросто друг-у-друга "катают" и выдают за свое, а ТОЛКОВО и ДОСТУПНО не хотят и не могут объяснить
Derius вне форума Ответить с цитированием
Старый 30.06.2009, 16:28   #32
SlavaSH
Форумчанин
 
Регистрация: 12.08.2008
Сообщений: 174
По умолчанию

Цитата:
Сообщение от Derius Посмотреть сообщение
Я просто удивляюсь, авторам книг по программированию, они просто-напросто друг-у-друга "катают" и выдают за свое, а ТОЛКОВО и ДОСТУПНО не хотят и не могут объяснить
Что-то там у тебя всё как-то сложно...

В событиях для Edit'a выбери OnChange и вставь вот этот код:

Код:
  ADOQuery1.Close;
  ADOQuery1.SQL.Text:='SELECT * FROM sr WHERE Fam LIKE "'+Edit_Search.Text+'%"';
  ADOQuery1.Open;
а событие OnKeyUp возникает даже в тех случаях, когда это совсем не нужно, его в других случаях используют.

А если хочешь, чтобы искало не только по первым буквам фамилии, но так же если они нах-ся в середине, то такой код:

Код:
  ADOQuery1.Close;
  ADOQuery1.SQL.Text:='SELECT * FROM sr WHERE Fam LIKE "%'+Edit_Search.Text+'%"';
  ADOQuery1.Open;
SlavaSH вне форума Ответить с цитированием
Старый 30.06.2009, 19:45   #33
Derius
Пользователь
 
Регистрация: 30.06.2009
Сообщений: 21
По умолчанию

Цитата:
Сообщение от SlavaSH Посмотреть сообщение
Что-то там у тебя всё как-то сложно...

В событиях для Edit'a выбери OnChange и вставь вот этот код:

Код:
  ADOQuery1.Close;
  ADOQuery1.SQL.Text:='SELECT * FROM sr WHERE Fam LIKE "'+Edit_Search.Text+'%"';
  ADOQuery1.Open;
а событие OnKeyUp возникает даже в тех случаях, когда это совсем не нужно, его в других случаях используют.

А если хочешь, чтобы искало не только по первым буквам фамилии, но так же если они нах-ся в середине, то такой код:

Код:
  ADOQuery1.Close;
  ADOQuery1.SQL.Text:='SELECT * FROM sr WHERE Fam LIKE "%'+Edit_Search.Text+'%"';
  ADOQuery1.Open;

Да, кстати, этот код еще оптимальней. Спасибо
Derius вне форума Ответить с цитированием
Старый 22.05.2010, 15:15   #34
Самец_Original
 
Регистрация: 21.05.2010
Сообщений: 4
По умолчанию

спасибо за помощь
Самец_Original вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Фильтрация Screame Microsoft Office Excel 7 01.07.2009 22:37
Фильтрация Felonalex БД в Delphi 4 24.10.2008 20:09
фильтрация отображения из ADO... Roof БД в Delphi 5 19.08.2008 14:38
Фильтрация по неполному ключу в компонентах ADO ГЫнок Помощь студентам 1 17.08.2008 16:58
Фильтрация Лукманов Александр БД в Delphi 1 26.06.2008 10:18