Delphi - Cómo cargar un texto con formato en dbrichedit

Hola necesito saber cómo puedo hacer para cargar un texto con formato (negrita, tipo de letra, color, etc)en un base de datos, supongo que es con el dbrichedit pero tengo un error y no me toma el formato, la sentencia que uso es

datamodule2.query1.close;
datamodule2.Query1.SQL.Clear;
datamodule2.Query1.SQL.Add('update ordenanzas set texto_norma=:a where cod_ordenanza=:b ');
datamodule2.Query1.Params[0].AsMemo:=DBRtexto_norma.Text;
//datamodule2.Query1.Params[0].AsString:=form3.DBRtexto_norma.Text;
datamodule2.Query1.Params[1].AsString:= form2.cod_ordenanza.Text;
datamodule2.Query1.ExecSQL;

Si alguien me puede ayudar contestenmé les agradecería muchísimo

Velia