Insert numbered list programmatically

[Igor]

How can a numbered (or bulleted) list be inserted into a rich text box programmatically?

[Jack]

Hello Igor,

You can do this by using the RadRichTextBox API for text search and selection. Please consider the following code snippet:

radRichTextBox1.Document.Selection.Clear();
DocumentTextSearch search = new DocumentTextSearch(radRichTextBox1.Document);
TextRange range = search.Find("start");
TextRange range2 = search.Find("end", range.EndPosition);
if (range != null && range2 != null)
{
    this.radRichTextBox1.Document.Selection.AddSelectionStart(range.StartPosition);
    this.radRichTextBox1.Document.Selection.AddSelectionEnd(range2.EndPosition);
    this.radRichTextBox1.ChangeListStyle(DefaultListStyles.Bulleted);
}

I hope it helps.
 
All the best,
Jack
the Telerik team

[Igor]

Thank you for your help. I managed to achieve this in the following way (VB.NET):

For Each item As String In itemList
    radRichTextBox1.Insert(item & Environment.NewLine)
Next

'Format the item list as numbered list
radRichTextBox1.Document.Selection.Clear()
Dim search As New DocumentTextSearch(radRichTextBox1.Document)
Dim range1 As TextRange = search.Find(itemList(0))
Dim range2 As TextRange = search.Find(itemList(itemList.Count - 1), range1.EndPosition)
If range1 IsNot Nothing And range2 IsNot Nothing Then
    radRichTextBox1.Document.Selection.AddSelectionStart(range1.StartPosition)
    radRichTextBox1.Document.Selection.AddSelectionEnd(range2.EndPosition)
    radRichTextBox1.ChangeListStyle(DefaultListStyles.Numbered)
End If
radRichTextBox1.Document.Selection.Clear()