Проблемы с ComboBox

[byaka2405]

Всем добрый вечер, обыскала кучу форумов в поиске ответа, но ничего подходящего не нашла.
Есть на форме функция добавления, и парочка комбобоксов, нужно реализовать связь первого комбобокса со вторым, чтобы при выборе параметров в первом (в моем случае структура отдела) во втором автоматически появлялись только отделы, которые находятся в этой структуре, это все реализовано, но работает коряво, список во втором появялется только при выборе отдела и обновления таблицы, и еще проблема в том, что эта функция не работает как добавление, т.е. во втором комбо боксе просто появляется список, но выбрать значение нельзя, не отображается((

void __fastcall TForm5::FormCreate(TObject *Sender)
{
Form2->ADOQuery2->First();
while(!Form2->ADOQuery2->Eof)
{
bool b=false;
String Text= Form2->ADOQuery2->FieldByName("структура")->AsString;
for(int i=0;i<ComboBox1->Items->Count;i++)
if( ComboBox1->Items->Strings[i]==Text ) b=true;
if( !b ) ComboBox1->Items->Add(Text);

Form2->ADOQuery2->Next();




}


Form2->ADOQuery2->First();
while(!Form2->ADOQuery2->Eof)
{
bool a=false;
String Text= Form2->ADOQuery2->FieldByName("Название отдела")->AsString;
for(int i=0;i<ComboBox2->Items->Count;i++)
if( ComboBox2->Items->Strings[i]==Text ) a=true;
if( !a ) ComboBox2->Items->Add(Text);
Form2->ADOQuery2->Next();
}







}

void __fastcall TForm5::ComboBox1Change(TObject *Sender)
{
//Очистили и заполнили 2-й Комбобокс
ComboBox2->Items->Clear();
ComboBox2->Text = "";
Form2->ADOQuery2->Close();
Form2->ADOQuery2->SQL->Clear();
Form2->ADOQuery2->SQL->Add("SELECT * FROM СправочникПК where структура = '" + ComboBox1->Text+"' ");




Form2->ADOQuery2->Open();

Form2->ADOQuery2->First();
for(int i = 0; i < Form2->ADOQuery2->RecordCount; i++)
{
ComboBox2->Items->Add( Form2->ADOQuery2->FieldValues["Название отдела"]);




Form2->ADOQuery2->Next();
}



}

[xxbesoxx]

Всем добрый вечер, обыскала кучу форумов в поиске ответа, но ничего подходящего не нашла

Книгу надо почитать или полистать и потом подумать

нужно реализовать связь первого комбобокса со вторым, чтобы при выборе параметров в первом (в моем случае структура отдела) во втором автоматически появлялись только отделы, которые находятся в этой структуре, это все реализовано, но работает коряво,

void __fastcall TForm5::ComboBox1Change(TObject *Sender)
{
//Очистили и заполнили 2-й Комбобокс
ComboBox2->Items->Clear();
ComboBox2->Text = "";
Form2->ADOQuery2->Close();
Form2->ADOQuery2->SQL->Clear();
Form2->ADOQuery2->SQL->Add("SELECT * FROM СправочникПК where структура = '" + ComboBox1->Text+"' ");

//Очистили и заполнили 2-й Комбобокс это код кто так закоментировал ?

ComboBox2->Items->Clear(); // здесь очистили да! Там уже нечего нету
ComboBox2->Text = ""; // и здесь уже это не надо

потом

// начинайте запрос в таблице СправочникПК и это запрос правильно работаеть ?
Form2->ADOQuery2->Close();
Form2->ADOQuery2->SQL->Clear();
Form2->ADOQuery2->SQL->Add("SELECT * FROM СправочникПК where структура = '" + ComboBox1->Text+"' ")

[byaka2405]

Книгу листала, думать - думала
Запрос правильно работает.
Проблема была в том, что события не правильно раскидала