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 Gets which mouse button was pressed as 1 for Left Mouse Button, 2 for Right Mouse Button and 4 for Middle Mouse Button.
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. During the MouseMove event you can call the ShowToolTip method to display any custom tooltip. For instance, you can display a tooltip when the cursor is hovering an anchor element <a> like shown in the bellow samples: 

During MouseMove event you can use the ...FromPoint(-1,-1) properties to get UI elements of the scheduler from the cursor as follows:

All ...FromPoint properties that returns an Object, may return Nothing, Empty or NULL, if no object is found.

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, AxEXSCHEDULELib._IScheduleEvents_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: AxEXSCHEDULELib._IScheduleEvents_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 AxEXSCHEDULELib._IScheduleEvents_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(oSchedule,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.Schedule.1::OLE_XPOS_PIXELS,Y as OLE::Exontrol.Schedule.1::OLE_YPOS_PIXELS)
end function

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

The following samples show how to show a custom tooltip when the cursor hovers to an anchor <a> element.

VBA (MS Access, Excell...)

' MouseMove event - Occurs when the user moves the mouse.
Private Sub Schedule1_MouseMove(ByVal Button As Integer,ByVal Shift As Integer,ByVal X As Long,ByVal Y As Long)
	With Schedule1
		s = .AnchorFromPoint(-1,-1)
		.ShowToolTip s,"info","","+16"
	End With
End Sub


VB6

' MouseMove event - Occurs when the user moves the mouse.
Private Sub Schedule1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
	With Schedule1
		s = .AnchorFromPoint(-1,-1)
		.ShowToolTip s,"info","","+16"
	End With
End Sub


VB.NET

' MouseMove event - Occurs when the user moves the mouse.
Private Sub Exschedule1_MouseMoveEvent(ByVal sender As System.Object,ByVal Button As Short,ByVal Shift As Short,ByVal X As Integer,ByVal Y As Integer) Handles Exschedule1.MouseMoveEvent
	Dim s
	With Exschedule1
		s = .get_AnchorFromPoint(-1,-1)
		.ShowToolTip(s,"info","","+16")
	End With
End Sub


VB.NET for /COM

' MouseMove event - Occurs when the user moves the mouse.
Private Sub AxSchedule1_MouseMoveEvent(ByVal sender As System.Object, ByVal e As AxEXSCHEDULELib._IScheduleEvents_MouseMoveEvent) Handles AxSchedule1.MouseMoveEvent
	Dim s
	With AxSchedule1
		s = .get_AnchorFromPoint(-1,-1)
		.ShowToolTip(s,"info","","+16")
	End With
End Sub


C++

// MouseMove event - Occurs when the user moves the mouse.
void OnMouseMoveSchedule1(short Button,short Shift,long X,long Y)
{
	/*
		Copy and paste the following directives to your header file as
		it defines the namespace 'EXSCHEDULELib' for the library: 'ExSchedule 1.0 Control Library'
		#import <ExSchedule.dll>
		using namespace EXSCHEDULELib;
	*/
	EXSCHEDULELib::ISchedulePtr spSchedule1 = GetDlgItem(IDC_SCHEDULE1)->GetControlUnknown();
	_bstr_t s = spSchedule1->GetAnchorFromPoint(-1,-1);
	spSchedule1->ShowToolTip(L"s","info","","+16",vtMissing);
}


C++ Builder

// MouseMove event - Occurs when the user moves the mouse.
void __fastcall TForm1::Schedule1MouseMove(TObject *Sender,short Button,short Shift,int X,int Y)
{
	String s = Schedule1->AnchorFromPoint[-1,-1];
	Schedule1->ShowToolTip(L"s",TVariant("info"),TVariant(""),TVariant("+16"),TNoParam());
}


C#

// MouseMove event - Occurs when the user moves the mouse.
private void exschedule1_MouseMoveEvent(object sender,short Button,short Shift,int X,int Y)
{
	string s = exschedule1.get_AnchorFromPoint(-1,-1);
	exschedule1.ShowToolTip(s.ToString(),"info","","+16",null);
}
//this.exschedule1.MouseMoveEvent += new exontrol.EXSCHEDULELib.exg2antt.MouseMoveEventHandler(this.exschedule1_MouseMoveEvent);


JavaScript

<SCRIPT FOR="Schedule1" EVENT="MouseMove(Button,Shift,X,Y)" LANGUAGE="JScript">
	var s = Schedule1.AnchorFromPoint(-1,-1);
	Schedule1.ShowToolTip(s,"info","","+16",null);
</SCRIPT>

<OBJECT classid="clsid:9B09E13D-7A88-4299-9DBE-383380435377" id="Schedule1"></OBJECT>

<SCRIPT LANGUAGE="JScript">
</SCRIPT>

C# for /COM

// MouseMove event - Occurs when the user moves the mouse.
private void axSchedule1_MouseMoveEvent(object sender, AxEXSCHEDULELib._IScheduleEvents_MouseMoveEvent e)
{
	string s = axSchedule1.get_AnchorFromPoint(-1,-1);
	axSchedule1.ShowToolTip(s.ToString(),"info","","+16",null);
}
//this.axSchedule1.MouseMoveEvent += new AxEXSCHEDULELib._IScheduleEvents_MouseMoveEventHandler(this.axSchedule1_MouseMoveEvent);


X++ (Dynamics Ax 2009)

// MouseMove event - Occurs when the user moves the mouse.
void onEvent_MouseMove(int _Button,int _Shift,int _X,int _Y)
{
	str s;
	;
	s = exschedule1.AnchorFromPoint(-1,-1);
	exschedule1.ShowToolTip(s,"info","","+16");
}

public void init()
{
	;

	super();

}

Delphi 8 (.NET only)

// MouseMove event - Occurs when the user moves the mouse.
procedure TWinForm1.AxSchedule1_MouseMoveEvent(sender: System.Object; e: AxEXSCHEDULELib._IScheduleEvents_MouseMoveEvent);
begin
	with AxSchedule1 do
	begin
		s := get_AnchorFromPoint(-1,-1);
		ShowToolTip(s,'info','','+16',Nil);
	end
end;


Delphi (standard)

// MouseMove event - Occurs when the user moves the mouse.
procedure TForm1.Schedule1MouseMove(ASender: TObject; Button : Smallint;Shift : Smallint;X : Integer;Y : Integer);
begin
	with Schedule1 do
	begin
		s := AnchorFromPoint[-1,-1];
		ShowToolTip(s,'info','','+16',Null);
	end
end;


VFP

*** MouseMove event - Occurs when the user moves the mouse. ***
LPARAMETERS Button,Shift,X,Y
	with thisform.Schedule1
		s = .AnchorFromPoint(-1,-1)
		.ShowToolTip(s,"info","","+16")
	endwith


dBASE Plus

/*
with (this.ACTIVEX1.nativeObject)
	MouseMove = class::nativeObject_MouseMove
endwith
*/
// Occurs when the user moves the mouse.
function nativeObject_MouseMove(Button,Shift,X,Y)
	local oSchedule,s
	oSchedule = form.Activex1.nativeObject
	s = oSchedule.AnchorFromPoint(-1,-1)
	oSchedule.ShowToolTip(Str(s),"info","","+16")
return

local oSchedule

oSchedule = form.Activex1.nativeObject

XBasic (Alpha Five)

' Occurs when the user moves the mouse.
function MouseMove as v (Button as N,Shift as N,X as OLE::Exontrol.Schedule.1::OLE_XPOS_PIXELS,Y as OLE::Exontrol.Schedule.1::OLE_YPOS_PIXELS)
	Dim oSchedule as P
	Dim s as 
	oSchedule = topparent:CONTROL_ACTIVEX1.activex
	s = oSchedule.AnchorFromPoint(-1,-1)
	oSchedule.ShowToolTip(s,"info","","+16")
end function

Dim oSchedule as P

oSchedule = topparent:CONTROL_ACTIVEX1.activex

Visual Objects

METHOD OCX_Exontrol1MouseMove(Button,Shift,X,Y) CLASS MainDialog
	// MouseMove event - Occurs when the user moves the mouse.
	local s as USUAL
	s := oDCOCX_Exontrol1:[AnchorFromPoint,-1,-1]
	oDCOCX_Exontrol1:ShowToolTip(AsString(s),"info","","+16",nil)
RETURN NIL



PowerBuilder

/*begin event MouseMove(integer Button,integer Shift,long X,long Y) - Occurs when the user moves the mouse.*/
/*
	OleObject oSchedule
	any s
	oSchedule = ole_1.Object
	s = oSchedule.AnchorFromPoint(-1,-1)
	oSchedule.ShowToolTip(String(s),"info","","+16")
*/
/*end event MouseMove*/

OleObject oSchedule

oSchedule = ole_1.Object