campo tipo blob alimentado por richedit

Estou desenvolvendo uma rotina que terá de armazenar o conteudo de um richedit. Gostaria de saber dos colegas como faco para alimentar este campo e como devo declar esta variavel. Já pensei em guardar em arquivo mesmo e salvar o nome do arquivo em uma tabela, porem se acontecer alguma coisa este arquivo será perdido, coisa que se for para dentro de uma tabela esta possibilidade diminui bastante.

Exemplo :

procedure click de um btn
Var
v_texto:

begin

qry1.sql.text:=´insert into cabecalho (campoblob) values (v_texto)´

end;


A minha ideia é +- esta.
Desde já agradço pela ajuda .