Use the GroupFromPoint property to get the group over cursor. The GroupFromPoint(-1,-1) property retrieves the group at the current cursor position Use the ItemFromPoint property to retrieve the item over cursor. Use the Caption property to specify the caption of the group. Use the Expanded property to specify whether a group is expanded or collapsed.

The following VB sample displays the caption of the group from the cursor:

Private Sub ExplorerBar1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    With ExplorerBar1
        Dim g As Group
        Set g = .GroupFromPoint(X / Screen.TwipsPerPixelX, Y / Screen.TwipsPerPixelY)
        If Not g Is Nothing Then
            Debug.Print g.Caption
        End If
    End With
End Sub

The following C++ sample displays the caption of the group from the cursor:

void OnMouseMoveExplorerbar1(short Button, short Shift, long X, long Y) 
{
	CGroup group = m_explorerbar.GetGroupFromPoint( X, Y );
	if ( group.m_lpDispatch != NULL )
		OutputDebugString( group.GetCaption() );
}

The following VB.NET sample displays the caption of the group from the cursor:

Private Sub AxExplorerBar1_MouseMoveEvent(ByVal sender As Object, ByVal e As AxEXPLORERBARLib._IExplorerBarEvents_MouseMoveEvent) Handles AxExplorerBar1.MouseDownEvent
    With AxExplorerBar1
        Dim g As EXPLORERBARLib.Group = .get_GroupFromPoint(e.x, e.y)
        If Not g Is Nothing Then
            Debug.WriteLine(g.Caption)
        End If
    End With
End Sub

The following C# sample displays the caption of the group from the cursor:

private void axExplorerBar1_MouseMoveEvent(object sender, AxEXPLORERBARLib._IExplorerBarEvents_MouseMoveEvent e)
{
	EXPLORERBARLib.Group g = axExplorerBar1.get_GroupFromPoint(e.x, e.y);
	if (g != null)
		System.Diagnostics.Debug.WriteLine(g.Caption);
}

The following VFP sample displays the caption of the group from the cursor:

*** ActiveX Control Event ***
LPARAMETERS button, shift, x, y

With thisform.ExplorerBar1
    local g
    g = .GroupFromPoint(x , y)
    If !isnull(g)
	with g
	        wait window nowait .Caption
       endwith
    EndIf
EndWith