Foros Club Delphi - Eliminar marcas de formato rtf

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Eliminar marcas de formato rtf (https://www.clubdelphi.com/foros/showthread.php?t=68619)

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.

Cita:

Empezado por Neftali (Mensaje 368331)

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