Recoger en BDLookUpComboBox

[marcoszorrilla]

No se si te refieres a algo como esto:

procedure TForm1.Button1Click(Sender: TObject);
begin
DbLookUpComboBox1.ListSource:=DataSource1;
DbLookUpComboBox1.ListField:='Codigo;Nombre';
DbLookUpComboBox1.KeyField:='Codigo';
DbLookUpComboBox1.DropDown;
end;

Un Saludo.