Hola Camilo, yo utilizaria un CheckListBox que esta en la paleta Additional, así solo tendrias que recorrer y preguntar cuales estan chekeados, ejemplo:
Código Delphi
[-]
var
i : Integer;
Colores : String;
begin
Colores := '';
for i:=0 to CheckListBox1.Items.Count-1 do
begin
if CheckListBox1.Checked[i] then
Colores := Colores+CheckListBox1.Items[i]+',';
end;
showmessage(Colores);
En este codigo, tienes que quitarle la ultima coma, puede ser con un copy y tu cadena Colores sería la que guardarias en tu campo.
Otra forma sería, recorriendo los componentes de tu formulario, verificar si es un checkbox y hacer lo anterior.
Saluditos