Cómo almacenar y mostrar colores?

[andressanchez]

Te voy a dar una idea, espero que te ayude.

1 - selecciona un componente tpanel y ponlo en tu formulario
2 - luego selecciona un componente tcolordialog.
3 - pon dos tbuttom.

ahora vamos a codificar en el evento click del boton:

procedure TForm1.button1Click(Sender: TObject);
begin
if ColorDialog1.Execute then //ejecutamos la ventana de colores
begin //si acepto la ventana entonces
panel1.color := colordialog1.color; //asignamos el color al panel
// Para verlo en pantalla

end
end;

// en este otro boton puedes almacenar el color en tu table
procedure TForm1.button2Click(Sender: TObject);
begin
table1.open;
table1.append;
table1.fieldbyname('color').asinteger := panel1.color;
table1.post;
end;

bueno ahi tienes como mostrar el color en pantalla, y como almacenarlo en tu base de datos. Espero que te sirva