Вывод информации в ComboBox

[Starget]

Доброго времени суток! Имеется проект, написанный в Borland C++ Builder. Имеется база данных Access, подключенная к проекту. В Базе данных содержатся несколько таблиц (к примеру Бетон, Камень, Грунт), а в каждой из таблиц информация о материале. На форме в проекте имеется два Combox'a. Допустим выбираем в первом Combobox'e Таблицу (к примеру бетон), а во тором комбобоксе будет отображаться столбец из таблицы, выбранной в первом комбобоксе. Подскажите пожалуйста, как такое реализовать ? И как адаптировать под свои нужды представленный ниже код ? Заранее спасибо !

Для вывода столбца из определенной таблицы использовал такой код:

 
   ADOQ1->Close();
   ADOQ1->SQL->Clear();
   ADOQ1->SQL->Add("SELECT nazv_m FROM utep");
   ADOQ1->Open();
   ADOQ1->First();
   for(int i = 0; i < ADOQ1->RecordCount; i++)
    {
      ComboBox7->Items->Add(ADOQ1->FieldValues["nazv_m"]);
      ADOQ1->Next();
    }

[phomm]

Зависит от структуры данных, т.к. понять фразу

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

решительно нельзя. В первом комбо выбирается не таблица, а поле nazv_m из записи из таблицы utep. Какой столбец должен отображаться - Вы не пишете.

Ну и, конечно, я уж не говорю про то, что справочный материал ("а в каждой из таблиц информация о материале") выводить в комбо - негуманный подход.

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

ADOQ2->SQL->Add("SELECT * FROM " + ComboBox7->Items[ComboBox7->ItemIndex]);

Его надо будет повесить на обработчик события OnChange комбо7

[nagi12-02]

Попробуй так, у меня все работает :

sDBComboBox2->Items->Clear();
Form1->ADOTable6->First();
for (int q=0; q<Form1->ADOTable6->RecordCount;q++)
{
sDBComboBox2->Items->Add(Form1->ADOTable6->Fields->Fields[1]->AsString);
Form1->ADOTable6->Next();