Обновление данных из БД в ComboBox

@Seruch · Регистрация: 11.11.2020

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

Всем привет. У меня несколько таблиц в проекте. На первой форме я заполняю данные в первую таблицу через едиты. Потом есть четвертая форма на которой у меня есть комбобоксы в которые передается информация из первой таблицы.
Проблема вот в чем: Я запускаю программу и когда заношу в первую таблицу данные, то в комбобоксе они виднеются только после перезапуска программы. Можно ли как то сделать так, что бы данные в комбобоксе обновлялись сразу, чтоб я не выходил из программы и не заходил опять. Помогите пожалуйста! Сам код комбобокса у меня пустой. Привожу ниже код алгоритма как у меня добавляются в комбобокс данные из первой таблицы. И так же ниже прикрепляю скриншоты как оно некорректно работает.

C++
1
2
3
4
5
6
7
8
9
10
void __fastcall TForm4::FormCreate(TObject *Sender)
{
 
    for(int i = 0; i < Form1->ADOQuery3->RecordCount; i++)
    {
      ComboBox3->Items->Add(Form1->ADOQuery3->FieldValues["Номер_документу"]);
      Form1->ADOQuery3->Next();
    }
 
}

@D1973 · 23.09.2022, 20:11

Я больше чем уверен, что формы у Вас автосоздаваемые, поэтому событие OnCreate для каждой формы выполняется только один раз, при ее создании. А вот если Вы поместите свой код в обработчик события, который будет отрабатывать каждый раз при отображении формы, например, в onActivate - то Вы получите желаемое...
Вот только не надо надеяться на свойство RecordCount, иногда оно может подкинуть необъяснимый фортель и показать другое, отличное от истинного, значение. Поэтому цикл лучше организовать так:

C++
1
2
3
4
5
6
7
void __fastcall TForm4::FormActivate(TObject *Sender)
{
    while(!Form1->ADOQuery3->Eof) {
       ComboBox3->Items->Add(Form1->ADOQuery3->FieldByName("Номер_документу")->AsString);
       Form1->ADOQuery3->Next();
    }
}

@Seruch · 23.09.2022, 21:53 **[ТС]**

D1973, я попробовал, не помогло. Такая же самая проблема

Добавлено через 44 минуты
D1973, может. это потому, что у меня Form4 показывается не сразу, а только при нажатии на Button, который находиться на Form1???

C++
1
2
3
4
void __fastcall TForm1::Button3Click(TObject *Sender)
{
          Form4->Show();
}

@D1973 · 24.09.2022, 04:53

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

я попробовал, не помогло. Такая же самая проблема

Что именно? Менять цикл или помещать код в другой обработчик, что, собственно, и требуется?

@Seruch · 24.09.2022, 11:29 **[ТС]**

D1973, я создал обработчик FormActivate ив него поместил ваш цикл

@D1973 · 24.09.2022, 11:47

Именно для формы Form4? И ничего? Да не верю.

Добавлено через 1 минуту
Хотя стоп, верю! Перед тем как заполнять комбобокс значениями поля запроса, запрос этот надо заново выполнить.

Не по теме:

Даже не подумал про это сразу, до того это очевидно...

@Seruch · 24.09.2022, 12:29 **[ТС]**

D1973, да для Form4. А в ADOQUerry3 у меня в свойстве sql прописано

SQL
1
SELECT Номер_документу FROM Owner

@D1973 · 24.09.2022, 12:32

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

у меня в свойстве sql прописано

На так и выполните этот запрос перед тем, как заполнять комбобокс

C++
1
2
3
4
5
6
7
8
9
10
void __fastcall TForm4::FormActivate(TObject *Sender)
{
    Form1->ADOQuery3->Open();
    if(Form1->ADOQuery3->IsEmpty()) return; 
    ComboBox3->Items->Clear();
    while(!Form1->ADOQuery3->Eof) {
       ComboBox3->Items->Add(Form1->ADOQuery3->FieldByName("Номер_документу")->AsString);
       Form1->ADOQuery3->Next();
    }
}

@Seruch · 24.09.2022, 13:18 **[ТС]**

D1973, Спасибо. Это действительно решило проблему

Новые блоги и статьи Все статьи Все блоги /
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-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .

@Seruch 2 / 2 / 0 Регистрация: 11.11.2020 Сообщений: 232
	24.09.2022, 11:29 [ТС]
	D1973, я создал обработчик FormActivate ив него поместил ваш цикл 0

@D1973 Модератор 9907 / 6444 / 2455 Регистрация: 21.01.2014 Сообщений: 27,354 Записей в блоге: 3
	24.09.2022, 11:47
	Именно для формы Form4? И ничего? Да не верю. Добавлено через 1 минуту Хотя стоп, верю! Перед тем как заполнять комбобокс значениями поля запроса, запрос этот надо заново выполнить. Не по теме: Даже не подумал про это сразу, до того это очевидно... 0

@Seruch 2 / 2 / 0 Регистрация: 11.11.2020 Сообщений: 232
	24.09.2022, 13:18 [ТС]
	D1973, Спасибо. Это действительно решило проблему 0

Обновление данных из БД в ComboBox

Решение