как реализовать выборку?

@adonix · Регистрация: 11.05.2010

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

Есть ComboBox1, 2 и 3. Есть БД access, в ней поля House, Street, Apartment с соответствующими по смыслу типами. есть так же кнопочка

при запуске в SQL ADOQuery пишется запрос на вывод бд.
идея примитивная, необходимо выбирая нужные значения с помощью ComboBox1,2,3 произвести выборку из бд и отобразить в DBGrid.
Для простоты я пробовал назначить на кнопку:

C++
1
2
3
4
5
6
7
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("SELECT *");
ADOQuery1->SQL->Add("FROM Outgoings");
ADOQuery1->SQL->Add("WHERE Street='"+(ComboBox2->Text)+"'and House='"+(ComboBox3->Text)+"'");
ADOQuery1->SQL->Add("ORDER BY Date desc");
ADOQuery1->Open();

но тут возникает куча глюков.
В идеале хотелось бы по OnChange обрабатывать ComboBox-ы, но как реализовать мысль не доходит.

@adonix · 22.07.2010, 14:42 **[ТС]**

в test.h прописал

C++
1
void analis();

в test.cpp прописал

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
void analis();
{
bool and1 = false;
ADOQuery1->Close();
 ADOQuery1->SQL->Clear();
  Memo1->Lines->Clear();
ADOQuery1->SQL->Add("SELECT *");
 Memo1->Lines->Add("SELECT *");
ADOQuery1->SQL->Add("FROM Outgoings");
 Memo1->Lines->Add("FROM Outgoings");
if (ComboBox2->Text!="Óëèöà" || ComboBox3->Text!="Äîì")
 {ADOQuery1->SQL->Add("WHERE ");Memo1->Lines->Add("WHERE ");}
if (ComboBox2->Text!="Óëèöà")
{
 ADOQuery1->SQL->Add("Street='"+ComboBox2->Text+"'");
  Memo1->Lines->Add("Street='"+ComboBox2->Text+"'");
   and1 = true;
}
if (ComboBox3->Text!="Äîì")
{
if (and1) ADOQuery1->SQL->Add("AND");Memo1->Lines->Add("AND");
ADOQuery1->SQL->Add("House='"+ComboBox3->Text+"'");
Memo1->Lines->Add("House='"+ComboBox3->Text+"'");
}
if (Edit1->Text!=""||Edit2->Text!="")
{
AnsiString max,min;
if (Edit1->Text=="")
{min=0;} else {min=Edit1->Text;}
if (Edit2->Text=="")
{max=65535;} else {max=Edit2->Text;}
ADOQuery1->SQL->Add("WHERE Apartment BETWEEN "+min+" AND "+max+"");
Memo1->Lines->Add("WHERE Apartment BETWEEN "+min+" AND "+max+"");
}
ADOQuery1->SQL->Delete()
ADOQuery1->SQL->Add("ORDER BY Date asc");
Memo1->Lines->Add("ORDER BY Date asc");
ADOQuery1->Open();
}

получил ошибку E2040 Declaration terminated incorrectly

@Cepera · 22.07.2010, 14:52

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

void analis();

Точка с запятой в cpp-файле.

Для того, что бы так обращаться к компонентам формы:

C++
1
Edit1->Text

ваша функция должна быть членом-функцией класса формы. Поэтому прототип ее должен быть определен в классе формы, а в cpp-файле она должна быть записана так:

C++
1
2
3
4
void TForm1::analis()
{
 //...
}

(Вместо TForm1 имя вашего класса формы)
А вообще почитайте предыдущее сообщение.

@adonix · 22.07.2010, 15:02 **[ТС]**

с этим разобрался
буду пробовать дальше

Новые блоги и статьи Все статьи Все блоги /
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .

@adonix 0 / 0 / 0 Регистрация: 11.05.2010 Сообщений: 38
	22.07.2010, 15:02 [ТС]
	с этим разобрался буду пробовать дальше 0