Changeset 98312 in vbox for trunk/src

Timestamp:

Jan 26, 2023 12:52:40 PM (2 years ago)

Author:

vboxsync

Message:

FE/Qt: Implement Copy action for our QIRichTextLabel widget; Default one QTextEdit action was not triggerable by shortcut and was not respecting selection context.

Location:

trunk/src/VBox/Frontends/VirtualBox/src/extensions

Files:

• QIRichTextLabel.cpp (modified) (6 diffs)
• QIRichTextLabel.h (modified) (2 diffs)

trunk/src/VBox/Frontends/VirtualBox/src/extensions/QIRichTextLabel.cpp

@@ -28 +28 @@
 /* Qt includes: */
 #include <QAccessibleWidget>
+#include <QAction>
+#include <QApplication>
+#include <QClipboard>
 #include <QtMath>
 #include <QUrl>
@@ -101 +104 @@
 
 QIRichTextLabel::QIRichTextLabel(QWidget *pParent)
-    : QWidget(pParent)
+    : QIWithRetranslateUI<QWidget>(pParent)
     , m_pTextBrowser()
+    , m_pActionCopy(0)
+    , m_fCopyAvailable(false)
     , m_iMinimumTextWidth(0)
 {
@@ -124 +129 @@
             /* Configure text-browser: */
             m_pTextBrowser->setReadOnly(true);
-            m_pTextBrowser->setFocusPolicy(Qt::NoFocus);
+            m_pTextBrowser->setFocusPolicy(Qt::ClickFocus);
             m_pTextBrowser->setFrameShape(QFrame::NoFrame);
             m_pTextBrowser->setVerticalScrollBarPolicy(Qt::ScrollBarAlwaysOff);
             m_pTextBrowser->setSizePolicy(QSizePolicy::Ignored, QSizePolicy::Ignored);
+            m_pTextBrowser->setContextMenuPolicy(Qt::ActionsContextMenu);
             m_pTextBrowser->setOpenExternalLinks(true);
 
@@ -140 +146 @@
             /* Setup connections finally: */
             connect(m_pTextBrowser, &QTextBrowser::anchorClicked, this, &QIRichTextLabel::sigLinkClicked);
+            connect(m_pTextBrowser, &QTextBrowser::copyAvailable, this, &QIRichTextLabel::sltHandleCopyAvailable);
+
+            /* Create context-menu copy action for text-browser: */
+            m_pActionCopy = new QAction(m_pTextBrowser);
+            if (m_pActionCopy)
+            {
+                m_pActionCopy->setShortcut(QKeySequence(QKeySequence::Copy));
+                m_pActionCopy->setShortcutContext(Qt::WidgetShortcut);
+                connect(m_pActionCopy, &QAction::triggered, this, &QIRichTextLabel::copy);
+                m_pTextBrowser->addAction(m_pActionCopy);
+            }
         }
 
@@ -145 +162 @@
         pMainLayout->addWidget(m_pTextBrowser);
     }
+
+    /* Apply language settings: */
+    retranslateUi();
 }
 
@@ -246 +266 @@
     setMinimumTextWidth(m_iMinimumTextWidth == 0 ? newSize.width() : m_iMinimumTextWidth);
 }
+
+void QIRichTextLabel::copy()
+{
+    // WORKAROUND:
+    // We should distinguish whether copy() is available or not.
+    //  If it is, we can use QTextBrowser::copy() directly to
+    //  copy selected part of text.  Otherwise we have to use
+    //  QTextBrowser::toPlainText() to get the whole desirable
+    //  text and put it to QClipboard ourselves.
+    if (m_fCopyAvailable)
+        m_pTextBrowser->copy();
+    else
+    {
+        /* Copy the current text to the global and selection clipboards: */
+        const QString strText = m_pTextBrowser->toPlainText();
+        QApplication::clipboard()->setText(strText, QClipboard::Clipboard);
+        QApplication::clipboard()->setText(strText, QClipboard::Selection);
+    }
+}
+
+void QIRichTextLabel::retranslateUi()
+{
+    if (m_pActionCopy)
+        m_pActionCopy->setText(tr("&Copy"));
+}

trunk/src/VBox/Frontends/VirtualBox/src/extensions/QIRichTextLabel.h

@@ -36 +36 @@
 
 /* GUI includes: */
+#include "QIWithRetranslateUI.h"
 #include "UILibraryDefs.h"
+
+/* Forward declarations: */
+class QAction;
 
 /** QLabel analog to reflect rich-text,
  ** based on private QTextBrowser functionality. */
-class SHARED_LIBRARY_STUFF QIRichTextLabel : public QWidget
+class SHARED_LIBRARY_STUFF QIRichTextLabel : public QIWithRetranslateUI<QWidget>
 {
     Q_OBJECT;
@@ -88 +92 @@
     void setText(const QString &strText);
 
+    /** Copies text-browser text into clipboard. */
+    void copy();
+
+protected:
+
+    /** Handles translation event. */
+    virtual void retranslateUi() RT_OVERRIDE;
+
+private slots:
+
+    /** Handles the fact of text-browser text copy available.
+      * @param  fYes  Brings whether some text is selected and can
+      *               be copied directly by QTextBrowser::copy() call. */
+    void sltHandleCopyAvailable(bool fYes) { m_fCopyAvailable = fYes; }
+
 private:
 
     /** Holds the text-browser instance. */
     QTextBrowser *m_pTextBrowser;
+
+    /** Holds the context-menu Copy action instance. */
+    QAction *m_pActionCopy;
+    /** Holds whether text-browser text copy is available. */
+    bool     m_fCopyAvailable;
 
     /** Holds the minimum text-width. */