|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.03.2008, 11:49 | #1 |
Регистрация: 30.03.2008
Сообщений: 4
|
поиск ни как не хочет работать
помогите плиз...хочу сделать поиск в БД асес через поле эдит по вводимому символу в столбце ФИО. я начинающий в кодинге. пересмотрел кучу форумов и справок везде одно и тоже:
procedure Edit1OnChange(...); var i:integer; begin if not updating then exit; {сделайте обновление где-нибудь еще - например при срабатывании таймера} updating:= false; Table1.FindNearest([Edit1.text]); ListBox1.clear; i:= 0; while (i < 5) and (not (table1.eof)) do begin listbox.items.add(Table1.fields[0].asString); inc(i); table1.next; end; listbox1.itemindex:= 0; end; или: with MainForm.PatientTable do begin { начинаем поиск имени } IndexName := 'Name'; FindNearest([SearchFor.Text]); end не могу запустить ни чего из ентого...как только уже не пробывал редоктировать...прошу подсказать как сделать. если что то из кода проги выложить надо то обращайтесь. если всю прогу надо то пишите в личку я на маил скину. Последний раз редактировалось Gooch; 30.03.2008 в 11:53. |
30.03.2008, 12:12 | #2 |
Пользователь
Регистрация: 29.03.2008
Сообщений: 35
|
Делай через ADOQuery.
Формируешь простейший запрос и результаты выводишь куда тебе надо. DBGrid например. Пример использования. Код:
Есть другой вариант, попроще через filter. Используешь компонент ADOTable. Код:
|
30.03.2008, 13:15 | #3 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
Если хочется через ADOTable сделать, посмотрите хэлп по Table.Locate - там есть готовые примеры использования.
|
30.03.2008, 21:16 | #4 |
Регистрация: 30.03.2008
Сообщений: 4
|
поиск сделал спасиб...а вот ещё такой вопрос...как сделать так чтоб скомпелированному файлу не нано было постоянно указывать где БД расположенна?
|
30.03.2008, 22:12 | #5 | |
Форумчанин
Регистрация: 04.03.2007
Сообщений: 615
|
Цитата:
Код:
|
|
04.04.2008, 20:30 | #6 | |
Регистрация: 30.03.2008
Сообщений: 4
|
Цитата:
|
|
05.04.2008, 20:53 | #7 |
детский тренер
Форумчанин
Регистрация: 08.06.2007
Сообщений: 532
|
Либо как выше..либо...:
Код:
Я злой и страФный серррый воФк, и в пАрАсятах знаю толк - ppp ppp pp p pp pp
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перестал работать поиск в ХРюше. | Adamant | Свободное общение | 5 | 23.08.2008 01:30 |
Кто хочет кнопку? | Altera | Компоненты Delphi | 23 | 12.05.2008 17:01 |
почему не хочет увеличыватся digit2.Value? | ZhekON | Помощь студентам | 2 | 19.04.2007 18:23 |
кто хочет бесплатные скрипты? | Sjava | Свободное общение | 9 | 17.11.2006 07:26 |