Added zooming with mouse wheel support

Change-Id: I1339916b97fecf722b873e8a89445115d53a5fd4
Reviewed-by: Lasse Räihä <lasse.raiha@digia.com>

1 files changed, 11 insertions, 1 deletions

diff --git a/QtDemo/qml/QtDemo/WorldMouseArea.qml b/QtDemo/qml/QtDemo/WorldMouseArea.qml
index 1ad0072..28bc6a4 100644
--- a/QtDemo/qml/QtDemo/WorldMouseArea.qml
+++ b/QtDemo/qml/QtDemo/WorldMouseArea.qml
@@ -58,5 +58,15 @@ MouseArea{
             app.navigationState = 2 //dirty
         }
     }
-
+    onWheel: {
+        var newScalingFactor = canvas.scalingFactor
+        if (wheel.angleDelta.y > 0){
+            newScalingFactor+=canvas.scalingFactor*.05
+        }else{
+            newScalingFactor-=canvas.scalingFactor*.05
+        }
+        if (newScalingFactor < app.minScaleFactor) newScalingFactor = app.minScaleFactor
+        if (newScalingFactor > app.maxScaleFactor) newScalingFactor = app.maxScaleFactor
+        canvas.scalingFactor = newScalingFactor
+    }
 }