From be308bee2993875f2c2cee3ec3b3ad9fdc308c45 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Thu, 30 Aug 2007 03:04:15 +0000
Subject: [PATCH] Qt: fix IntersectClipRect

git-svn-id: trunk@11882 -
---
 lcl/interfaces/qt/qtwinapi.inc | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lcl/interfaces/qt/qtwinapi.inc b/lcl/interfaces/qt/qtwinapi.inc
index dec94574c6..234ab11c0e 100644
--- a/lcl/interfaces/qt/qtwinapi.inc
+++ b/lcl/interfaces/qt/qtwinapi.inc
@@ -3093,7 +3093,8 @@ begin
   Y1 := Top;
   X2 := Right;
   Y2 := Bottom;
-  QMatrix_map(QPainter_worldMatrix(QtDC.Widget), X1, Y1, @X2, @Y2);
+  QMatrix_map(QPainter_worldMatrix(QtDC.Widget), X1, Y1, @X1, @Y1);
+  QMatrix_map(QPainter_worldMatrix(QtDC.Widget), X2, Y2, @X2, @Y2);
 
   IntersectRgn := QRegion_create(X1, Y1, X2 - X1, Y2 - Y1);
   Rgn := QRegion_create;