VB.NET-Quellcode
- Public Shared Function GetContentBytes(tr As TextRange) As Byte()
- Using strm = New MemoryStream
- tr.Save(strm, DataFormats.Rtf)
- Return strm.ToArray
- End Using
- End Function
- Public Shared Sub SetContentBytes(tr As TextRange, content As Byte())
- Using strm = New MemoryStream(content)
- tr.Load(strm, DataFormats.Rtf)
- End Using
- End Sub
funktioniert perfekt!