ComboBox 如何从数据库读数据以显示列表  并加一个 "全部" 的列表

解决方案 »

  1.   

      adoquery1.Close;
       adoquery1.sql.clear;
       adoquery1.SQL.add('select * from 表 where 条件=quotedstr(trim(combobox1.text))+'');
       adoquery1.open;
       while not adoquery1.Eof do
        begin
         combobox1.Items.Add(adoquery1.FieldValues['班级名称']);
         adoquery1.Next;
         end;
       adoquery1.First;
      

  2.   

    DataSet.Eof表示数据集已经到达最后一条记录的下一条了,简单说就是没有数据了
      

  3.   

    with  adoquery1 do
      begin
       close;
       SQL.Text:='select kk from kaikai where kk=''帅哥''';
       open; 
       while not Eof do 
        begin 
          combobox1.Items.Add(Fields[0].asString); 
          Next; 
        end;
       combobox1.Items.Add('全部'); 
     end;