＋设为首页 ＋添加到收藏夹
我想把一个字段的值赋给一个下拉框，并且把字段中的重复的值只显示一个，还有我的下拉框有2个，前面的变化后面的跟着变化，请问各位高手如合作，最好有个例子。谢谢。
1)
ADOTable.First;
while not ADOTable.Eof do
begin
if Combobox1.Items.indexof(ADOTable.FieldByName(你要加入的字段名).AsString)=-1
then
begin
Combobox1.Items.Add(ADOTable.FieldByName(你要加入的字段名).AsString);
Combobox2.Items.Add(ADOTable.FieldByName(你要加入的字段名).AsString);
end;
2)
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
Combobox2.Text:=Combobox1.text;
end;
Combobox1.Items.Add(trim(ADOTable.FieldByName(字段名).AsString));
query1.close;
query1.sql.clear;
query1.sql.add(select distinct 字段 from Table);
query1.open;
query1.first;
while not query1.eof do
begin
ComboBox1.items.add(query1.fieldbyname(字段).asstring);
query1.next;
end;
