将 QSlider 移动到鼠标点击位置

2023-11-23

我有一个 QSlider,当用户按下鼠标左键时,我想将其移动到鼠标光标的位置。我一直在四处寻找,但找不到任何最近可以解决我的问题的东西。

Progress Bar

这是我的滑块。我希望能够单击使滑块跳转到鼠标单击的位置。我可以拖动滑块,但我希望能够单击。我测试了单击 Dolphin 文件管理器中的滑块。它递增而不是跳转到鼠标的确切位置。

看着Qt5文档

QSlider 自己的功能很少[...]

这表明没有内置方法可以做到这一点。有没有办法获取鼠标点击的位置并将滑块移动到该点?


解决方案是计算位置并将其设置在mousePressEvent中,计算不像算术计算那么容易,因为它取决于每个操作系统的样式和样式表,所以我们必须使用QStyle,如下所示:

from PyQt5 import QtCore, QtWidgets


class Slider(QtWidgets.QSlider):
    def mousePressEvent(self, event):
        super(Slider, self).mousePressEvent(event)
        if event.button() == QtCore.Qt.LeftButton:
            val = self.pixelPosToRangeValue(event.pos())
            self.setValue(val)

    def pixelPosToRangeValue(self, pos):
        opt = QtWidgets.QStyleOptionSlider()
        self.initStyleOption(opt)
        gr = self.style().subControlRect(QtWidgets.QStyle.CC_Slider, opt, QtWidgets.QStyle.SC_SliderGroove, self)
        sr = self.style().subControlRect(QtWidgets.QStyle.CC_Slider, opt, QtWidgets.QStyle.SC_SliderHandle, self)

        if self.orientation() == QtCore.Qt.Horizontal:
            sliderLength = sr.width()
            sliderMin = gr.x()
            sliderMax = gr.right() - sliderLength + 1
        else:
            sliderLength = sr.height()
            sliderMin = gr.y()
            sliderMax = gr.bottom() - sliderLength + 1;
        pr = pos - sr.center() + sr.topLeft()
        p = pr.x() if self.orientation() == QtCore.Qt.Horizontal else pr.y()
        return QtWidgets.QStyle.sliderValueFromPosition(self.minimum(), self.maximum(), p - sliderMin,
                                               sliderMax - sliderMin, opt.upsideDown)


if __name__ == '__main__':
    import sys

    app = QtWidgets.QApplication(sys.argv)
    w = QtWidgets.QWidget()
    flay = QtWidgets.QFormLayout(w)
    w1 = QtWidgets.QSlider(QtCore.Qt.Horizontal)
    w2 = Slider(QtCore.Qt.Horizontal)
    flay.addRow("default: ", w1)
    flay.addRow("modified: ", w2)
    w.show()
    sys.exit(app.exec_())
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

将 QSlider 移动到鼠标点击位置 的相关文章

随机推荐