DBComboBox를 만들어서
데이터베이스하고 연결했거든요...

void __fastcall Tfrmbkchange::FormCreate(TObject *Sender)
{
        while(!SQLDataSet1->Eof)
        {
                DBComboBox1->Items->Add(SQLDataSet1->FieldByName("CLSKIND")->AsString );
                SQLDataSet1->Next();
        }

}

쓰니까 그림 같이 나오기는 하는데....

선택이 안되는데 어떻게 해야 하는 건가요??

void __fastcall Tfrmbkchange::DBComboBox1KeyDown(TObject *Sender,
      WORD &Key, TShiftState Shift)
{
         AnsiString a;
         a = DBComboBox1->Items->Strings[DBComboBox1->ItemIndex];
}

선택된값을 변수에 넣을수 있게 해야 하는데...
선택이 안되니 변수에 넣어진 값이 0이에요..ㅠㅠ