如何在delphi中实现TDBComboBox从一个编码表中读数据！！！！！

Question

如何在delphi中实现TDBComboBox从一个编码表中读数据！！！！！  
有一个编码表  
bm      mc  
1        工程师  
2        经济师  
3        统计师  
 
怎样在TDBComboBox中显示  工程师，经济师，统计师，而保存到数据苦中是1，2，3  
，在asp中容易实现，现在在delphi中如何实现？？？？  
请指点！！！！  
谢谢！！！  
 
是用dbcombobox,还是用combobox!!  
 

Answer 1

我试了一下发现直接想通过数据库关连出其它单元的内容，dbcombobox好象不能办到，要么你指定选中的数代表什么意义，要么在别处使用sql语言实现。我晚上再试一下，如果dbcombobox能做到我还会发消息给你的，还有如果不能很方便的做到用combobox和dbcombobox就没有什么区别了，但是书上说dbcombobox是根据连接的数据库中的特性指定的字段，我还要试试

Answer 2

用dblookupcombobox可以实现你的要求

Answer 3

不知道是不是你所需要的?还是用combobox吧!
procedure TForm1.FormCreate(Sender: TObject);
begin
  with Query1 do
    begin
      Close;
      SQL.Clear;
      SQL.Add('Select * From 编码表');
      Open;
      Combobox1.Clear;
      if RecordCount>0 then
        begin
          Combobox1.Items.Add(FieldByName('bm').AsString);
          Next;
        end;
    end;
end;