CustomTitle: String;
Свойство CustomTitle определяет пользовательское наименование столбца.
По умолчанию пользовательское наименование не задано.
Для выполнения примера предполагается наличие формы, содержащей:
компонент LanerBox с идентификатором «LanerBox1»;
компонент UiErAnalyzer с идентификатором «UiErAnalyzer1», являющегося источником данных для «LanerBox1». В «UiErAnalyzer1» должна быть загружена рабочая книга базы данных временных рядов.
После запуска формы для компонента «LanerBox1» должен быть включен режим редактирования данных. Затем можно выполнять пример.
Sub UserProc;
Var
Laner: ILaner;
Columns: ILanerAttributeColumns;
Col: ILanerColumn;
i: Integer;
Begin
Laner := UiErAnalyzer1.ErAnalyzer.Laner;
Columns := Laner.AttributeColumns;
For i := 0 To Columns.Count - 1 Do
Col := Columns.Column(i);
Debug.WriteLine(Col.Type);
If Col.Type = LnColumnType.Name Then
Col.ReadOnly := False;
Col.CustomTitle := "Наименование";
End If;
End For;
UiErAnalyzer1.ErAnalyzer.RefreshAll;
End Sub UserProc;
После выполнения примера будет изменено название столбца, содержащего наименования рядов. Наименования рядов будут доступны для редактирования.
См. также: