RTF-Code aus RichEdit auslesen

[Sharky]

Zitat von ibp:

...versuchs mal mit der plaintext option im oi von richedit...

Du musst es glaube ich über einen Stream lösen:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  myStream : TMemoryStream;
begin
  myStream := TMemoryStream.Create;
  try
    RichEdit1.PlainText := False;
    RichEdit1.Lines.SaveToStream(mystream);
    myStream.Position := 0;
    Memo1.lines.LoadFromStream(mystream);
  finally
    myStream.Free;
  end;
end;