Hola.
Si en el
TDBLookupComboBox tenés bién asignadas las propiedades:
ListSource,
ListField y
KeyField, sólo hay que hacer la asignacion:
Código Delphi
[-]
DBLookupComboBox1.KeyValue:= DBGrid1.DataSource.DataSet.FieldByName('Campo').Value;
O simplemente:
Código Delphi
[-]
DBLookupComboBox1.KeyValue:= DataSet.FieldByName('Campo').Value;
Donde 'Campo' es el mismo campo declarado en la propiedad
KeyValue del
TDBLookupComboBox y DataSet es el
TDataSet asociado.
Saludos.