Delphi - DBCOMBOBOX

Que tal, necesito saber la forma de poder llenar un DBCOMBOBOX con todos los datos capturados de un campo de una tabla. Ejemplo Si en la tabla 'AMIGOS' tengo el campo 'nombre' y tengo 3 registros: Pedro, María, Juan...hacer que el COMBO se llene automáticamente con los registros existentes en ese campo cada vez que se inicie la aplicación. Claro que si agrego más registros, pues también deben aparecer en el combo. Gracias.

TablaAmigos.First;
While not TablaAmigos.Eof do
begin
ComboBox.Items.Add(TablaAmigos.FieldByName('Campo').AsString);
TablaAmigos.Next;
end;

Te doy la solución aunque lo ideal sería que usaras un dbLookupComboBox.