Database + DBComboBox søge ting

Hey jeg er ved at lave et lille program i delphi 6.
problemet er at jeg har en DBGrid og en DBComboBox når man vælger et tekst i DBComboBox skal den hoppe ned til den post i mit DBGrid virker også fint første gang men anden gang over skriver den bare den værig som står i mit DBGrid nogen forslag.

jeg har brugt denne kode til at få min DBComboBox til at hoppe ned til den post som man vælger.
og sætter jeg min database til read only får jeg fejl.

procedure TForm1.DBComboBox1Click(Sender: TObject);
begin
ADODataSet1.Locate(\'Niveau1\',DBComboBox1.Text,[loCaseInsensitive, loPartialKey]);
end;

Håber i kan hjælpe mig.

/mb