title: Get richtext from a richedit in Delphi
body: <p>Is there a way to get the RTF data from a richedit without using savetostream as in</p>
  
  <pre><code>strStream := TStringStream.Create('') ;
  try
    RichEdit.Lines.SaveToStream(strStream);
    Text := strStream.DataString;
    strStream.CleanupInstance;
  finally
    strStream.Free
  </code></pre>