![]() |
|
|
![]()
|
|
| Litta |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 55 Регистрация: 14.3.2006 Репутация: нет Всего: 1 |
Приветствую, уважаемые!!!
Работаю на Paradoxe, через BDE. Суть проблемы: с помощью SQL-запроса (через компонент Query) получаю необходимые данные - фсё пучком, но... Возвращает около 2000 записей, т.е. чтобы юзверь долго не копался в поиске той, что ему нужна - нужно сделать поиск по записям запроса!!! Как его организовать??? В отличае от Table в Query нет никаких Find-ов!!! Заранее пасиба! |
|||
|
||||
| SPrograMMer |
|
|||
![]() Спамер :) ![]() ![]() Профиль Группа: Участник Сообщений: 442 Регистрация: 5.11.2004 Где: Краснодар Репутация: 1 Всего: 6 |
зато есть Locate и Lookup Добавлено @ 18:17 а еще в самом запросе есть предложение Where для ограничения числа записей.... -------------------- животное = зверь законченный гентушник |
|||
|
||||
| superVad |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 735 Регистрация: 6.4.2006 Где: Черкассы, Украина Репутация: 3 Всего: 15 |
используй библиотеку EH - в частности DBGridEH вмемто DBGrid
там уже есть поиск - вызываеться по Ctrl+F+F (два раза нажать F) да - и как написал SPrograMMer - можно написать свой не сложный поиск используя Locate (или просто next-ом искать Это сообщение отредактировал(а) superVad - 9.11.2006, 18:26 |
|||
|
||||
| kobra |
|
|||
|
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 730 Регистрация: 15.6.2005 Где: Грузия, Тбилиси Репутация: 1 Всего: 9 |
||||
|
||||
| Rodman |
|
||||
|
CIO ![]() ![]() ![]() ![]() Профиль Группа: Участник Сообщений: 6144 Регистрация: 7.5.2006 Где: Ukraine ⇛ Kyiv ci ty Репутация: 22 Всего: 122 |
Litta, покажи запрос которым выводишь...
Сейчас могу только подсказать что если поиск по всем полям
если по одному столбцу
|
||||
|
|||||
| Litta |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 55 Регистрация: 14.3.2006 Репутация: нет Всего: 1 |
Пасиба!!!
Блин, а я совсем забыл про Locate!!!
Ну условие-то уже поставлено, поэтому ВСЕГО 2000 записей Написал так: procedure TChooseBoss.Edit1Change(Sender: TObject); var s:string; begin QCl.First; s:=Edit1.Text; QCl.Locate('cl_firma',s,[loCaseInsensitive,loPartialKey]); end; Тема закрыта!!! |
|||
|
||||
![]()
|
| Правила форума "Delphi: Базы данных и репортинг" | |
|
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами Обязательно указание: 1. Базы данных (Paradox, Oracle и т.п.) 2. Способа доступа (ADO, BDE и т.д.)
FAQ раздела лежит здесь! Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |