event SelectGroup (Group as Group)
Occurs when a group is clicked.

TypeDescription
Group as Group A Group object being selected.
Use the SelectGroup event to notify your application that a new group is selected ( clicked ).

Syntax for SelectGroup event, /NET version, on: 

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


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

Syntax for SelectGroup event, /COM version, on: 

private void SelectGroup(object sender, AxEXPLORERTREELib._IExplorerTreeEvents_SelectGroupEvent e)
{
}


void OnSelectGroup(LPDISPATCH Group)
{
}


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


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


procedure SelectGroup(sender: System.Object; e: AxEXPLORERTREELib._IExplorerTreeEvents_SelectGroupEvent);
begin
end;


begin event SelectGroup(oleobject Group)
end event SelectGroup


Private Sub SelectGroup(ByVal sender As System.Object, ByVal e As AxEXPLORERTREELib._IExplorerTreeEvents_SelectGroupEvent) Handles SelectGroup
End Sub


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


Private Sub SelectGroup(ByVal Group As Object)
End Sub


LPARAMETERS Group



PROCEDURE OnSelectGroup(oExplorerTree,Group)
RETURN

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

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


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


Procedure OnComSelectGroup Variant llGroup
	Forward Send OnComSelectGroup llGroup
End_Procedure


METHOD OCX_SelectGroup(Group) CLASS MainDialog
RETURN NIL


void onEvent_SelectGroup(COM _Group)
{
}


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


function nativeObject_SelectGroup(Group)
return

The following sample focuses the group's list window when user selects the group:

Private Sub ExplorerTree1_SelectGroup(ByVal Group As EXPLORERTREELibCtl.IGroup)
    Group.SetFocus
End Sub

The following sample highlights the group being clicked, and restores the last selected group:

Dim gSelected As EXPLORERTREELibCtl.Group

Private Sub highGroup(ByVal g As EXPLORERTREELibCtl.Group)
    g.UserData = g.BackColor2
    g.BackColor2 = vbBlue
End Sub

Private Sub unHighGroup(ByVal g As EXPLORERTREELibCtl.Group)
    g.BackColor2 = g.UserData
End Sub

Private Sub ExplorerTree1_SelectGroup(ByVal Group As EXPLORERTREELibCtl.IGroup)
    If Not gSelected.Index = Group.Index Then
        gSelected.Expanded = False
        unHighGroup gSelected
        Set gSelected = Group
        highGroup gSelected
    End If
End Sub

Private Sub Form_Load()
    Dim g As EXPLORERTREELibCtl.Group
    ExplorerTree1.DelayScroll = 0
    ExplorerTree1.BeginUpdate
    For Each g In ExplorerTree1.Groups
        g.Expanded = False
        g.BackColor = ExplorerTree1.BackColorGroup
        g.BackColor2 = ExplorerTree1.BackColorGroup2
    Next
    Set gSelected = ExplorerTree1.Groups(0)
    gSelected.Expanded = True
    highGroup gSelected
    ExplorerTree1.EndUpdate
End Sub