The DblClick event is fired when the user dbl clicks on the control. Use the DblClick event to notify your application that an item has been double-clicked. Use the ItemFromPoint property to get the item over cursor. Use the GroupFromPoint property to get the group over cursor. Use the Caption property to get the caption of the item. Use the Caption property to get the caption of the group. Use the Group property to get the owner of the item. 

The following VB sample displays the caption of the item being double clicked:

Private Sub ExplorerBar1_DblClick(Shift As Integer, X As Single, Y As Single)
    With ExplorerBar1
        Dim i As EXPLORERBARLibCtl.Item
        Set i = .ItemFromPoint(X / Screen.TwipsPerPixelX, Y / Screen.TwipsPerPixelY)
        If (Not i Is Nothing) Then
            Debug.Print i.Caption
        End If
    End With
End Sub

The following C++ sample displays the caption of the item being double clicked:

void OnDblClickExplorerbar1(short Shift, long X, long Y) 
{
	CItem item = m_explorerbar.GetItemFromPoint( X, Y );
	if ( item.m_lpDispatch != NULL )
		OutputDebugString( item.GetCaption() );
}

The following VB.NET sample displays the caption of the item being double clicked:

Private Sub AxExplorerBar1_DblClick(ByVal sender As Object, ByVal e As AxEXPLORERBARLib._IExplorerBarEvents_DblClickEvent) Handles AxExplorerBar1.DblClick
    With AxExplorerBar1
        Dim i As EXPLORERBARLib.Item = .get_ItemFromPoint(e.x, e.y)
        If (Not i Is Nothing) Then
            Debug.WriteLine(i.Caption)
        End If
    End With
End Sub

The following C# sample displays the caption of the item being double clicked:

private void axExplorerBar1_DblClick(object sender, AxEXPLORERBARLib._IExplorerBarEvents_DblClickEvent e)
{
	EXPLORERBARLib.Item item = axExplorerBar1.get_ItemFromPoint(e.x, e.y);
	if (item != null)
	{
		System.Diagnostics.Debug.WriteLine(item.Caption);
	}
}

The following VFP sample displays the caption of the item being double clicked:

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

With thisform.ExplorerBar1
    local i
    i = .ItemFromPoint(x, y)
    If ( !isnull(i) ) Then
    	with i
	        wait window nowait .Caption
	    endwith
    EndIf
EndWith
  
 
Send comments on this topic.
© 1999-2008 Exontrol Inc, Software. All rights reserved.