Añadir elementos sin repetir

[jhonny]

Yo lo haría asi, asumiendo que Edit1 es el componente que usaras para introducir datos a ese ComboBox1:

Código Delphi [-]
 
if ComboBox1.Items.IndexOf(Edit1.text) <> -1 then //IndexOf devuelve la posición en la que se encuentra el parámetro que se paso, y si no existe pues devuelve -1
begin
  //Introduces el codigo correspondiente...
end;

[jhonny]

Esto me pasa por no leer bien la cuestión y andar de nuevo con mis prisas, si sigue el consejo de Delphius sera mas eficiente pues el sql traerá los datos sin repetirlos...

Mi ejemplo te sirve por ejemplo, en caso de que estuvieras alimentando los datos desde un Edit o algo por el estilo.