Xailer & OZ Software

Estoy usando el Richedit para generar documentos y guardarlos en un campo memo, pero...., como en la base ya habia antes muchos registros me pasa lo siguiente:
Al caer en el registro uno, me presenta el RichEdit con letras pequeñas sin formato, pero al llegar al primer registro que contenga formato RTF, todos los demas, asi me regrese toman un formato tipo BOLD y letras a como lo haya encontrado en el ultimo memo con formato RTF.
En si lo que quiero es que cada vez que yo le pase un nuevo campo memo, siempre entre tomando en cuenta si tiene o no formato RTF.
Ejemplo:
Reg 1: MEMO
Prueba de memo 1
Reg 2:
Campo con formato RTF
Reg 3:
Campo con formato simple.
Regreso al Reg. 2
Campo con formato RTF
Regreso al Reg 1
Prueba de memo 1
Gracias.
--
Ramón Zea
01.993.194.14.27
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
--

Ramón,
Estoy usando el Richedit para generar documentos y guardarlos en un campo memo, pero...., como en la base ya habia antes muchos registros me pasa lo siguiente:
Al caer en el registro uno, me presenta el RichEdit con letras pequeñas sin formato, pero al llegar al primer registro que contenga formato RTF, todos los demas, asi me regrese toman un formato tipo BOLD y letras a como lo haya encontrado en el ultimo memo con formato RTF.
En si lo que quiero es que cada vez que yo le pase un nuevo campo memo, siempre entre tomando en cuenta si tiene o no formato RTF.
Ten en cuenta que al ser el mismo control, mantiene los estilos de letra y párrafo, y si le asignas un texto que no tiene formato, pues le aplica el formato que tiene en ese momento. Lo que debes hacer es asignar una cadena vacia, establecer los formatos y asignar el nuevo texto. Serí­a algo así­:
WITH OBJECT ::oRichEdit1
:cText := ""
:SelectAll()
:SetCharFormat( "Arial", 10, 0, .F., .F., .F., .F., .F., .F. )
:cText := ... // El nuevo texto
END
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
--