Columns: IWebDimensionColumns;
Свойство Columns возвращает коллекцию столбцов компонента.
Для выполнения примера в репозитории предполагается наличие веб-формы и расположенного на ней компонента DimensionCombo с наименованием DimensionCombo1. К компоненту подключен какой-либо справочник. Указанная процедура установлена в качестве обработчика события OnShow для веб-формы.
Добавьте ссылки на системные сборки: Dimensions, WebForms.
Sub TESTWebFormOnShow;
Var
Columns: IWebDimensionColumns;
Column: IWebDimensionColumn;
Attrs: IDimAttributesInstance;
Attr: IDimAttribute;
Begin
Columns := DimensionCombo1.Columns;
Attrs := DimensionCombo1.DimInstance.Attributes;
For Each Column In Columns Do
Attr := Attrs.FindByKey(Column.Attribute).Attribute;
If Attr.Id = "KEY" Then
Column.Caption := "Ключи";
Column.Visible := True;
Elseif Attr.Id = "NAME" Then
Column.Caption := "Продукты";
Column.Alignment := TextAlignment.Center;
Elseif String.Contains(Attr.Id, "ACCESS") Then
Column.Visible := False;
End If;
End For;
End Sub TESTWebFormOnShow;
При запуске веб-формы для компонента DimensionCombo1 будет произведена настройка отображения столбцов.
См. также: