RichEdit and AdvRichEditor

Hello,
how to copy the content from a normal RichEdit into a AdvRichEditor ?

thanks and kind regards
   Gerd

Set RichEdit.PlainText = false and save to stream.
Drop a TAdvRichEditorRTFIO component on the form and connect it to the TAdvRichEditor. Then load AdvRichEditorRTFIO from the stream with TAdvRichEditorRTFIO.LoadFromStream(stream);

Hi,

there is no AdvRichEditorRTFIO.LoadFromStream(stream)

AdvRichEditorRTFIO.Load() has an overload that can use stream.

This give me a EStreamError , TStream.seek not implemented.
Using XE7 and component 1.7.3.0

I retested the stream handling and I cannot see a problem in our component.

Test code:



procedure TForm1.Button1Click(Sender: TObject);
var
  ms: TMemoryStream;
begin
  ms := TMemoryStream.Create;
  ms.LoadFromFile('e:\tms\temp\bullets.rtf');
  ms.Position := 0;

  AdvRichEditorRTFIO1.Load(ms);
  ms.Free;
end;

This works fine without any error.