★★如何得到DBComboBox的当前值???★★

Question

我利用循环把字段的内容读到DBComboBox中,现在DBComboBox已经显示了姓名,语文,数学三项,
我想把DBComboBox当前选中的项读入到s中;
void __fastcall TForm1::DBComboBox1Change(TObject *Sender)
{        AnsiString s;
        s=DBComboBox1->Items->Text;
        ShowMessage(s);
}
但结果却是姓名.语文.数学三行,我只是想要当前选中的一项读到s中,应如何做??

Answer 1

=DBComboBox1->Items[DBComboBox1->Items->ItemIndex];

Answer 2

上楼的,出错呀
提示ItemIndex不是Items的成员
我换成
s=DBComboBox1->Items[0];
也不能通过.....

Answer 3

我没有装CBD。不好意思是Delphi ItemIndex意思是选择的项的索引号。CBD中应该有类似的index×××

Answer 4

昏一行是用 lines 的 
s=DBComboBox1.lines