event MouseMove (Button as Integer, Shift as Integer, X as OLE_XPOS_PIXELS, Y as OLE_YPOS_PIXELS)
Occurs when the user moves the mouse.

TypeDescription
Button as Integer An integer that corresponds to the state of the mouse buttons in which a bit is set if the button is down.
Shift as Integer An integer that corresponds to the state of the SHIFT, CTRL, and ALT keys.
X as OLE_XPOS_PIXELS A single that specifies the current X location of the mouse pointer. The x values 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 values is always expressed in container coordinates.
The MouseMove event is generated continually as the mouse pointer moves across objects. Unless another object has captured the mouse, an object recognizes a MouseMove event whenever the mouse position is within its borders. Use the PanelFromPoint property to get the panel from the cursor.

Syntax for MouseMove event, /NET version, on: 

private void MouseMoveEvent(object sender,short Button,short Shift,int X,int Y)
{
}


Private Sub MouseMoveEvent(ByVal sender As System.Object,ByVal Button As Short,ByVal Shift As Short,ByVal X As Integer,ByVal Y As Integer) Handles MouseMoveEvent
End Sub

Syntax for MouseMove event, /COM version, on: 

private void MouseMoveEvent(object sender, AxEXSTATUSBARLib._IStatusBarEvents_MouseMoveEvent e)
{
}


void OnMouseMove(short Button,short Shift,long X,long Y)
{
}


void __fastcall MouseMove(TObject *Sender,short Button,short Shift,int X,int Y)
{
}


procedure MouseMove(ASender: TObject; Button : Smallint;Shift : Smallint;X : Integer;Y : Integer);
begin
end;


procedure MouseMoveEvent(sender: System.Object; e: AxEXSTATUSBARLib._IStatusBarEvents_MouseMoveEvent);
begin
end;


begin event MouseMove(integer Button,integer Shift,long X,long Y)
end event MouseMove


Private Sub MouseMoveEvent(ByVal sender As System.Object, ByVal e As AxEXSTATUSBARLib._IStatusBarEvents_MouseMoveEvent) Handles MouseMoveEvent
End Sub


Private Sub MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
End Sub


Private Sub MouseMove(ByVal Button As Integer,ByVal Shift As Integer,ByVal X As Long,ByVal Y As Long)
End Sub


LPARAMETERS Button,Shift,X,Y



PROCEDURE OnMouseMove(oStatusBar,Button,Shift,X,Y)
RETURN

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

<SCRIPT EVENT="MouseMove(Button,Shift,X,Y)" LANGUAGE="JScript">
</SCRIPT>


<SCRIPT LANGUAGE="VBScript">
Function MouseMove(Button,Shift,X,Y)
End Function
</SCRIPT>


Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llX OLE_YPOS_PIXELS llY
	Forward Send OnComMouseMove llButton llShift llX llY
End_Procedure


METHOD OCX_MouseMove(Button,Shift,X,Y) CLASS MainDialog
RETURN NIL


void onEvent_MouseMove(int _Button,int _Shift,int _X,int _Y)
{
}


function MouseMove as v (Button as N,Shift as N,X as OLE::Exontrol.StatusBar.1::OLE_XPOS_PIXELS,Y as OLE::Exontrol.StatusBar.1::OLE_YPOS_PIXELS)
end function


function nativeObject_MouseMove(Button,Shift,X,Y)
return

The following VB sample displays the caption from the cursor:

Private Sub StatusBar1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Dim p As EXSTATUSBARLibCtl.Panel
    With StatusBar1
        Set p = .PanelFromPoint(-1, -1)
        If (Not p Is Nothing) Then
            Debug.Print p.Text
        End If
    End With
End Sub

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

Private Sub AxStatusBar1_MouseMoveEvent(ByVal sender As System.Object, ByVal e As AxEXSTATUSBARLib._IStatusBarEvents_MouseMoveEvent) Handles AxStatusBar1.MouseMoveEvent
    Dim p As EXSTATUSBARLib.Panel
    With AxStatusBar1
        p = .get_PanelFromPoint(-1, -1)
        If (Not p Is Nothing) Then
            Debug.Print(p.Text)
        End If
    End With
End Sub

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

private void axStatusBar1_MouseMoveEvent(object sender, AxEXSTATUSBARLib._IStatusBarEvents_MouseMoveEvent e)
{
    EXSTATUSBARLib.Panel p = axStatusBar1.get_PanelFromPoint(-1, -1);
    if (p != null)
        System.Diagnostics.Debug.WriteLine(p.Text);
}

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

void OnMouseMoveStatusbar1(short Button, short Shift, long X, long Y) 
{
	CPanel panel = m_statusBar.GetPanelFromPoint( -1, -1 );
	if ( panel.m_lpDispatch != NULL )
		OutputDebugString( panel.GetText() );
}

The following VFP sample displays the caption from the cursor:

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

with thisform.StatusBar1
	local p
	p = .PanelFromPoint(-1,-1)
	if ( !isnull(p) )
		wait window nowait p.Text
	endif
endwith