SelLength: Integer;
SelLength: integer;
Свойство SelLength определяет количество символов, выделенных в тексте компонента.
Если значение SelLength положительное, то выделение текста выполняется вправо от курсора, если значение отрицательное - влево от курсора. Для получения позиции, в которой расположен курсор и начинается выделение текста, используйте свойство ICustomEdit.SelStart.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с идентификатором «Button1» и компонента ExpressionEdit с идентификатором «ExpressionEdit1».
Пример является обработчиком события OnClick для компонента «Button1».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Begin
ExpressionEdit1.SelStart := 0;
ExpressionEdit1.SelLength := ExpressionEdit1.Text.Length;
ExpressionEdit1.SelText := "(" + ExpressionEdit1.SelText + ")";
End Sub Button1OnClick;
Результат выполнения примера: текст в компоненте «ExpressionEdit1» будет помещен в круглые скобки.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Begin
expressionEditNet1.SelStart := 0;
expressionEditNet1.SelLength := expressionEditNet1.Text.Length;
expressionEditNet1.SelText := "(" + expressionEditNet1.SelText + ")";
End Sub;
См. также: