Public Sub ParseAndDraw
ParseData.NeedToReparseWhenResize = False
ParseData.Text = mText
ParseData.URLs.Clear
ParseData.Width = (mBase.Width - Padding.Left - Padding.Right)
If RTL Then mTextEngine.RTLAware = True
Dim pe As List = mTextEngine.TagParser.Parse(ParseData)
sv.ScrollViewInnerPanel.RemoveAllViews
If TouchPanel.IsInitialized Then
sv.ScrollViewInnerPanel.AddView(TouchPanel, 0, 0, 0, 0)
End If
sv.ScrollViewInnerPanel.AddView(ForegroundImageView, 0, 0, 2dip, 2dip)
If ExternalRuns.IsInitialized And ExternalRuns.Size > 0 Then
Runs = ExternalRuns
Else
Runs = mTextEngine.TagParser.CreateRuns(pe, ParseData)
End If
Redraw
End Sub