From bfb62e9ea903ca76b05a0736c941e23abde500c0 Mon Sep 17 00:00:00 2001
From: zeljko <zeljko@lazarus-ide.org>
Date: Sun, 14 Oct 2012 08:03:34 +0000
Subject: [PATCH] Qt: mark MouseMove and MouseWheel events as input events.

git-svn-id: trunk@39078 -
---
 lcl/interfaces/qt/qtwidgets.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas
index afa60cdc60..02b92bf178 100644
--- a/lcl/interfaces/qt/qtwidgets.pas
+++ b/lcl/interfaces/qt/qtwidgets.pas
@@ -3490,7 +3490,7 @@ begin
   Msg.Msg := LM_MOUSEMOVE;
 
   NotifyApplicationUserInput(LCLObject, Msg.Msg);
-  DeliverMessage(Msg);
+  DeliverMessage(Msg, True);
   SetNoMousePropagation(SenderWidget, True);
 end;
 
@@ -3569,7 +3569,7 @@ begin
   {$ENDIF}
 
   NotifyApplicationUserInput(LCLObject, Msg.Msg);
-  Result := DeliverMessage(Msg) <> 0;
+  Result := DeliverMessage(Msg, True) <> 0;
 
   SetNoMousePropagation(QWidgetH(Sender), False);