How to extend the maximum length of a TRichEdit

Problem/Question/Abstract:

I'm trying to load a 200kb file into a richedit but cannot add any new text to it. I can delete and replace, but not add.

Answer:

Probably the MaxLength of the TRichEdit gets set to the file size. Set it to something several times larger than the file after load, e.g.

with richedit1 do
  maxLength := 10 * GetTextLen;