Question

怎么取出cxLookupComboBox多列的值

Answer 1

在数据表中加了一个主键

Delphi/Pascal code?

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;