event AddGroup (Group as Group)
Occurs when a new group is added to the Groups collection.

TypeDescription
Group as Group A Group object being added.
Use the AddGroup event to notify your application that a new group is to Groups collection. The Add method adds a new group to Groups collection. Use the AddGroup event to associate an extra data to the group. Use the AddItem, InsertItem, InsertControlItem, PutItems or DataSource methods to add new items to the group.

Syntax for AddGroup event, /NET version, on:

private void AddGroup(object sender,exontrol.EXPLORERTREELib.Group Group)
{
}

Private Sub AddGroup(ByVal sender As System.Object,ByVal Group As exontrol.EXPLORERTREELib.Group) Handles AddGroup
End Sub

Syntax for AddGroup event, /COM version, on:

private void AddGroup(object sender, AxEXPLORERTREELib._IExplorerTreeEvents_AddGroupEvent e)
{
}

void OnAddGroup(LPDISPATCH Group)
{
}

void __fastcall AddGroup(TObject *Sender,Explorertreelib_tlb::IGroup *Group)
{
}

procedure AddGroup(ASender: TObject; Group : IGroup);
begin
end;

procedure AddGroup(sender: System.Object; e: AxEXPLORERTREELib._IExplorerTreeEvents_AddGroupEvent);
begin
end;

begin event AddGroup(oleobject Group)
end event AddGroup

Private Sub AddGroup(ByVal sender As System.Object, ByVal e As AxEXPLORERTREELib._IExplorerTreeEvents_AddGroupEvent) Handles AddGroup
End Sub

Private Sub AddGroup(ByVal Group As EXPLORERTREELibCtl.IGroup)
End Sub

Private Sub AddGroup(ByVal Group As Object)
End Sub

LPARAMETERS Group

PROCEDURE OnAddGroup(oExplorerTree,Group)
RETURN

Syntax for AddGroup event, /COM version (others), on:

<SCRIPT EVENT="AddGroup(Group)" LANGUAGE="JScript">
</SCRIPT>

<SCRIPT LANGUAGE="VBScript">
Function AddGroup(Group)
End Function
</SCRIPT>

Procedure OnComAddGroup Variant llGroup
	Forward Send OnComAddGroup llGroup
End_Procedure

METHOD OCX_AddGroup(Group) CLASS MainDialog
RETURN NIL

void onEvent_AddGroup(COM _Group)
{
}

function AddGroup as v (Group as OLE::Exontrol.ExplorerTree.1::IGroup)
end function

function nativeObject_AddGroup(Group)
return

The following sample changes the background and foreground colors of each group being added:

Private Sub ExplorerTree1_AddGroup(ByVal Group As EXPLORERTREELibCtl.IGroup)
    With Group
        .BackColor = vbBlue
        .ForeColor = vbWhite
    End With
End Sub