SelStart: Integer;
Свойство SelStart определяет начальную позицию текста, для которого настраивается форматирование.
Если свойство не определено, то используется позиция IWebTextArea.SelStart и настройки форматирования применяются к тексту, который выделен в компоненте. Данное свойство SelStart не изменяет начало выделения текста в компоненте, но позволяет изменить начальную позицию текста, для которого настраивается форматирование.
Для выполнения примера в репозитории предполагается наличие веб-формы, расположенного на ней компонента TextArea с наименованием TextArea1 и кнопки с наименованием Button1. В компонент TextArea задан какой-либо текст, слова разделены пробелом.
Добавьте ссылку на системную сборку WebForms.
Sub Button1OnClick;
Var
Sel: IWebRichTextSelection;
Begin
Sel := TextArea1.Selection;
If TextArea1.SelStart = TextArea1.SelEnd Then
Sel.SelStart := 0;
Sel.SelEnd := TextArea1.Text.IndexOf(" ");
End If;
Sel.BeginUpdate;
Sel.Color := GxColor.FromKnownColor(GxKnownColor.Red);
Sel.FontName := "Arial";
Sel.FontSize := 16;
Sel.Italic := TriState.OnOption;
Sel.StrikeThrough := TriState.OnOption;
Sel.EndUpdate;
End Sub Button1OnClick;
При нажатии на кнопку для текста в компоненте TextArea будет настроено форматирование. Если в компоненте выделен какой-либо текст, то форматирование настраивается для него. Если текст не выделен, то форматирование будет задано для первого слова в тексте.
См. также: