using your RichEdit demo under Demos/Other add a little TImage say a 16x16 bitmap. Add a button that when pressed calls a loop that only stops when terminated:
while not Application.Terminated do
begin
Editor.InsertLink(' aaaaaaaaaaaaaaaaaaaa', 'bbbbbbbbbbbbbbbbbbbb');
Editor.InsertImage(SaveCameraIcon.Picture.Bitmap, False);
Editor.Font.Color := clRed;
Editor.AddLine('RichEdit is very Fast');
application.ProcessMessages;
inc(i);
Label1.Caption := inttostr(i);
end;
When you press the button, you will see lines being written to the IERichEdit and the number of Window's Handles steadily rise. Adding hyperlink and text do not incur Windows Handles.
Search
