Visible: Boolean;
Свойство Visible определяет возможность расположения заголовков группируемых данных в отдельном столбце.
Свойство принимает значения:
True. По умолчанию. Доступно расположения заголовков группируемых данных в отдельном столбце. Установлен флажок «Отобразить группу в отдельном столбце» и доступна установка раскрывающейся иерархии. Раскрывающаяся иерархия определяется свойством IPrxTableIslandGrouping.Hierarchical;
False. Расположение заголовков группируемых данных в отдельном столбце недоступно. Флажок Отобразить группу в отдельном столбце» снят.
Для выполнения примера убедитесь, что в репозитории содержится регламентный отчёт с идентификатором REGULAR_REPORT с настроенной группировкой реляционной области данных.
Добавьте ссылки на системные сборки: Metabase, Report.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
TabIs: IPrxTableIslands;
TI: IPrxTableIsland;
Grs: IPrxTableIslandGroupings;
Gr: IPrxTableIslandGrouping;
Begin
MB := MetabaseClass.Active;
// Получим регламентный отчёт на редактирование
MObj := MB.ItemById("REGULAR_REPORT").Edit;
Report := MObj As IPrxReport;
TabIs := Report.TableIslands;
TI := TabIs.Item(0);
TI := Ti.Edit;
// Получим настройки первой группы
Grs := TI.Groupings;
Gr := Grs.Item(0);
// Снимем флажки «Отобразить группу в отдельном столбце» и «Раскрывающаяся иерархия»
Gr.Visible := False;
If Gr.IsHierarchical Then
Gr.Hierarchical := TriState.OffOption;
End If;
// Сохраним изменения в отчете
TI.Save;
MObj.Save;
End Sub UserProc;
После выполнения примера в регламентном отчёте с идентификатором REGULAR_REPORT будут сняты флажки «Отобразить группу в отдельном столбце» и «Раскрывающаяся иерархия» в настройке группировки реляционной области данных.
См. также: