Copy/write StyledText.RTFData to file

[Carlo_Rubini]

Carlo,
puoi provare con l’eccellente codice di Massimo Valle.
(scorri il contenuto del link fin verso la metà)

Saving StyledText.RTFData

Hello, I am using this code to save Styled Text in a MultiLine Styled TextArea, it is fast enough when there is a small amount of text but for larger amounts of text the time taken could be minutes. If Document <> Nil then 'Document.SaveStyledEditField RxPadefBuffer 'This is the saved data Dim TOS As TextOutputStream TOS = TextOutputStream.Create(Document) TOS.Write(RTFTextArea.StyledText.RTFData) TOS = nil End if Is there another way to do this more efficiently? Thanks. Lennox