ParentGroup: ITabObjectGroup;
ParentGroup: Prognoz.Platform.Interop.Tab.ITabObjectGroup;
Свойство ParentGroup возвращает группу элемента.
Если текущий объект не принадлежит ни какой группе, то свойство ParentGroup вернет значение Null.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiTabSheet с наименованием «UiTabSheet1», являющимся источником данных для TabSheetBox. В таблице должна быть, создана хотя бы одна группа объектов. Должна быть добавлена ссылка на системную сборку Tab.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Tab: ITabSheet;
Group: ITabObjectGroup;
Begin
Tab := UiTabSheet1.TabSheet;
Group := Tab.Objects.Item(0).ParentGroup;
Debug.WriteLine(Group.Id);
End Sub Button1OnClick;
После выполнения примера свойство вернет группу, которой принадлежит текущий объект. Наименование группы будет выведено в консоль.
Для выполнения примера предполагается наличие .NET-формы, расположенной на ней кнопки с наименованием «button1», компонента TabSheetBoxNet и компонента UiTabSheetNet с наименованием «uiTabSheetNet1», являющимся источником данных для TabSheetBoxNet. В таблице должна быть, создана хотя бы одна группа объектов.. Должна быть добавлена ссылка на системную сборку Tab.
Imports Prognoz.Platform.Interop.Tab;
...
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
Tab: ITabSheet;
Group: ITabObjectGroup;
Begin
Tab := UiTabSheetNet1.TabSheetUi.TabSheet;
Group := Tab.Objects.Item[0].ParentGroup;
System.Diagnostics.Debug.WriteLine(Group.Id);
End Sub;
После выполнения примера свойство вернет группу, которой принадлежит текущий объект. Наименование группы будет выведено в консоль.
См. также: