combobox.items.clear;
with query do
begin
close;
sql.clear;
sql.add('select * from table');
open;
while not eof do
begin
combobox.items.add(query.fields[].value);
next;
end;
end;
combobox1.Items.Clear;
Adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from secu');
adoquery1.Open;
for i:=0 to adoquery1.RecordCount-1 do
begin
combobox1.Items.Add(adoquery1.FieldList.FieldByName('用户名').AsString);
adoquery1.Next;
end;