【搞定】TComBox**

wj0623

如何将数据插入入TComBox？

lixy

tcombox.items.add('');

atiger

设置TComBox 的Items 属性，

wj0623

Items 怎么实现从数据库提取数据， 举个例子呢？

atiger

呵呵，不从数据库提取数知道怎么做吧，例如想把“11”加载进去,ComboBox1.items.add('11')
你只需要把11换成从字段的值就可以了，
ComboBox1.items.add(DsDataSet .Dataset.FieldByname('NAME').asString);

wj0623

看看我的代码，数据怎么出不来呢？
procedure BizFormCreate(Sender: TObject);

procedure TYHGL.BizFormCreate(Sender: TObject);
  begin
     Combox_LX.Clear;
    with TQuery.Create(Self) do
    try
      ConnectionString := 'DATABASEURL=Biz:\JQGL\JQGLSJK.DATABASE';
      CommandText := 'Select SBLX from SBMXB';
    Open;
    while not Eof do
    begin
       Combox_LX.Items.Add(FieldByName('SBLX').AsString);
      Next;
    end;
  finally
    Free;
end;
   end;

atiger

你跟踪一下，代码是否按照你的意愿在执行，传进去的值是否是你要的，
要学会调试自己的代码。

yancm

Open;
first;
    while not Eof do

wj0623

提交包，帮我调试一下，谢谢～～～～～

yancm

看一下delphi的调试部分的帮助文档。