diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas
index 60089b09a6..70690171dc 100644
--- a/lcl/interfaces/qt/qtwidgets.pas
+++ b/lcl/interfaces/qt/qtwidgets.pas
@@ -2131,7 +2131,7 @@ var
 begin
   FillChar(Msg, SizeOf(Msg), #0);
 
-  MousePos := QWheelEvent_pos(QWheelEventH(Event))^;
+  MousePos := QWheelEvent_globalPos(QWheelEventH(Event))^;
   OffsetMousePos(@MousePos);
 
   LastMouse.Widget := Sender;