|
Ya esta. Ya he encontrado la solucion a este problema.
Por defecto, el texto de un TRichEdit esta limitado a 64 KB.
La ayuda del Delphi indica que lo anterior esta controlado por
la propiedad MaxLength. En la ayuda nos indica que si este valor
es 0 no existe limite definido en la aplicacion en la longitud del texto.
Sin embargo, tambien hay una nota adicional que dice que, incluso con
el valor de 0, puede haber una limitacion en el numero de caracteres
impuesto por el Sistema Operativo.
En el caso del Windows XP este limite es de 64KB.
Estableciendo Maxlength a $7FFFFFF0 permite que tengamos
aproximadamente 2GB de texto.
Yo lo he limitado a 24 Megabytes ($1800000), que ya esta bien.
Esto lo hago dentro del Evento OnCreate.
RichEdit1.MaxLength := $1800000;
Saludos
Nota: ¿Por que podia abrir ficheros enormes y no hacer Copiar/Pegar?
La respuesta esta en que cuando abria el fichero accedo directamente
a la propiedad Lines, la cual es una TStrings y crece dinamicamente.
|