Hola Phako.
Si no entendí mal tu consulta bastaría con que asignaras la clave primaria a la propiedad
KeyValue del
TDBLookupComboBox cuando cambias la fila, por ejemplo:
Código Delphi
[-]
...
procedure TForm1.FormCreate(Sender: TObject);
begin
DataSource1.OnDataChange := DataSource1DataChange;
end;
procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
DBLookupComboBox1.KeyValue := Query1.FieldByName('PRIMARY_KEY').Value;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.Next
end;
...
El evento
OnDataChange lo podes configurar en tiempo de diseño; lo hice en tiempo de ejecución para clarificar el ejemplo.
Saludos