ITerm.Text

Синтаксис

Text: String;

Описание

Свойство Text определяет текст элемента терма.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента TermEdit с наименованием «TermEdit1».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

i: Integer;

Terms: ITermList;

Term: ITerm;

Begin

Terms := TermEdit1.Terms;

For i := 0 To Terms.Count - 1 Do

Term := Terms.Item(i);

Term.IsLiteral := False;

Term.Text := "Term " + i.ToString;

Term.Formula := "Formula " + i.ToString;

End For;

End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку для каждого терма текст будет состоять из слова «Term» и индекса элемента терма, а формула будет состоять из слова «Formula» и индекса элемента терма. Текст внутри терма не будет доступен для редактирования, поскольку для свойства IsLiteral установлено значение False.

См. также:

ITerm