怎样将Table1的某字段的所有记录值与下拉框DbpickEdit1连接起来。

Question

有个表Table1中结构如下：
      XL
     本科
     大专
     中专
     高中
现在要求在Form1中放个下拉框如DBPICKEDIT1,(或ComboBox1)，让它能显示Table1.XL的所有记录。 不知有没有好的解法，望大家发言！

Answer 1

ComboBox1.Items.Clear;with Table1 do
begin
  First;
  while not Eof do
  begin
    ComboBox1.Items.Add(FindField('XL').AsString);
    Next;
  end;
end;
ComboBox1.ItemIndex := 0;

Answer 2

楼楼上的说的对，但我还有个这样的问题：
有一表Table1:
    BM    BZ
-------------------
  财务部   
  一车间   1组
  三车间   2组
  二车间   4组
现在我想通过一个Dblookupcombobox1连接这个table1，想通过这个下拉框能显示这两个字段记录信息。望高手能赐教！ 点击下拉框会显示如下：   (且能在dblookupcombobox1下拉框中间有条竖线如下）                    财务部  |
                    一车间  |  1组 
                    三车间  |  2组
                    二车间  |  4组

Answer 3

如果需要同是显示两个字段的信息，就不能用tdblookupcombobox控件，建议还是用 Snakeguo(楠) (莫等闲&up2myself)的方法，手工去读写表中内容显示！

Answer 4

其实用代码写也很快的，一个循环就让计算机去执行了
ComboBox1.Items.Clear;with Table1 do
begin
  First;
  while not Eof do
  begin
    ComboBox1.Items.Add(FindField('XL').AsString);
    Next;
  end;
end;
ComboBox1.ItemIndex := 0;

Answer 5

with Table1 do
begin
  First;
  while not Eof do
  begin
    ComboBox1.Items.Add(FieldByName('BM').AsString+'  |  '+FieldByName('BZ').asString);
    Next;
  end;
end;或者可以不用combobox，可以动态显示dbgrid，多少字段都可以，我经常用。
ComboBox1.ItemIndex := 0;

Answer 6

这个问题解决了。大家辛苦了，现在想问一下谁有没有好的日期编辑控件呀，能直接连接数据库的，不是datatimepicker?哦的信箱是[email protected] 谢谢了。