--- a/styles/mswindows95.style Wed Mar 31 09:37:14 1999 +0200
+++ b/styles/mswindows95.style Wed Mar 31 09:45:08 1999 +0200
@@ -1,6 +1,6 @@
; View defaultStyle:#mswindows95
;
-; $Header: /cvs/stx/stx/libview/styles/mswindows95.style,v 1.19 1999-03-26 15:42:12 cg Exp $
+; $Header: /cvs/stx/stx/libview/styles/mswindows95.style,v 1.20 1999-03-31 07:44:55 cg Exp $
comment 'win95 lookalike'
@@ -252,6 +252,9 @@
text.selectionForegroundColor [Display getSystemColor:#'COLOR_HIGHLIGHTTEXT' ]
text.selectionBackgroundColor [Display getSystemColor:#'COLOR_HIGHLIGHT' ]
scroller.thumbColor [Display getSystemColor:#'COLOR_BTNFACE' ]
+selection.hilightForegroundColor [Display getSystemColor:#'COLOR_HIGHLIGHTTEXT' ]
+selection.hilightBackgroundColor [Display getSystemColor:#'COLOR_HIGHLIGHT' ]
+
#endif
#if (Display platformName = 'WIN32') and:[(Display getSystemColor:#'COLOR_SCROLLBAR') brightness > 0.95]
--- a/styles/mswindows95_small.style Wed Mar 31 09:37:14 1999 +0200
+++ b/styles/mswindows95_small.style Wed Mar 31 09:45:08 1999 +0200
@@ -1,273 +1,26 @@
-; View defaultStyle:#mswindows95
+; View defaultStyle:#mswindows95_small
+;
+; like mswindows95, but with smaller scrollbars
+; (better for small-screens)
;
-; $Header: /cvs/stx/stx/libview/styles/mswindows95_small.style,v 1.1 1999-03-31 07:37:14 cg Exp $
+; $Header: /cvs/stx/stx/libview/styles/mswindows95_small.style,v 1.2 1999-03-31 07:45:08 cg Exp $
-comment 'win95 lookalike'
+#include 'mswindows95.style'
+
+comment 'win95 lookalike - smaller scrollbars'
#if (Language == #german) or:[Language == #de]
-comment 'an MS Windows95 angelehnter Stil'
+comment 'an MS Windows95 angelehnter Stil - schmale ScrollBars'
#endif
#if (Language == #french) or:[Language == #fr]
comment 'Un style qui résemble MS Windows95'
#endif
-is3D true
-name #win95
-
-
-;
-; notice: the values below
-; are not used when running under native Windows
-; (uses system-settings values then)
-;
-#if Display hasGreyscales
-
-selectionBlue (Color red:0 green:0 blue:50) exactOrNearestOn:(Screen current)
-
-; viewGrey (Color grey:67) exactOrNearestOn:(Screen current)
-viewGrey (Color grey:77) exactOrNearestOn:(Screen current)
-; viewLightGrey (Color grey:80) exactOrNearestOn:(Screen current)
-viewLightGrey (Color grey:90) exactOrNearestOn:(Screen current)
-lightColor Color white
-halfShadowColor (Color grey:33) exactOrNearestOn:(Screen current)
-; halfLightColor (Color grey:67) exactOrNearestOn:(Screen current)
-; halfLightColor Color white "/ grey:67
-halfLightColor =viewGrey
-
-#else
-
-selectionBlue Color black
-viewGrey Color white
-viewLightGrey Color white
-lightColor Color grey:50
-
-#endif
-
-shadowColor Color black
-
-#if Display platformName = 'WIN32'
-
-selectionBlue [Display getSystemColor:#'COLOR_HIGHLIGHT']
-menu.backgroundColor [Display getSystemColor:#'COLOR_MENU' ]
-menu.foregroundColor [Display getSystemColor:#'COLOR_MENUTEXT' ]
-pullDownMenu.backgroundColor =menu.backgroundColor
-viewGrey [Display getSystemColor:#'COLOR_BTNFACE' ]
-
-#endif
-
-
-borderWidth 0
-viewBackground =viewGrey
-popup.borderWidth 1
-popup.shadow false
-
-#if Display width <= 640
-font Font family:'helvetica' face:'medium' style:'roman' size:10
-textFont Font family:'courier' face:'medium' style:'roman' size:10
-#else
-font Font family:'helvetica' face:'medium' style:'roman' size:12
-textFont Font family:'courier' face:'medium' style:'roman' size:12
-#endif
-
-#if (Display platformName = 'WIN32' and:[Display width <= 640])
-font Font family:'MS SANS SERIF' size:8
-textFont Font family:'courier' face:'medium' style:'roman' size:8
-#endif
-
-#if (Display platformName = 'WIN32' and:[Display width > 640])
-font Font family:'MS SANS SERIF' size:10
-textFont Font family:'courier' face:'medium' style:'roman' size:10
-#endif
-menuFont =font
-
-selection.font =font
-
-focus.showBorder false
-focus.takeOnClick true
-
-textCursor.type #ibeam
-textCursor.noFocusForegroundColor Color grey
-
-#if Display hasGrayscales
-; editField.backgroundColor Color grey:90
-editField.backgroundColor Color white
-#else
-editField.backgroundColor Color white
-editField.shadowColor Color black
-editField.lightColor Color grey:80
-#endif
-
-checkToggle.activeLevel -2
-checkToggle.passiveLevel -2
-checkToggle.foregroundColor Color black
-checkToggle.backgroundColor Color white
-checkToggle.activeForegroundColor Color black
-checkToggle.activeBackgroundColor Color white
-checkToggle.bitmapFile 'CheckOn10.xbm'
-
-#if Display hasGreyscales
-menu.hilightForegroundColor Color white
-menu.hilightBackgroundColor =selectionBlue
-#else
-menu.hilightForegroundColor Color white
-menu.hilightBackgroundColor Color black
-#endif
-menu.buttonEnteredLevel 1
-menu.buttonPassiveLevel 0
-menu.buttonActiveLevel -1
-menu.buttonItemSpace 2
-
-pullDownMenu.separatingLines false
-pullDownMenu.level 0
-
-selection.hilightForegroundColor Color white
-#if Display hasGrayscales
-selection.hilightBackgroundColor =selectionBlue
-#else
-selection.hilightBackgroundColor Color black
-#endif
-selection.hilightFrameColor Color black
-selection.rightArrowLevel 0
-selection.rightArrowStyle #solid
-
-variablePanel.handlePosition #right
-; variablePanel.handleStyle #full
-variablePanel.handleStyle #none
-
-#if Display serverVendor ~= 'Silicon Graphics'
-; SGI Xserver has a bug, keeping the dashed lineStyle in its GC
-variablePanel.trackingStyle #dashedLine
-#else
-variablePanel.trackingStyle #solidLine
-#endif
-
-; variablePanel.barHeight 6
-; variablePanel.handleLevel 1
-variablePanel.barHeight 4
-variablePanel.handleLevel 0
-
-scrollableView.level -1
-; scrollableView.backgroundColor =viewLightGrey
-scrolledView.borderWidth 0
-scrolledView.level 0
-scrolledView.margin 1
-scrollBar.level 0
-scrollBar.spacing 0
-scrollBar.hiding true
-scrollBar.neverMini true
-scrollBar.position #right
-scrollBar.buttonPositions #around
-scrollBar.viewBackground =viewLightGrey
-scrollBar.elementSpacing 0
-
-#if Display hasGreyscales
-scroller.viewBackground =viewLightGrey
-scroller.thumbColor =viewGrey
-; scroller.thumbEdgeStyle #soft
-scroller.thumbEdgeStyle #softWin95
-scroller.thumbLightColor =viewGrey
-scroller.thumbHalfLightColor Color white
-#else
-scroller.viewBackground Color grey:87.5
-scroller.thumbColor Color white
-#endif
-
-scroller.thumbLevel 2
-# scroller.borderWidth 1
-scroller.borderWidth 0
-scroller.level 0
-scroller.ghostFrameColor Color darkGrey
-scroller.snapBack true
-
-;button.activeLevel 1
-button.activeLevel -1 "/ 0
-button.passiveLevel 2
-#if Display hasGreyscales
-; button.edgeStyle #soft
-button.edgeStyle #softWin95
-; button.activeForegroundColor Color black
-; button.activeBackgroundColor Color white
-; button.enteredBackgroundColor Color lightGrey
-; button.halfShadowColor =viewGrey darkened exactOrNearestOn:(Screen current)
-button.halfShadowColor =halfShadowColor
-button.halfLightColor Color white
-#else
-button.activeBackgroundColor Color black
-button.activeForegroundColor Color white
-; button.enteredBackgroundColor Color grey:87.5
-#endif
-
-radioButton.style #round3D
-
#if Display width <= 800
arrowButton.upFormFile 'ScrollUp.w95.9.xbm'.
arrowButton.downFormFile 'ScrollDn.w95.9.xbm'.
arrowButton.leftFormFile 'ScrollLt.w95.9.xbm'.
arrowButton.rightFormFile 'ScrollRt.w95.9.xbm'.
-#else
-; arrowButton.upFormFile 'ScrollUp.w95.14.xbm'.
-; arrowButton.downFormFile 'ScrollDn.w95.14.xbm'.
-; arrowButton.leftFormFile 'ScrollLt.w95.14.xbm'.
-; arrowButton.rightFormFile 'ScrollRt.w95.14.xbm'.
-arrowButton.upFormFile 'ScrollUp.w95.11.xbm'.
-arrowButton.downFormFile 'ScrollDn.w95.11.xbm'.
-arrowButton.leftFormFile 'ScrollLt.w95.11.xbm'.
-arrowButton.rightFormFile 'ScrollRt.w95.11.xbm'.
#endif
-selection.rightArrowForm Image extent:16@12 depth:1 \
- bits:#[ \
- 2r00000000 2r00000000 \
- 2r00000000 2r00000000 \
- 2r00000000 2r00000000 \
- 2r00000010 2r00000000 \
- 2r00000011 2r00000000 \
- 2r00000011 2r10000000 \
- 2r00000011 2r11000000 \
- 2r00000011 2r10000000 \
- 2r00000011 2r00000000 \
- 2r00000010 2r00000000 \
- 2r00000000 2r00000000 \
- 2r00000000 2r00000000 \
- ] \
- pad:8
-
-comboView.level -1
-comboView.downFormFile 'ScrollDn.w95.11.xbm'.
-
-
-html.backgroundColor Color white
-; html.anchorForegroundColor Color green darkened
-; html.visitedAnchorForegroundColor =html.anchorForegroundColor darkened darkened
-html.visitedAnchorForegroundColor Color red:50 green:0 blue:50
-; html.anchorUnderlines true
-
-activeHelp.backgroundColor Color yellow lightened
-activeHelp.borderWidth 2
-
-;
-; if running under windows, use the systemColor settings
-;
-#if Display platformName = 'WIN32'
-
-menu.backgroundColor [Display getSystemColor:#'COLOR_MENU' ]
-menu.foregroundColor [Display getSystemColor:#'COLOR_MENUTEXT' ]
-pullDownMenu.backgroundColor =menu.backgroundColor
-button.backgroundColor [Display getSystemColor:#'COLOR_BTNFACE' ]
-text.selectionForegroundColor [Display getSystemColor:#'COLOR_HIGHLIGHTTEXT' ]
-text.selectionBackgroundColor [Display getSystemColor:#'COLOR_HIGHLIGHT' ]
-scroller.thumbColor [Display getSystemColor:#'COLOR_BTNFACE' ]
-selection.hilightForegroundColor [Display getSystemColor:#'COLOR_HIGHLIGHTTEXT' ]
-selection.hilightBackgroundColor [Display getSystemColor:#'COLOR_HIGHLIGHT' ]
-
-#endif
-
-#if (Display platformName = 'WIN32') and:[(Display getSystemColor:#'COLOR_SCROLLBAR') brightness > 0.95]
-scroller.viewBackground [(Form width:8 height:8 fromArray:(Color ditherBits at:32) on:Display) colorMap:(Array with:Color black with:(Display getSystemColor:#'COLOR_SCROLLBAR') )]
-#endif
-#if (Display platformName = 'WIN32') and:[(Display getSystemColor:#'COLOR_SCROLLBAR') brightness <= 0.95]
-scroller.viewBackground [(Form width:8 height:8 fromArray:(Color ditherBits at:32) on:Display) colorMap:(Array with:Color white with:(Display getSystemColor:#'COLOR_SCROLLBAR') )]
-#endif
-
-warningBox.iconFile 'bitmaps/Warning_w95.xpm'