Como faço para gravar no banco de dados a cor do shape1

Como faço para gravar no banco de dados a cor do shape1

QProduto.SQL.Clear;
QProduto.SQL.Add(´Insert into Produtos (Codigo, NOME, Data_Entrada, Data_Vencimento,´+
´Cod_Tipo, Cod_Externo, Cod_Tecnico, Concentracao, Faixa, Quantidade)´);
QProduto.SQL.Add(´Values(´+ QuotedStr (editCodigo.Text) + ´,´+
QuotedStr(editNomeProduto.Text) + ´, ´+
QuotedStr(editDataEntrada.Text)+´,´+
QuotedStr(editDataVencimento.Text)+´ ,´+
QuotedStr(editCodTipo.Text)+´,´+
QuotedStr(editCodExterno.Text)+´,´+
QuotedStr(editCodExterno.Text)+´,´+
QuotedStr(editConcentracao.Text)+´,´+
QuotedStr([color=red:2040534425]Shape1. .........Aqui que não sei..... [/color:2040534425])+´,´+
QuotedStr(editEstoque.Text)+´)´);
QProduto.ExecSQL;