Edit text of a large size

Posted in Components

Sometimes you must edit a text of a large size, but Memo and RichEdit don't allow you such editing, if file size more than 64 Kb. To change this option, you may use EM_LIMITTEXT message.

procedure TForm1.Button2Click(Sender: TObject);
begin
  Memo1.Perform(EM_LIMITTEXT, StrToInt(Edit1.Text), 0)
end;