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

@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 **[ТС]**

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

Новые блоги и статьи Все статьи Все блоги /
Транскрипция 55-минутного видео через Whisper: WhisperDesktop облажался, спас Google Colab[ anaschu 01.06.2026 Понадобилось получить текст из свежезагруженного видео на YouTube. Казалось бы, задача на пять минут. Заняла полтора часа. Делюсь опытом — может кому пригодится последовательность решений. . . .	21 мат мед. Планы на развитие модели здравоСохранения anaschu 01.06.2026 AnyLogic: план развития симуляционной модели рабочего коллектива — динамический абсентеизм, реальные данные, три сценария сравнения Продолжаю серию постов о дискретно-событийной модели рабочего. . .	20. Мат мед. Абсентеизм как отдельный тип простоя anaschu 29.05.2026 Апдейт модели: исправленные баги, абсентеизм и новые механизмы Продолжаю развивать ранее описанную модель рабочего коллектива на AnyLogic. За последние несколько дней был проведён серьёзный. . .	19. здоровье, усталость и психотип работника влияют на производительность предприятия, и наоборот, производительность на здоровье, усталось и психотип anaschu 28.05.2026 Дискретно-событийная модель рабочего коллектива на AnyLogic: здоровье, выгорание, психотипы и микростимуляция Привет, коллеги. Хочу поделиться итогами нескольких недель работы над симуляционной. . .
"Прокси" для последовательного порта Eddy_Em 28.05.2026 Эту штуку написал я достаточно давно. Но сейчас вот понадобилось настроить датчик грозы, но при этом не отключать его от "метеодемона". Соответственно, надо запустить этот "прокси": метеодемон будет. . .	Рефакторинг программы уравнивания. Massaraksh7 26.05.2026 Пример по предыдущей записи в блоге. Но, надо заметить, что, во-первых, там оптимизация не только математики, но и работы с базой данных, и с графами, а во-вторых, это ещё не всё.	Использование TThread в Lazarus для математических вычислений. Massaraksh7 25.05.2026 Производя рефакторинг своих программ на предмет ускорения их работы, обратил внимание на такой аспект, как сокращение времени матвычислений. Дело в том, что приходится работать с большими матрицами. . .	Модель здравосохранения 18. Чем здоровее работник, тем быстрее выгорает anaschu 24.05.2026 Имитационная модель корпоративного здравоохранения: что показывает математика Сегодня в модели рабочего коллектива на AnyLogic появились три новые механики — выгорание через накопленную усталость,. . .

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

Опции темы