Código Delphi [-] procedure TForm1.Button1Click(Sender: TObject); begin DblookUpComboBox1.ListSource:=DataSource1; DblookUpComboBox1.ListField:='Codigo;Nombre'; DblookUpComboBox1.KeyField:='Nombre'; end;
procedure TForm1.Button1Click(Sender: TObject); begin DblookUpComboBox1.ListSource:=DataSource1; DblookUpComboBox1.ListField:='Codigo;Nombre'; DblookUpComboBox1.KeyField:='Nombre'; end;