From db416e28aca9471b68dde29e892bba1f2bd51b70 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Fri, 29 Jan 2010 09:11:25 +0000
Subject: [PATCH] win32: pass better messages to NotifyApplicationUserInput for
 WM_NCMOUSE...

git-svn-id: trunk@23589 -
---
 lcl/interfaces/win32/win32callback.inc | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lcl/interfaces/win32/win32callback.inc b/lcl/interfaces/win32/win32callback.inc
index 6be0085da0..a20858ab28 100644
--- a/lcl/interfaces/win32/win32callback.inc
+++ b/lcl/interfaces/win32/win32callback.inc
@@ -2050,6 +2050,9 @@ begin
     end;
     WM_NCLBUTTONDOWN:
     begin
+      LMessage.Msg := Msg;
+      LMessage.WParam := WParam;
+      LMessage.LParam := LParam;
       NotifyUserInput := True;
       Assert(False, 'Trace:WindowProc - Got WM_NCLBUTTONDOWN');
 
@@ -2070,6 +2073,9 @@ begin
     end;
     WM_NCMOUSEMOVE, WM_NCMOUSELEAVE:
     begin
+      LMessage.Msg := Msg;
+      LMessage.WParam := WParam;
+      LMessage.LParam := LParam;
       NotifyUserInput := True;
       Application.DoBeforeMouseMessage(nil);
     end;