如何取出cxLookupComboBox多列的值.

Question

A    B     C      D
1    2     2      2
2    2     3      3
3    2     1      0
在下拉列表中选字段A 的值2时,希望B的2值自动填到EDIT1.TEXT中,C的值3自动填到EDIT2.TEXT中,D的值3自动填到EDIT3.TEXT中.请叫了.

Answer 1

1.有主键ID
2.Query.Filter:='ID='+cxLookupComboBox.EditValue;
  Edit1.Text:=Query.FieldByName('B').Asstring;

Answer 2

cxLookupComboBox就是连接字典表的，根据cxLookupComboBox.EditValue知道其主键了，其它值还取不出来？

Answer 3

to:liangpei2008
按你的方法,怎么无伦选择A列的那一个值,EDIT1,2,3中得到的都是第一行B,C,D的值呀.

Answer 4

//注：我在数据表中加了一个主键procedure TForm1.Button1Click(Sender: TObject);
begin
  adoQuery1.Filter:='ID='+IntToStr(cxLookupComboBox1.EditValue);
  adoQuery1.Filtered:=True;
  Edit1.Text:=adoQuery1.FieldByName('B').AsString;
  Edit2.Text:=adoQuery1.FieldByName('C').AsString;
  adoQuery1.Filtered:=False;
end;
procedure TForm1.FormShow(Sender: TObject);
begin
 with adoquery1 do
  begin
    close;
    sql.Clear;
    sql.Text:='select * from test';
    open;
  end;
end;

Answer 5

明白了.liangpei2008接分吧.