Source position: gfxbase.pas line 457
type TGfxMouseMoveEvent = procedure(
Sender: TObject;
AShift: TShiftState;
const AMousePos: TPoint
) of object;