TMouseMoveEventObj

TMouseEventObj

Position

pl 

Shift

TEventObj

pl 

Sender