Каким образом можно получить доступ к RTF тексту? (что то типа string s:=Rich.RichText.Lines.RTF)

Question: Каким образом можно получить доступ к RTF тексту? (что то типа string s:=Rich.RichText.Lines.RTF)

Answer:

В приведенном коде при клике на TfrxRichView его содержимое копируется в Memo1 на диалоговой форме: 

1
2
3
4
5
6
7
8
9
10
procedure Rich1OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean); 
var st: TMemorystream; 
begin st:=TMemoryStream.Create; 
Rich1.RichEdit.StreamFormat:=0; 
Rich1.RichEdit.Lines.SaveToStream(st); 
st.Position:=0; 
Memo1.Lines.LoadFromStream(st); 
st.Free; 
DialogPage1.ShowModal; 
end;