Eliminar marcas de formato rtf

[Neftali [Germán.Estévez]]

En ese caso (del error) parece que se solventa aumentando el límite por defecto para el componente.

Prueba añadiendo esta línea antes de la carga:

Código Delphi [-]
   Richedit1.perform(EM_EXLIMITTEXT,0,$0FFFFFFF); 
   RichEdit1.Lines.LoadFromFile('.\audio.rtf');

Deberás añadir la unit Richedit al USES.

Un saludo.

[esocrates]

Empezado por Neftali

En ese caso (del error) parece que se solventa aumentando el límite por defecto para el componente.

Prueba añadiendo esta línea antes de la carga:

Código Delphi [-]
   Richedit1.perform(EM_EXLIMITTEXT,0,$0FFFFFFF); 
   RichEdit1.Lines.LoadFromFile('.\audio.rtf');

Deberás añadir la unit Richedit al USES.

Un saludo.

¡¡Perfecto!! He cargado un archivo de 2 MB sin problemas y sin las marcas de rtf que no quería ver.
Ahora el problema está solucionado.
Quedo muy agradecido por tu ayuda y enseñanza Neftali
Saludos y hasta pronto