modules/gui/qt/player/qml/ControlBar.qml

@@ -102,7 +102,19 @@ T.Pane {
         id: timeTextMetrics
         font.pixelSize: (textPosition === ControlBar.TimeTextPosition.LeftRightSlider) ? VLCStyle.fontSize_small
                                                                                        : VLCStyle.fontSize_normal
-        text: "00--00" // Some extra space to compensate non-monospaced fonts.
+        text: {
+            // This text metrics is used for both the time and length, as we want them to have the same width.
+            // Length might not be reported in some cases, for that reason we should check both and use the bigger one.
+            let t
+            const time = Player.time
+            const length = Player.length
+            if (time > length)
+                t = time
+            else
+                t = length
+            // Some extra space to compensate non-monospaced fonts ("-" takes more space than ":", double "-" for guarantee)
+            return t.isSubHour() ? "00--00" : "00--00--00"
+        }
     }
 
     background: Rectangle {

modules/gui/qt/util/vlctick.cpp

@@ -55,6 +55,11 @@ bool VLCTick::isSubSecond() const
     return (MS_FROM_VLC_TICK(m_ticks) < 1000);
 }
 
+bool VLCTick::isSubHour() const
+{
+    return (SEC_FROM_VLC_TICK(m_ticks) < 3600);
+}
+
 QString VLCTick::formatHMS(int formatFlags) const
 {
     if (m_ticks == VLC_TICK_INVALID)

modules/gui/qt/util/vlctick.hpp

@@ -44,6 +44,8 @@ public:
 
     Q_INVOKABLE bool isSubSecond() const;
 
+    Q_INVOKABLE bool isSubHour() const;
+
     /**
      * @brief formatHMS
      * @param formatFlags flags to specialize formatting, default is SubSecondFormattedAsMS for legacy reasons