ITabObjects.GroupSelected

Fore Syntax

GroupSelected: ITabObjectGroup;

Fore.NET Syntax

GroupSelected(): Prognoz.Platform.Interop.Tab.ITabObjectGroup;

Description

The GroupSelected method groups the selected objects.

Comments

Both separate objects and subgroups can be elements of the group.

Fore Example

To execute the example a form with a button named Button1 on it, the TabSheetBox component, and the UiTabSheet component named UiTabSheet1, that is used as a data source for TabSheetBox are required. The table should contain some objects. The link to the Tab system assembly should be added.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    i: integer;
    Tab: ITabSheet;
    Objs: ITabObjects;
    TabObjs: ITabObject;
Begin
    Tab := UiTabSheet1.TabSheet;
    Objs := Tab.Objects;
    For i := 0 To (Objs.Count - 1) Do
        Objs.Item(i).Select_;
    End For;
    TabObjs := Tab.Objects.GroupSelected;
End Sub Button1OnClick;

After executing the example all objects within the table are grouped.

Fore.NET Example

To execute the example a .NET form with a button named button1 on it, the TabSheetBoxNet component, and the UiTabSheetNet component named uiTabSheetNet1, that is used as a data source for TabSheetBoxNet are required. The table should contain some objects. The link to the Tab system assembly should be added.

Imports Prognoz.Platform.Interop.Tab;
...
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    i: integer;
    Tab: ITabSheet;
    Objs: ITabObjects;
    TabObjs: ITabObject;
Begin
    Tab := uiTabSheetNet1.TabSheetUi.TabSheet;
    Objs := Tab.Objects;
    For i := 0 To (Objs.Count - 1) Do
        Objs.Item[i].@Select();
    End For;
    TabObjs := Tab.Objects.GroupSelected();
End Sub;

After executing the example all objects within the table are grouped.