简单问题!ComboBox动态添加元素

[HYKOD]

怎样才能将一数据库中某一字段的各记录内容添加到ComboBox中?

[hzhxxx]

ComboBox->Items->Add(AnsiString item);

[myy]

Query1->SQL->Text="select a,b from tab";
Query1->Open();
for(Query1->First(); !Query1->Eof; Query1->Next())
ComboBox1->Add(Query1->FieldByName("a")->AsString);