Passar parâmetro para salvar um texto formatado em um richEd

Para formatar um RichEdit, use as funções abaixo:
Richedit1.SelAttributes.Color:=clBLue; // Cor Azul
Richedit1.SelAttributes.Style:=[fsBold,fsUnderline]; // Negrito e sublinhado
Richedit1.Lines.Add(´Linha´); // Adiciona linha
Richedit1.SelAttributes.Style:=[]; // Volta ao estilo normal
Richedit1.SelAttributes.Color:=clBlack; // Volta à cor normal

O campo deveria ser FORMATEDMEMO em vez deMEMO
[url=http://clubedelphi.videomart.com.br/posting.php?mode=reply&t=4776]
[img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_biggrin.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_smile.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_frown.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_eek.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_confused.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_cool.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_lol.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_mad.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_razz.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_redface.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_cry.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_evil.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_rolleyes.gif[/img:85b57888db][img:85b57888db]http://www.apriori.com.br/cgi/forum/images/smiles/icon_wink.gif[/img:85b57888db]Responder[/url]

Desculpem-me, acho que não expliquei direito. Tenho um RichEdit onde digito um memorando, textos em geral. E desejo gravar do texto da forma como foi digitado em um banco de dados Access ou Sql Server.

Aqui está a rotina que estou usando para gravar a formatação.

with DM.qryGeral do
begin
close;
sql.clear;
sql.text := ´insert into parecer values (:1, :2, :3, :4, :5, :6, :7)´;
Params[0].Value := codigo;
Params[1].Value := ´1´;
Params[2].Value := edReferencia.text;
Params[3].Value := edOrigem.text;
Params[4].Value := edInteressado.text;

// A linha abaixo deveria enviar o texto formatado para o banco, entretanto, não grava apenas o texto sem a formatação.

Params[5].AsMemo := rcParecer.Lines.Text;
params[6].Value := date;
execsql;
end;

Como gravar o texto e sua formatação?

Não compreendi?