давай я перефразирую. скажем мы вводим в Combobox "ан"
Код:
ADOQuery1.SQL.Text := 'SELECT Fam.Fam FROM Fam WHERE (Fam.Fam LIKE "' + combobox1.Text + '*");';
ADOQuery1.ExecSQL;
ADOQuery1.Open;
он открывает список и там высвечиваются все имена из таблици имен начинающиеся на "АН" пользователь может выбрать или написать сам.