[vlc-commits] qml: provide horizontal navigation buttons in KeyNavigableListView

[Pierre Lamot]

vlc | branch: master | Pierre Lamot <pierre at videolabs.io> | Fri Aug 30 17:46:44 2019 +0200| [7eda064ada1da3b4639276b9159e15af65d536d8] | committer: Jean-Baptiste Kempf

qml: provide horizontal navigation buttons in KeyNavigableListView

> http://git.videolan.org/gitweb.cgi/vlc.git/?a=commit;h=7eda064ada1da3b4639276b9159e15af65d536d8
---

 modules/gui/qt/qml/utils/KeyNavigableListView.qml | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

diff --git a/modules/gui/qt/qml/utils/KeyNavigableListView.qml b/modules/gui/qt/qml/utils/KeyNavigableListView.qml
index f66485b0d7..fc6f0805a0 100644
--- a/modules/gui/qt/qml/utils/KeyNavigableListView.qml
+++ b/modules/gui/qt/qml/utils/KeyNavigableListView.qml
@@ -184,4 +184,24 @@ NavigableFocusScope {
             }
         }
     }
+
+    RoundButton{
+        id: leftBtn
+        anchors.verticalCenter: parent.verticalCenter
+        anchors.left: parent.left
+        text:"<"
+        onClicked: listview_id.prevPage()
+        visible: view.orientation === ListView.Horizontal && view.contentX > 0
+    }
+
+
+    RoundButton{
+        id: rightBtn
+        anchors.verticalCenter: parent.verticalCenter
+        anchors.right: parent.right
+        text:">"
+        onClicked: listview_id.nextPage()
+        visible: view.orientation === ListView.Horizontal && (view.contentWidth - view.width - view.contentX) > 0
+    }
 }
+