HeadersSort: ILanerSorterHeader;
Свойство HeadersSort возвращает параметры сортировки по значениям атрибутов показателей.
По умолчанию в рабочей книге сортировка по значениям атрибутов показателей не производится.
Для выполнения примера предполагается наличие формы, содержащей компонент LanerBox с и компонента UiErAnalyzer с идентификатором «UiErAnalyzer1», являющегося источником данных для LanerBox. В «UiErAnalyzer1» должна быть загружена рабочая книга базы данных временных рядов.
Sub UserPr;
Var
Laner: ILaner;
Ls: ILanerSorter;
HeaderSort: ILanerSorterHeader;
Columns: ILanerAttributeColumns;
i: Integer;
Inv: Boolean;
LCol: ILanerColumn;
Begin
Laner := UiErAnalyzer1.ErAnalyzer.Laner;
Ls := Laner.Sorter;
// Получаем параметры сортировки по значениям атрибутов показателей
HeaderSort := Ls.HeadersSort;
// Сбрасываем текущие параметры сортировки
HeaderSort.Clear;
// Получаем столбец со значениями атрибута «Формат отображения»
Columns := Laner.AttributeColumns;
For i := 0 To Columns.Count - 1 Do
LCol := Columns.Column(i);
If LCol.Type = LnColumnType.Inversion Then
inv := True;
Break;
End If;
End For;
If Not inv Then
LCol := Columns.AddByType(LnColumnType.Inversion);
End If;
// Задаем направление сортировки
HeaderSort.SortColumnDirection(LCol) := LnSortDirection.Ascending;
End Sub UserPr;
Результат выполнения процедуры: в рабочей книге будет установлена сортировка по возрастанию значений атрибута «Формат отображения». Если значения данного атрибута не отображаются в рабочей книге, то будет отображен соответствующий столбец со значениями.
См. также: