show RTF string in silverlight 4

i have an RTF string coming from a web service into a silverlight 4 application, RTF example begins like:
{\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fo......

I want to show this information in a richtextbox or some silverlight control , and i would like the information to look readable like the rendered RTF should be (not looking like above!)

keep in mind silverlight cannot access the system.windows.documents API

if it's not possible then i could consider solutions where the web service code which is ASP.NET fw4 converts the rtf string to xaml?  which i also dont know how to do.

thanks
josh

joshmillerAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
joshmillerAuthor Commented:
yes, that got me on the right track, thanks...

i ended up making a web service / service ref that uses the code below to return an xaml string.  The xaml string is used by the silverlight app to populate a richtextbox. its sort of a hack, but it works for me.
 note: i did have to change the replace("margin function to work with the default margins for the RTF docs.  In this way my solution is weak, it will break if you have different margins, still it works for my needs.


Private Function RTFtoXAML() As String

        Dim xaml As String = ""
        Dim doc As New FlowDocument()
        Dim range As New TextRange(doc.ContentStart, doc.ContentEnd)

        Using ms As New MemoryStream()
            Using sw As New StreamWriter(ms)
                sw.Write(sw)
                sw.Flush()
                ms.Seek(0, SeekOrigin.Begin)
                range.Load(ms, System.Windows.DataFormats.Rtf)
            End Using
        End Using


        Using ms As New MemoryStream()
            range = New TextRange(doc.ContentStart, doc.ContentEnd)

            range.Save(ms, System.Windows.DataFormats.Xaml)
            ms.Seek(0, SeekOrigin.Begin)
            Using sr As New StreamReader(ms)
                xaml = sr.ReadToEnd()
            End Using
        End Using

        ' remove all attribuites in section and remove attribute margin  

        Dim start As Integer = xaml.IndexOf("<Section")
        Dim [stop] As Integer = xaml.IndexOf(">") + 1

        Dim section As String = xaml.Substring(start, [stop])

        xaml = xaml.Replace(section, "<Section xml:space=""preserve"" HasTrailingParagraphBreakOnPaste=""False"" xmlns=""http://schemas.microsoft.com/winfx/2006/xaml/presentation"">")
        xaml = xaml.Replace("Margin=""0,0,0,0""", [String].Empty)

        Return xaml

    End Function

Open in new window

0
joshmillerAuthor Commented:
thanks
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Development

From novice to tech pro — start learning today.