Código Delphi [-] DBLookupComboBox.KeyValue := Query1.FieldByName('codigo').AsInteger; //codigo sería el campo que has asignado a KeyField
DBLookupComboBox.KeyValue := Query1.FieldByName('codigo').AsInteger; //codigo sería el campo que has asignado a KeyField