begin adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Text:='select distinct 用户姓名 from 系统管理 where 姓名 !=''1''';
adoquery1.Open;
combobox1.Clear;
while not adoquery1.eof do
begin
combobox1.Items.Add(adoquery1.fieldbyname(' 用户姓名 ').AsString);
adoquery1.Next;
end
end;
那个数据写不进COMBOBOX
adoquery1.SQL.Clear;
adoquery1.SQL.Text:='select distinct 用户姓名 from 系统管理 where 姓名 !=''1''';
adoquery1.Open;
combobox1.Clear;
while not adoquery1.eof do
begin
combobox1.Items.Add(adoquery1.fieldbyname(' 用户姓名 ').AsString);
adoquery1.Next;
end
end;
那个数据写不进COMBOBOX
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货