DBGrid, ADOQuery и запрос с Edit

@avpdnepr · Регистрация: 12.08.2015

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

Простите за простой вопрос, но полдня поисков не дало нужного результата. У меня не выводит данные запроса, введенный в Edit, в таблицу DBGrid

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
void __fastcall TForm1::EditSearchChange(TObject *Sender)
{
    if (EditSearch->Text.IsEmpty()) { 
        ADOQueryPatient->SQL->Clear();
        ADOQueryPatient->SQL->Add("SELECT * FROM Patient");
        ADOQueryPatient->Open();
    }
    else { 
        ADOQueryPatient->SQL->Clear();
        ADOQueryPatient->SQL->Add("SELECT * FROM Patient WHERE [Name] LIKE '*"
                + EditSearch->Text + "*'");
        ADOQueryPatient->Open();
    }
}

@Sasha · 19.11.2015, 18:07

А как ты DBGrid подключил?
А так работает?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
if (EditSearch->Text.IsEmpty()) {
        ADOQueryPatient->Close();
        ADOQueryPatient->SQL->Clear();
        ADOQueryPatient->SQL->Add("SELECT * FROM Patient");
        ADOQueryPatient->Open();
    }
    else {
        ADOQueryPatient->Close(); 
        ADOQueryPatient->SQL->Clear();
        ADOQueryPatient->SQL->Add("SELECT * FROM Patient WHERE [Name] LIKE '"
                + EditSearch->Text + "%'");
        ADOQueryPatient->Open();
    }

@avpdnepr · 19.11.2015, 18:30 **[ТС]**

Подключил DBGrid с помощью ADOQuery + DataSourse

Нет работает

Добавлено через 9 минут
Я пробовал запрос с верхней части кода в нижнюю. Тогда отображает все записи при вводе в Edit

@Chertenok_n_13 · 20.11.2015, 00:42

попробуйте так

C++
1
2
3
4
5
6
7
8
9
10
if (EditSearch->Text.IsEmpty()) { 
        ADOQueryPatient->SQL->Clear();
        ADOQueryPatient->SQL->Add("SELECT * FROM Patient");
        ADOQueryPatient->Open();
    }
    else { 
        ADOQueryPatient->SQL->Clear();
        ADOQueryPatient->SQL->Add("SELECT Patient.*, Patient.Name FROM Patient WHERE (((Patient.Name) LIKE \"*" + EditSearch->Text + "*\"));");
        ADOQueryPatient->Open();
    }

@xxbesoxx · 20.11.2015, 00:55

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

У меня не выводит данные запроса, введенный в Edit, в таблицу DBGrid

Тогда запрос надо отправлять из в Edit вам это ?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
void __fastcall TForm1::btn1Click(TObject *Sender)
{
if (Trim(Edit1->Text)!="")
     {
        ADOQuery1->Close();
        ADOQuery1->SQL->Clear();
        ADOQuery1->SQL->Add(Edit1->Text);
        ADOQuery1->Open();
     }
     else
     {
        ADOQuery1->Close();
        ADOQuery1->SQL->Clear();
        ADOQuery1->SQL->Add(" SELECT * FROM Employees ");
        ADOQuery1->Open();
     }
}

Я пробовал запрос с верхней части кода в нижнюю. Тогда отображает все записи при вводе в Edit

или так ?

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Edit1Change(TObject *Sender)
{
    ADOQuery1->Close();
    ADOQuery1->SQL->Clear();
    ADOQuery1->SQL->Add("SELECT *FROM Employees WHERE FirstName LIKE '"+ Trim(Edit1->Text)+"%'");
    ADOQuery1->Open();
 
}

Добавлено через 4 минуты
Chertenok_n_13, смотрите WHERE (((Patient.Name) LIKE "*" + EditSearch->Text + "*"));") EditSearch оператор случайно нажал пробел и потом набрал то что он хочет найти ... Trim не нужно ?

@Lord_Voodoo · 20.11.2015, 01:06

avpdnepr, а вы в админке проверяли ваш запрос? какие результаты получаются от запроса непосредственно в базе данных? я надеюсь, вы это сделали?

@Chertenok_n_13 · 20.11.2015, 07:34

xxbesoxx,фактически надо, но мне кажется ему до этого нужно самому дойти и разобраться.

@avpdnepr · 20.11.2015, 10:18 **[ТС]**

В Access работает запрос; в программе пустые строки показываются

@Chertenok_n_13 · 20.11.2015, 19:09

C++
1
ADOQueryPatient->SQL->Add("SELECT Patient.*, Patient.Name FROM Patient WHERE (((Patient.Name) LIKE \"%" + EditSearch->Text + "%\"));");

тогда так

@xxbesoxx · 20.11.2015, 19:47

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

в программе пустые строки показываются

Так будет работать

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::EditSearchChange(TObject *Sender)
{
      ADOQueryPatient->Close;
      ADOQueryPatient->SQL->Clear();
      ADOQueryPatient->SQL->Add("SELECT * FROM Patient WHERE [Name] LIKE '"+ Trim(EditSearch->Text)+"%'");
      ADOQueryPatient->Open();
    
}

@INSULIN · 06.12.2015, 14:13

DBEdit просто перетащи и под KeyDown дай SetFocus для обновления

Новые блоги и статьи Все статьи Все блоги /
Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Programma_Boinc 01.01.2026 Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .

@avpdnepr 1 / 1 / 1 Регистрация: 12.08.2015 Сообщений: 125
	19.11.2015, 18:30 [ТС]
	Подключил DBGrid с помощью ADOQuery + DataSourse Нет работает Добавлено через 9 минут Я пробовал запрос с верхней части кода в нижнюю. Тогда отображает все записи при вводе в Edit 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	20.11.2015, 01:06
	Сообщение было отмечено avpdnepr как решение Решение avpdnepr, а вы в админке проверяли ваш запрос? какие результаты получаются от запроса непосредственно в базе данных? я надеюсь, вы это сделали? 0

@Chertenok_n_13 219 / 125 / 99 Регистрация: 14.03.2011 Сообщений: 628
	20.11.2015, 07:34
	xxbesoxx,фактически надо, но мне кажется ему до этого нужно самому дойти и разобраться. 0

@avpdnepr 1 / 1 / 1 Регистрация: 12.08.2015 Сообщений: 125
	20.11.2015, 10:18 [ТС]
	В Access работает запрос; в программе пустые строки показываются 0

@INSULIN 0 / 0 / 0 Регистрация: 13.07.2014 Сообщений: 54
	06.12.2015, 14:13
	DBEdit просто перетащи и под KeyDown дай SetFocus для обновления 0

DBGrid, ADOQuery и запрос с Edit

Решение