SliderSwitch.qml 2.45 KB
Newer Older
Don Gagne's avatar
Don Gagne committed
1 2 3 4 5 6 7 8 9 10
import QtQuick                  2.5
import QtQuick.Controls         1.4

import QGroundControl.ScreenTools   1.0
import QGroundControl.Palette       1.0

/// The SliderSwitch control implements a sliding switch control similar to the power off
/// control on an iPhone.
Rectangle {
    id:     _root
11
    width:  label.contentWidth + (_diameter * 2.5) + (_border * 4)
Don Gagne's avatar
Don Gagne committed
12 13 14 15 16 17
    radius: height /2
    color:  qgcPal.window

    signal accept   ///< Action confirmed
    signal reject   ///< Action rejected

18 19
    property string confirmText                         ///< Text for slider
    property alias  fontPointSize: label.font.pointSize ///< Point size for text
Don Gagne's avatar
Don Gagne committed
20 21 22 23 24 25 26

    property real _border: 4
    property real _diameter: height - (_border * 2)

    QGCPalette { id: qgcPal; colorGroupEnabled: true }

    QGCLabel {
Don Gagne's avatar
Don Gagne committed
27
        id:                         label
Don Gagne's avatar
Don Gagne committed
28 29
        anchors.horizontalCenter:   parent.horizontalCenter
        anchors.verticalCenter:     parent.verticalCenter
Don Gagne's avatar
Don Gagne committed
30
        text:                       qsTr("Slide to %1").arg(confirmText)
Don Gagne's avatar
Don Gagne committed
31 32 33 34 35 36 37 38 39 40 41 42
    }

    Rectangle {
        id:         slider
        x:          _border
        y:          _border
        height:     _diameter
        width:      _diameter
        radius:     _diameter / 2
        color:      qgcPal.windowShade
        opacity:    0.8

43 44 45 46
        QGCColoredImage {
            anchors.centerIn:       parent
            width:                  parent.width  * 0.8
            height:                 parent.height * 0.8
dogmaphobic's avatar
dogmaphobic committed
47
            sourceSize.height:      height
48 49 50
            fillMode:               Image.PreserveAspectFit
            smooth:                 false
            mipmap:                 false
51 52


53 54 55 56 57
            color:                  qgcPal.text
            cache:                  false
            source:                 "/res/ArrowRight.svg"
        }

Don Gagne's avatar
Don Gagne committed
58 59 60 61 62 63 64 65
        MouseArea {
            id:             sliderDragArea
            anchors.fill:   parent
            drag.target:    slider
            drag.axis:      Drag.XAxis
            drag.minimumX:  _border
            drag.maximumX:  _maxXDrag

Don Gagne's avatar
Don Gagne committed
66
            property real _maxXDrag:    _root.width - (_diameter + _border)
Don Gagne's avatar
Don Gagne committed
67 68 69 70 71 72 73 74 75 76 77 78 79
            property bool dragActive:   drag.active

            onDragActiveChanged: {
                if (!sliderDragArea.drag.active) {
                    if (slider.x > _maxXDrag - _border) {
                        _root.accept()
                    }
                    slider.x = _border
                }
            }
        }
    }
}