combobox1.clear; adoquery1.close; adoquery1.sql.clear; adoquery1.sql.add('select distinct 任职部门 from table'); adoquery1.open; for i:= 0 to adoquery1.recordcount-1 do begin combobox1.add(adoquery1.fieldbyname('任职部门').asstring); adoquery1.next; end; 大概吧,没测试。
combobox1.clear; query1.close; query1.sql.clear; query1.sql.add('select 任职部门 from rs'); query1.open; for i:= 0 to adoquery1.recordcount-1 do begin combobox1.add(query1.fieldbyname('任职部门').asstring); query1.next; end;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select distinct 任职部门 from table');
adoquery1.open;
for i:= 0 to adoquery1.recordcount-1 do
begin
combobox1.add(adoquery1.fieldbyname('任职部门').asstring);
adoquery1.next;
end;
大概吧,没测试。
query1.close;
query1.sql.clear;
query1.sql.add('select 任职部门 from rs');
query1.open;
for i:= 0 to adoquery1.recordcount-1 do
begin
combobox1.add(query1.fieldbyname('任职部门').asstring);
query1.next;
end;