怎么从一个数据库中读出一列将其放入combo控件！！！

我是新手，请解答。 问题点数：20、回复次数：11Top

1 楼lzf1010（深宇）回复于 2002-04-16 13:17:58 得分 0

combo.items.add(dataset.fieldbyname(yourfieldname));Top

2 楼outer2000（天外流星）回复于 2002-04-16 13:20:39 得分 0

为什么不用DBLookupComboBoxTop

3 楼NetFair（2006，成功转型！从事市场工作！坚持技术市场两手抓，两手都要硬方针！）回复于 2002-04-16 13:22:26 得分 5

假设你用的是Table  
  Table1.first;  
  while   not   Table1.eof   do  
  begin  
      ComboBox1.items.add(Table1.FieldByName('字段名').AsString);  
      Table1.Next;  
  end;Top

4 楼mr_wn（宝盖丁）回复于 2002-04-16 13:23:22 得分 5

with   query1   do  
  begin  
      close;  
      sql.clear;  
      sql.add('select   onefield   from   tabel');  
      open;  
      first;  
      while   not   eof   do  
          begin  
              combobox.items.add(fieldbyname(onefield).asstring);  
              next;  
          end;  
  end;Top

5 楼shengs（你想猜赢我啊，边有禁鬼易，我猜！）回复于 2002-04-16 13:23:51 得分 0

楼上的方法可以，  
  用dbcombobox控件也可以，  
  datasource设置数据表，datafield选字段就可以，  
  Top

6 楼20004（20004）回复于 2002-04-16 13:23:52 得分 0

我不行呀，我太笨了，我用了一个DataSource1和一个combobox1  
  请您直接写给我代码，谢谢，成功马上给份。Top

7 楼mr_wn（宝盖丁）回复于 2002-04-16 13:24:37 得分 5

with   query1   do  
  begin  
      close;  
      sql.clear;  
      sql.add('select   onefield   from   tabel');  
      open;  
      first;  
      combobox.items.clear;  
      while   not   eof   do  
          begin  
              combobox.items.add(fieldbyname(onefield).asstring);  
              next;  
          end;  
  end;Top

8 楼mr_wn（宝盖丁）回复于 2002-04-16 13:25:47 得分 5

with   query1   do  
  begin  
      close;  
      sql.clear;  
      sql.add('select   onefield   from   tabel');  
      open;  
      first;  
      combobox.items.clear;  
      while   not   eof   do  
          begin  
              combobox.items.add(fieldbyname(onefield).asstring);  
              next;  
          end;  
  end;Top

9 楼prometheusphinx（白日梦）回复于 2002-04-16 13:26:48 得分 0

combobox1.items.clear;  
  datasource1.dataset.first;  
  while   not   datasource1.dataset.eof   do  
  begin  
      combobox1.items.add(datasource1.dataset.fieldbyname('aaa').asstring);  
      datasource1.dataset.next;  
  end;Top

10 楼20004（20004）回复于 2002-04-16 13:27:27 得分 0

怎么给分呀，不要打我，我是新手！Top

11 楼everydayniceday（大卫）回复于 2002-04-16 13:36:15 得分 0

我真是没什么可写的，他们说的都没错，我也用过的，没问题。Top

12 楼20004（20004）回复于 2002-04-16 13:42:41 得分 0

我成功了，谢谢各位，但还有：    
   
  楼上的方法可以，  
  用dbcombobox控件也可以，  
  datasource设置数据表，datafield选字段就可以，  
   
     
    我选了可是只能出现一项，为什么？？？？？？？？？？？？？？Top

相关问题

• 控件
• sql
• onefield
• dobegin
• combobox
• fieldbyname
• asstring
• datasource
• eof
• clear

• 帖主：20004
• NetFair
• mr_wn
• mr_wn
• mr_wn

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载