Brug af DbComboBox

Jeg har en database med posterne :
KontaktPerson
TelefonNummer
LopkalNr

For at indlæse kontaktPerson i DBComboBox\'en har jeg skrevet :

Var
i : Integer;
begin
DataModule1.TbKontaktperson.First;
For I := 0 to DataModule1.TbKontaktperson.RecordCount -1 Do
Begin
  DBComboBox3.Items.Add(DataModule1.TbKontaktperson.FieldValues[\'KontaktPerson\']);
  DataModule1.TbKontaktperson.Next;
end;

Og det virker fint

så har jeg to DBEdit til TelefonNummer og LokalNr

Men når jeg skifter KontaktPerson i DBComboBox\'en så skifter TelefonNummer og LokalNr ikke

hvad er det som jeg gør forkert ??

anold