回 帖 发 新 帖 刷新版面

主题:如何用ComboBox1来提取数据库中的一组数据

如何用ComboBox1来提取数据库中的一组数据   谢谢拉  新手求救

回复列表 (共3个回复)

沙发

self.ADOQuery1.Open;
  while not self.ADOQuery1.Eof do
  begin
  self.ComboBox1.Items.Add(self.ADOQuery1.FieldValues['username']);
  self.ADOQuery1.Next;
  end;

板凳

var i:integer;
begin
  with adoquery1 do 
     begin
     close;
     sql.add('select 字段名 from 表名');
     open;
      for i:=1 to recordcount do
         begin
         combobox1.Items.add(fieldbyname(字段名).AsString);
        next;
         end;
     end;
end;

3 楼

query.open;
with query do
begin 
    if RecordCount<=0 then Exit;
    Combobox1.clear;
    while not eof do
    begin
         combobox1.items.add(fieldvalues['fieldname']);
         Next;
    end;
end; 

我来回复

您尚未登录,请登录后再回复。点此登录或注册