Cargar combobox con datos de tabla

[loadminds]

gracias bluesteel x la pronta respuesta, acabo de hacerlo andar con un combobox desplazandome en la dbgrid y cargandolo de a uno, funciona bien, pero no logro evitar que muestre los repetidos, hay formas de preguntar si el item ya existe dentro del combobox?el codigo me quedo mas asi:
procedure TForm1.CcatChange(Sender: TObject);
begin
With dbgrid1.datasource.dataset do begin
First;
While not eof do begin
{aca seria posible preguntar si el codigo ya esta en el combobox?}
Ccat.Items.Add(FieldByName('Categoria').AsString);
Next;
end;
end;
end;

funcionar funciono, no se si sea la forma correcta de hacerlo xq estoy arrancando recien, pero el problema es solo mostrar 1 vez cada categoria, es decir no ver repetidos, se me ocurrio preguntar x cada valor que agrego a items, pero no se como hacer la comparacion, Gracias!!