Динамическая фильтрация БД

@Str. · Регистрация: 20.04.2012

Студворк — интернет-сервис помощи студентам

Всем привет! Хочу реализовать у себя в программе динамическую фильтрацию и поиск в БД (что бы БД фильтровалась сразу же, по мере введения параметров фильтрации) . У меня есть обычная фильтрация:

C++
1
2
3
4
5
6
7
8
9
10
11
12
if (Edit1->Text=="Код"){
Edit1->Text=LabeledEdit1->Text+LabeledEdit2->Text+LabeledEdit3->Text;}
else {
Edit1->Text=LabeledEdit1->Text+LabeledEdit2->Text+"'"+LabeledEdit3->Text+"'";}
 
Form4->ADOTable1->Filtered=False;
Form4->ADOTable1->Filter= Edit1->Text;
Form4->ADOTable1->Filtered=True;
 
LabeledEdit1->Text="";
LabeledEdit2->Text="";
LabeledEdit3->Text="";

Знаю, для того что бы она стала динамической, её нужно повесить на событие OnChange, но нужно что-то добавить. Аналогично и с поиском. Может кто помочь? Заранее спасибо.

@Sasha · 21.04.2012, 20:04

ИСпользуй запрос для фильтрации

@Str. · 21.04.2012, 20:13 **[ТС]**

Сообщение от Sasha

ИСпользуй запрос для фильтрации

запрос на фильтрацию? ммм...не представляю каким образом..Расскажите, пожалуйста, поподробнее..

@Sasha · 21.04.2012, 20:49

Я имел ввиду лучше использовать запрос, чем фильтрацию на поиск нужных строк

@Str. · 21.04.2012, 20:57 **[ТС]**

Сообщение от Sasha

Я имел ввиду лучше использовать запрос, чем фильтрацию на поиск нужных строк

Возможно, но в данном случае мне нужна все таки динамичность поиска строк, может знаете, как ее реализовать?

@Sasha · 21.04.2012, 21:58

Я не могу понять у тебя что тот код который приведён сверху не работает?

@Str. · 21.04.2012, 22:29 **[ТС]**

Сообщение от Sasha

Я не могу понять у тебя что тот код который приведён сверху не работает?

Работает) Но фильтрация происходит по нажатию кнопки, а мне нужно, что бы это происходило динамически. Я пытаюсь узнать, как его усовершенствовать, чтобы достичь этого.

@Sasha · 21.04.2012, 23:17

НУ так в событие OnChange запихни

@Str. · 21.04.2012, 23:25 **[ТС]**

Сообщение от Sasha

НУ так в событие OnChange запихни

В том-то и дело, если просто запихнуть, то записи отображает только после полного введения параметра, а мне нужно, что бы я ввел, к примеру букву "А", и вывело все записи, в которых в указанном параметре, значение начинается "А", ввел "Ав" - вывело все записи, в которых, в указанном параметре, значение начинается "Ав" и так далее. А так, значения показывает толлько после полного ввода слова "Автомобили".

@Sasha · 22.04.2012, 00:16

Так как ты хочешь не получиться тебе нужно использовать запрос для фильтрации с оператором Like

Добавлено через 1 минуту
http://webmasterschool.ru/sql2/ch6.php

@Str. · 22.04.2012, 00:51 **[ТС]**

Сообщение от Sasha

Так как ты хочешь не получиться тебе нужно использовать запрос для фильтрации с оператором Like

Попробывал, выдает какую-то ошибку по поводу AnsiString
Вот код:

C++
1
2
3
4
5
6
7
8
void __fastcall TForm4::LabeledEdit3Change(TObject *Sender)
{
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("SELECT (Код, Наименование, Вид, Марка, Топливо, МаксимальнаяСкорость) FROM Транспорт WHERE "+ LabeledEdit1->Text +" LIKE '"+ LabeledEdit3 +"%';");
ADOQuery1->ExecSQL();
ADOTable1->Active = true;
ADOTable1->Active = false;
ADOTable1->Active = true;

Ошибка: [C++ Error] Unit4.cpp(109): E2094 'operator+' not implemented in type 'AnsiString' for arguments of type 'TLabeledEdit *'
В чем может быть дело?

@Sasha · 22.04.2012, 00:58

C++
1
2
3
4
   ADOQuery1->Close();
   ADOQuery1->SQL->Clear();
   ADOQuery1->SQL->Add("Select Код, Наименование, Вид, Марка, Топливо, МаксимальнаяСкорость from Glavnaya WHERE Код LIKE '"+LabeledEdit3->Text+"%'");
   ADOQuery1->Open();

@Str. · 22.04.2012, 01:06 **[ТС]**

Что-то все равно - ноль реакции, ввожу значения в LabeledEdit - ничего не происходит

@Sasha · 22.04.2012, 01:10

В какое событие писал?

Добавлено через 2 минуты
В событии фильтрации вверху над своим кодом напиши

C++
1
DataSource1->DataSet = ADOQuery1

@Str. · 22.04.2012, 01:15 **[ТС]**

Сообщение от Sasha

В какое событие писал?

В событие OnChange объекта LabeledEdit3

Добавлено через 4 минуты

Сообщение от Sasha

В событии фильтрации вверху над своим кодом напиши
Код C++
1
DataSource1->DataSet = ADOQuery1

Добавил, в результате, получилось так:

C++
1
2
3
4
5
6
7
8
void __fastcall TForm4::LabeledEdit3Change(TObject *Sender)
{
DataSource1->DataSet = ADOQuery1;
ADOQuery1->Close();
   ADOQuery1->SQL->Clear();
   ADOQuery1->SQL->Add("Select Код, Наименование, Вид, Марка, Топливо, МаксимальнаяСкорость from Glavnaya WHERE Код LIKE '"+LabeledEdit3->Text+"%'");
   ADOQuery1->Open();
}

Но при вводе первого символа в LabeledEdit3 выдает ошибку и разве не нужен ADOQuery1->ExecSQL();?

@Sasha · 23.04.2012, 11:17

Сообщение от Str.

и разве не нужен ADOQuery1->ExecSQL();?

Прочти вот это

Работа с методами Open и ExecSQL

Добавлено через 9 минут

Сообщение от Str.

Но при вводе первого символа в LabeledEdit3 выдает ошибку

Кстати только что посмотрел твою базу у тебя там поле Код имеет тип счётчик, так что не мудрено, что у тебя вылетает ошибка. По этому я тебе советую завести новое поле с типом числовое и туда самому заносить код, а старое поле оставь оно будет тебе автоматом инкреминировать строки.

Добавлено через 17 часов 31 минуту
Вот держи переделал немного

@Sasha · 23.04.2012, 11:50

11111111111111111111

@Str. · 23.04.2012, 14:27 **[ТС]**

Сообщение от Sasha

Вот держи переделал немного

Спасибо, это помогло разобраться)

@Bit_Man · 24.04.2012, 09:10

записи отображает только после полного введения параметра

- значит плохо пробовал. Sasha был прав на счет like. И лучше добавить еще Timer чтоб при вводе в Edit фильтрация не происходила на каждую букву. И Sasha можешь пояснить почему лучше исп. запрос для фильтрации? На сколько мне известно фильтр действует на уже полученные данные запроса.

@Sasha · 24.04.2012, 09:50

Сообщение от Bit_Man

И лучше добавить еще Timer чтоб при вводе в Edit фильтрация не происходила на каждую букву

Таймер там не нужен

Сообщение от Bit_Man

И Sasha можешь пояснить почему лучше исп. запрос для фильтрации? На сколько мне известно фильтр действует на уже полученные данные запроса.

Прочти здесь

http://www.taurion.ru/access/4/2

Новые блоги и статьи Все статьи Все блоги /
Функция установки текстового статуса в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	21.04.2012, 20:04
	ИСпользуй запрос для фильтрации 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	21.04.2012, 20:49
	Я имел ввиду лучше использовать запрос, чем фильтрацию на поиск нужных строк 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	21.04.2012, 21:58
	Я не могу понять у тебя что тот код который приведён сверху не работает? 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	21.04.2012, 23:17
	НУ так в событие OnChange запихни 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	22.04.2012, 00:16
	Так как ты хочешь не получиться тебе нужно использовать запрос для фильтрации с оператором Like Добавлено через 1 минуту http://webmasterschool.ru/sql2/ch6.php 0

@Str. 0 / 0 / 2 Регистрация: 20.04.2012 Сообщений: 35
	22.04.2012, 01:06 [ТС]
	Что-то все равно - ноль реакции, ввожу значения в LabeledEdit - ничего не происходит 0