Mega Code Archive

 

Categories / Delphi / VCL

 

How to store more than 64 KB in a TRichEdit

Title: How to store more than 64 KB in a TRichEdit procedure TForm1.Button1Click(Sender: TObject); begin RichEdit11.MaxLength := $7FFFFFF0; end; //oder: //or: procedure TForm1.Button1Click(Sender: TObject); begin SendMessage(RichEdit1.Handle, EM_EXLIMITTEXT, 0, $7FFFFFF0); end;