Index: sources/gui/qml/globals/Variables.qml
===================================================================
diff -u -r7b4219600ec64c2860113225ced0b5fc839b8ad2 -r8d7f8d2ac6620e92ab3cd239d7d8641113ea3e53
--- sources/gui/qml/globals/Variables.qml	(.../Variables.qml)	(revision 7b4219600ec64c2860113225ced0b5fc839b8ad2)
+++ sources/gui/qml/globals/Variables.qml	(.../Variables.qml)	(revision 8d7f8d2ac6620e92ab3cd239d7d8641113ea3e53)
@@ -64,11 +64,8 @@
     readonly property int dialogMargin                          : mainMenuHeight * 2
     readonly property int dialogWidth                           : applicationWidth  - dialogMargin
     readonly property int dialogHeight                          : applicationHeight - dialogMargin
-    readonly property int dialogRadius                          : 5
+    readonly property int dialogRadius                          : 10
 
-    readonly property real sliderDefaultRoundTickMarkDiameter   : 5
-    readonly property real sliderCreateTreatmentHeight          : 15
-
     readonly property int rangeRectMargin                       : 1
     readonly property int rangeRectRadius                       : 2
     readonly property int rangeRectTextMargin                   : 7
@@ -81,6 +78,7 @@
     readonly property int progressbarHeight                     : 30
     readonly property int progressbarHandler                    : 35
     readonly property int progressbarHandlerBorderWidth         : 4
+    readonly property int progressbarRectMargin                 : 0 // default as 0 to avoid progressRect having a thicker border than slider body
 
     readonly property int progressbarFluidHeight                : 5
     readonly property int progressbarSmall                      : 5
@@ -119,9 +117,11 @@
     readonly property int createTreatmentTableMargin            : 20
     readonly property int createTreatmentSubTableHeight         : 50
     readonly property int createTreatmentSubTableWidth          : 500
-    readonly property int createTreatmentSliderMargin           : 40
+    readonly property int createTreatmentSliderBodyHeight       : 15
+    readonly property int createTreatmentSliderMargin           : createTreatmentSliderBodyHeight
     readonly property int createTreatmentSliderHeight           : 65
     readonly property int createTreatmentSliderWidth            : 750
+    readonly property int createTreatmentSwitchYDisplacement    : 15
 
     readonly property int ultrafiltrationProgressbarWidth       : 880
     readonly property int ultrafiltrationAdjustmtenOptionWidth  : 520
@@ -175,6 +175,8 @@
     readonly property int sliderAdjustButtonDiameter            : 50
     readonly property int sliderAdjustButtonLeftMargin          : 30
 
+    readonly property real sliderDefaultRoundTickMarkDiameter   : 5
+
     readonly property int circleButtonDefaultDiameter           : 45