Hola Luis.
Una opción es que crees en tu componente dataset un campo persistente (calculado de tipo string) con una longitud igual a la suma de campo
CODIGO + espacio + divisor + espacio + longitud del campo
FAMILIA.
Ese campo calculado (llamémosle
CALCULADO ) será quién aparezca en la propiedad
ListField del
TDBLookupComboBox.
Por último agregas un poco de código al evento
OnCalcFields del DataSet:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
if Assigned(tuDataModule) then
tuDataModule.tuDataSet.OnCalcFields := tuDataSetCalcFields;
end;
procedure TForm1.tuDataSetCalcFields(DataSet: TDataSet);
begin
tuDataModule.tuDataSetCalculado.AsString := Format('%s - %s',
[tuDataModule.tuDataSetCODIGO.AsString,
Trim(tuDataModule.tuDataSetFAMILIA.AsString)]);
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
tuDataModule.tuDataSet.OnCalcFields := nil;
end;
Saludos