![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 06.08.2008
Сообщений: 3
|
![]()
Народ! помогите написать сортировку или поиск, не знаю как это назвать. Допустим у меня в поле "Фамимлия" находятся много Ивановых, Петровых и т.д. и ввожу в TEdit букву "И" и все эти фамилии отфтльтровываются, дальше ввожу "Ив" и все фамилии начинающиеся на ИВ отфильтровываются. Как такое написать? Если можно, напишите код.
У меня есть такой <code> procedure TForm3.Edit1Change(Sender: TObject); begin if Length (Edit1.Text)>0 then DataModule1.map2.Filtered:=true else DataModule1.map2.Filtered:=false; DataModule1.map2.Filter:='Фамилия>' ''+Edit1.Text+''''; end; </code> но он ищет не так как надо, а приближенные значения. А если написать ИВАНОВ то все эти фамилии исчезают. |
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 07.08.2007
Сообщений: 154
|
![]()
Лично я никогда не задаю свойство Filter, а использую событие OnFilterRecord. Вот кусок кода из программы, SpeedSearch - как раз тот Edit в который вводится текст:
Код:
|
![]() |
![]() |
![]() |
#3 |
Регистрация: 06.08.2008
Сообщений: 3
|
![]()
А где взять это событие OnFilterRecord
|
![]() |
![]() |
![]() |
#4 |
Пользователь
Регистрация: 22.07.2008
Сообщений: 49
|
![]()
Я делал так:
Код:
В Edit1,2,3 ищешь по фамилии или имени или отчеству. согласен, что способ не самый лучший, да и зачем изобретать велосипед, когда уже он есть. Но пока мне легче извратиться и придумать что-то вроде выше изложенного, чем воспользоваться продвинутой, но не понятной пока FilterRecord По крайней мере результат тот же. |
![]() |
![]() |
![]() |
#5 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
![]()
нну символ % можно ведь посто добавить в запрос
![]() Label1 тогда не нужен.
Изо всей благодати
В руках крепко сжатых Я донесу только капли |
![]() |
![]() |
![]() |
#7 | |
Пользователь
Регистрация: 22.07.2008
Сообщений: 49
|
![]() Цитата:
![]() |
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите пожалуйста сделать поиск по базе данных в форме! Access 2003 | LilijaSt | Microsoft Office Access | 19 | 25.12.2010 10:13 |
Помогите переделать файловую сортировку на сортировку динамич. списков | Taisja | Помощь студентам | 2 | 15.06.2008 16:10 |
StringGrid сделать сортировку по алфавиту | Римма | Компоненты Delphi | 6 | 12.10.2007 16:15 |