From b833a5d261727616b18cfc81f13b624b1316044f Mon Sep 17 00:00:00 2001
From: Alexey Andreyev <aa13q@ya.ru>
Date: Sat, 25 Mar 2023 01:10:18 +0300
Subject: Introduce Qt 6 support

With QT_VERSION_CHECK and core5compat module
---
 src/widgets/kristalltextbrowser.cpp | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

(limited to 'src/widgets/kristalltextbrowser.cpp')

diff --git a/src/widgets/kristalltextbrowser.cpp b/src/widgets/kristalltextbrowser.cpp
index 5f34c10..a4fc4e8 100644
--- a/src/widgets/kristalltextbrowser.cpp
+++ b/src/widgets/kristalltextbrowser.cpp
@@ -2,9 +2,14 @@
 
 #include "kristall.hpp"
 
+#include <QtGlobal>
 #include <QMouseEvent>
 #include <QScroller>
+#if QT_VERSION < QT_VERSION_CHECK(6, 0, 0)
 #include <QTouchDevice>
+#else
+#include <QInputDevice>
+#endif
 #include <QRegularExpression>
 #include <QLineEdit>
 #include <QApplication>
@@ -17,6 +22,7 @@ KristallTextBrowser::KristallTextBrowser(QWidget *parent) :
     connect(this, &QTextBrowser::anchorClicked, this, &KristallTextBrowser::on_anchorClicked);
 
     // Enable touch scrolling on touchscreen devices
+#if QT_VERSION < QT_VERSION_CHECK(6, 0, 0)
     for (int i = 0; i < QTouchDevice::devices().length(); ++i)
     {
         if (QTouchDevice::devices()[i]->type() == QTouchDevice::TouchScreen)
@@ -26,6 +32,17 @@ KristallTextBrowser::KristallTextBrowser(QWidget *parent) :
             break;
         }
     }
+#else
+    for (auto &device: QInputDevice::devices())
+    {
+        if (device->type() == QInputDevice::DeviceType::TouchScreen)
+        {
+            this->viewport()->setAttribute(Qt::WA_AcceptTouchEvents);
+            QScroller::grabGesture(this, QScroller::LeftMouseButtonGesture);
+            break;
+        }
+    }
+#endif
 }
 
 void KristallTextBrowser::mouseReleaseEvent(QMouseEvent *event)
-- 
cgit v1.2.3