想把comboBox和lookupComboBox关联起来该怎么办？(100分)

procedure TForm1.ADODataSet1AfterOpen(DataSet: TDataSet);
begin
try
ComboBox1.Items.Clear;
while not ADODataSet1.Eof do
begin
ComboBox1.Items.Add(ADODataSet1.Fields[0].AsString);
ADODataSet1.Next;
end;
finally
ADODataSet1.Close;
end;
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
var
WY:String;
begin
WY:=ComboBox1.Text;
ADOQuery1.SQL.Add('select CSWD from txcs where WY='''+WY+'''');
ADOQuery1.Active:=true;
end;


代码如上，为什么comboBox1中选择了数据在dblookupComboBox中没有反应？
编译没有问题

WY:=ComboBox1.Text;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select CSWD from txcs where WY='''+WY+'''');
ADOQuery1.Active:=true;

to blue_morning
想问一下的是，
lookupComboBox的数据源是在dataSource中设置还是在listSource中设置？
我是分别在两个中都设置，但还是没有反应呀？

大侠们帮忙看看呀

你其实可以考虑使用comboBox，而不是DBLookupComboBox,
可以在第一个comboBox的onchange事件中向第二个comboBox加入符合条件的items，这样就
可以实现第一个和第二个comboxBox的关联。

多人接受答案了。