*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 19 Dec 2019 15:52:01 +0100
changeset 8948 64b7075196d5
parent 8947 03785cc75473
child 8949 d3a4a0c15644
*** empty log message ***
styles/mswindows10.style
styles/mswindows8.style
--- a/styles/mswindows10.style	Thu Dec 19 15:35:35 2019 +0100
+++ b/styles/mswindows10.style	Thu Dec 19 15:52:01 2019 +0100
@@ -23,21 +23,37 @@
 ;
 
 menu.enteredLevel                   0
+
+selection.hilightForegroundColor            Color black
+selection.hilightBackgroundColor            (Color rgbValue:16rCCE8FF)
+selection.hilightForegroundColorNoFocus     Color black
+selection.hilightBackgroundColorNoFocus     (Color rgbValue:16rD9D9D9)
+
+selection.hilightFrameColor                 (Color rgbValue:16r99D1FF)
+selection.hilightFrameColorNoFocus          (Color rgbValue:16rD9D9D9)
+
 scrollableView.level                0
 scrolledView.level                  0
+scroller.thumbInset                 0
+scrollBar.disableButtons            true
+scrollBar.vScrollBarWidth           15
+scrollBar.hScrollBarHeight          15
 ; currently has trouble on win machines
 ; scrollBar.hideIfPointerOutside      true
 
-; arrowButton.backgroundColor         (Color grey:50)
-arrowButton.foregroundColor         (Color white)
+variablePanel.barSideLineColor      (Color rgbValue:16rF0F0F0)
+variablePanel.backgroundColor       Color white
 
-arrowButton.activeBackgroundColor   (Color grey:50)
+arrowButton.backgroundColor         (Color rgbValue:16rF0F0F0)
+arrowButton.foregroundColor         (Color rgbValue:16r606060)
+
+arrowButton.enteredBackgroundColor  (Color rgbValue:16rDADADA)
+arrowButton.enteredForegroundColor  (Color black)
+
+arrowButton.activeBackgroundColor   (Color rgbValue:16r606060)
 arrowButton.activeForegroundColor   (Color white)
 
-arrowButton.enteredBackgroundColor  (Color grey:80)
-arrowButton.enteredForegroundColor  (Color black)
-
-; arrowButton.disabledBackgroundColor (Color grey:80)
+arrowButton.disabledBackgroundColor (Color rgbValue:16r606060)
 arrowButton.disabledForegroundColor (Color grey:80)
 
 arrowButton.upForm                  =iconLibrary scrollUpIcon
@@ -100,3 +116,5 @@
 arrowButton.enteredRightFormFile    nil
 arrowButton.activeRightFormFile     nil
 arrowButton.disabledRightFormFile   nil
+
+; splitterLine: F7
--- a/styles/mswindows8.style	Thu Dec 19 15:35:35 2019 +0100
+++ b/styles/mswindows8.style	Thu Dec 19 15:52:01 2019 +0100
@@ -118,22 +118,23 @@
 
 ; selection.highlightEnterItem       true         "/ underline-highlight item under cursor
 
-scroller.viewBackground          (Color redByte:16rF0 greenByte:16rF0 blueByte:16rF0)
-scroller.thumbColor              (Color redByte:16rCD greenByte:16rCD blueByte:16rCD)
-scroller.thumbLightColor         =scroller.thumbColor
-scroller.thumbShadowColor        =scroller.thumbColor
-scroller.thumbEnteredColor       (Color redByte:16rA6 greenByte:16rA6 blueByte:16rA6)
-scroller.thumbActiveColor        (Color redByte:16r60 greenByte:16r60 blueByte:16r60)
-scroller.thumbLevel              0
-scroller.thumbInset              1
-scroller.thumbFrameColor         nil
-scroller.thumbEdgeStyle          nil
-scroller.NTallyMarks             nil
-scroller.tallyLevel              nil
-scroller.tallyInset              nil
-scroller.tallyDistance           nil
-scroller.snapBackDistance        100
-scroller.minThumbSize            16
+scroller.viewBackground             (Color redByte:16rF0 greenByte:16rF0 blueByte:16rF0)
+scroller.thumbColor                 (Color redByte:16rC0 greenByte:16rC0 blueByte:16rC0)
+scroller.thumbLightColor            =scroller.thumbColor
+scroller.thumbShadowColor           =scroller.thumbColor
+scroller.thumbEnteredColor          (Color redByte:16rA6 greenByte:16rA6 blueByte:16rA6)
+scroller.thumbActiveColor           (Color redByte:16r60 greenByte:16r60 blueByte:16r60)
+scroller.thumbLevel                 0
+; scroller.thumbInset                 1
+scroller.thumbInset                 0
+scroller.thumbFrameColor            nil
+scroller.thumbEdgeStyle             nil
+scroller.NTallyMarks                nil
+scroller.tallyLevel                 nil
+scroller.tallyInset                 nil
+scroller.tallyDistance              nil
+scroller.snapBackDistance           100
+scroller.minThumbSize               16
 
 scroller.vista3DStyle           false