Gallery: make most pages scrollable

Add a ScrollablePage type, which provides the scrolling behavior. The
available space can be quite limited, especially in landscape on low
resolution devices.

Change-Id: I4d2911aa6bfa6d8573a1385b5a06ef2cf3e2e548
Reviewed-by: Mitch Curtis <mitch.curtis@qt.io>

1 files changed, 15 insertions, 23 deletions

diff --git a/examples/quickcontrols2/gallery/pages/TextAreaPage.qml b/examples/quickcontrols2/gallery/pages/TextAreaPage.qml
index 733ac24b..ca28e2b7 100644
--- a/examples/quickcontrols2/gallery/pages/TextAreaPage.qml
+++ b/examples/quickcontrols2/gallery/pages/TextAreaPage.qml
@@ -41,34 +41,26 @@
 import QtQuick 2.6
 import QtQuick.Controls 2.0
 
-Flickable {
-    id: flickable
-    contentHeight: pane.height
+ScrollablePage {
+    id: page
 
-    Pane {
-        id: pane
+    Column {
+        spacing: 40
         width: parent.width
 
-        Column {
-            spacing: 40
-            anchors.fill: parent
-
-            Label {
-                width: parent.width
-                wrapMode: Label.Wrap
-                horizontalAlignment: Qt.AlignHCenter
-                text: "TextArea is a multi-line text editor."
-            }
+        Label {
+            width: parent.width
+            wrapMode: Label.Wrap
+            horizontalAlignment: Qt.AlignHCenter
+            text: "TextArea is a multi-line text editor."
+        }
 
-            TextArea {
-                width: Math.max(implicitWidth, Math.min(implicitWidth * 3, pane.availableWidth / 3))
-                anchors.horizontalCenter: parent.horizontalCenter
+        TextArea {
+            width: Math.max(implicitWidth, Math.min(implicitWidth * 3, pane.availableWidth / 3))
+            anchors.horizontalCenter: parent.horizontalCenter
 
-                wrapMode: TextArea.Wrap
-                text: "TextArea\n...\n...\n..."
-            }
+            wrapMode: TextArea.Wrap
+            text: "TextArea\n...\n...\n..."
         }
     }
-
-    ScrollIndicator.vertical: ScrollIndicator { }
 }