dbcombobox与表中字段连接问题

Question

本人使用dbcombobox与数据表中的某个字段连接,我使用的方法是procedure TForm1.FormCreate(Sender: TObject);
var I:integer;
begin
if Query1.Active then
   Query1.Active :=false;//数据库中某张的表的某一列的查询；
   Query1.Active :=true;
Query1.First;
while not Query1.Eof do
   begin
    DBComboBox1.Items.Add(Query1.FieldByName('品牌').AsString );
    Query1.Next;
   end;end;end.现在的问题是在dbcombobox中已经将品牌字段的所有内容加如了,但是不能进行条目的选取和显示,比如我要换一个条目在dbcombobox中没有显示,也不改变.为什么?

Answer 1

用dbcombobox只要设置这个控件的dataset数据源连接就好了，不必写代码往里面填充的。至于要翻滚到别的记录，还需要添加另一个翻滚记录的控件,名字忘了(家中机器没装delphi),就是一个横条带很多箭头的那个,用那个控件也是要设置数据源就可以，也不用代码

Answer 2

用Select disnict 品牌 FROM Tablename
在用用你的
Query1.First;
while not Query1.Eof do
   begin
    DBComboBox1.Items.Add(Query1.FieldByName('品牌').AsString );
    Query1.Next;
   end;end;  就可以了