ITabObjects.UngroupSelected

Syntax

UngroupSelected;

Description

The UngroupSelected method ungroups the selected objects.

Comments

If several groups are selected, the method ungroups all of them.

Example

Executing the example requires a form with the Button1 button located on it,, the TabSheetBox component, and the UiTabSheet component named UiTabSheet1, that is used as a data source for TabSheetBox. The objects created in the table are be grouped. The link to the Tab system assembly should be added.

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

After executing the example the selected objects are ungrouped.