Type | Description | |||
Button as Integer | An integer that identifies the button that was pressed to cause the event | |||
Shift as Integer | An integer that corresponds to the state of the SHIFT, CTRL, and ALT keys when the button specified in the button argument is pressed or released. | |||
X as OLE_XPOS_PIXELS | A single that specifies the current X location of the mouse pointer. The X value is always expressed in container coordinates. | |||
Y as OLE_YPOS_PIXELS | A single that specifies the current Y location of the mouse pointer. The Y value is always expressed in container coordinates. |
private void MouseDownEvent(object sender,short Button,short Shift,int X,int Y) { } Private Sub MouseDownEvent(ByVal sender As System.Object,ByVal Button As Short,ByVal Shift As Short,ByVal X As Integer,ByVal Y As Integer) Handles MouseDownEvent End Sub |
private void MouseDownEvent(object sender, AxEXFOLDERVIEWLib._IExFolderViewEvents_MouseDownEvent e) { } void OnMouseDown(short Button,short Shift,long X,long Y) { } void __fastcall MouseDown(TObject *Sender,short Button,short Shift,int X,int Y) { } procedure MouseDown(ASender: TObject; Button : Smallint;Shift : Smallint;X : Integer;Y : Integer); begin end; procedure MouseDownEvent(sender: System.Object; e: AxEXFOLDERVIEWLib._IExFolderViewEvents_MouseDownEvent); begin end; begin event MouseDown(integer Button,integer Shift,long X,long Y) end event MouseDown Private Sub MouseDownEvent(ByVal sender As System.Object, ByVal e As AxEXFOLDERVIEWLib._IExFolderViewEvents_MouseDownEvent) Handles MouseDownEvent End Sub Private Sub MouseDown(ByVal Button As Integer,ByVal Shift As Integer,ByVal X As Single,ByVal Y As Single) End Sub Private Sub MouseDown(ByVal Button As Integer,ByVal Shift As Integer,ByVal X As Long,ByVal Y As Long) End Sub LPARAMETERS Button,Shift,X,Y PROCEDURE OnMouseDown(oExFolderView,Button,Shift,X,Y) RETURN |
<SCRIPT EVENT="MouseDown(Button,Shift,X,Y)" LANGUAGE="JScript"> </SCRIPT> <SCRIPT LANGUAGE="VBScript"> Function MouseDown(Button,Shift,X,Y) End Function </SCRIPT> Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llX OLE_YPOS_PIXELS llY Forward Send OnComMouseDown llButton llShift llX llY End_Procedure METHOD OCX_MouseDown(Button,Shift,X,Y) CLASS MainDialog RETURN NIL void onEvent_MouseDown(int _Button,int _Shift,int _X,int _Y) { } function MouseDown as v (Button as N,Shift as N,X as OLE::Exontrol.FolderView.1::OLE_XPOS_PIXELS,Y as OLE::Exontrol.FolderView.1::OLE_YPOS_PIXELS) end function function nativeObject_MouseDown(Button,Shift,X,Y) return |
Below example displays the folder from the cursor:
Private Sub ExFolderView1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) With ExFolderView1 Dim f As EXFOLDERVIEWLibCtl.ExShellFolder Set f = .FolderFromPoint(-1, -1) If Not (f Is Nothing) Then Debug.Print f.DisplayName End If End With End Sub