.
; View defaultStyle:#os2
;
; this is not yet completed
;
; $Header: /cvs/stx/stx/libview/styles/os2.style,v 1.3 1995-06-06 04:11:49 claus Exp $
comment 'OS/2 look alike'
is3D true
name #os2
; viewGrey Color grey:80
; darkerGrey Color grey:67
#if Display hasColors
yellow Color red:100 green:100 blue:70
#else
yellow Color white
#endif
#if Display hasGreyscales
viewGrey Color grey:67
brighterGrey Color grey:80
darkerGrey Color grey:50
#else
yellow Color white
viewGrey Color white
brighterGrey Color white
darkerGrey Color white
#endif
borderWidth 0
viewBackground =viewGrey
fatFont Font family:'variable' face:nil style:nil size:nil encoding:nil "/ Font family:'helvetica' face:'bold' style:'roman' size:12
thinFont Font family:'helvetica' face:'medium' style:'roman' size:12
scrollBarPosition #right
scrollBarButtonPositions #around
scrollBarLevel -1
scrollBarElementSpacing 0
scrollBarDisableButtons true
scrollerLevel 0
scrollerViewBackground =darkerGrey
scrollerThumbColor =viewGrey
scrollerThumbLevel 1
scrollerThumbInset 0
;scrollerThumbInset 1
buttonEdgeStyle #soft
buttonActiveLevel -1
buttonPassiveLevel 3
buttonReturnButtonHasBorder true
; buttonActiveBackgroundColor =darkerGrey
#if Display hasGreyscales
buttonActiveBackgroundColor =brighterGrey
#else
buttonActiveBackgroundColor Color black
buttonActiveForegroundColor Color white
#endif
textCursorType #solidCaret
textCursorBackgroundColor Color black
popupShadow true
popupShadowColor Color black
popupBorderWidth 1
arrowButtonStyle #os2
arrowButtonForegroundColor Color black
arrowButtonActiveBackgroundColor =viewGrey
arrowButtonUpFormFile 'ScrollUp.os2.14.xbm'.
arrowButtonDownFormFile 'ScrollDn.os2.14.xbm'.
arrowButtonLeftFormFile 'ScrollLt.os2.14.xbm'.
arrowButtonRightFormFile 'ScrollRt.os2.14.xbm'.
arrowButtonActiveLevel -1 "/ 0
arrowButtonPassiveLevel 1
#if Display hasGreyscales
buttonDisabledForegroundColor Color white
arrowButtonActiveForegroundColor Color white
#else
buttonDisabledForegroundColor Color grey
arrowButtonActiveForegroundColor Color grey
#endif
checkToggleCheckColor Color black
#if Display hasGreyscales not
checkToggleActiveBackgroundColor Color white
#endif
selectionFont =fatFont
labelFont =thinFont
selectionBackgroundColor =yellow
selectionHilightForegroundColor Color white
#if Display hasGreyscales
selectionHilightBackgroundColor Color grey:50
#else
selectionHilightBackgroundColor Color black
#endif
selectionHilightFrameColor Color grey:25
selectionHilightLevel 0
selectionRightArrowLevel 0
editFieldBackgroundColor =yellow
editFieldSelectionBackgroundColor Color black
editFieldSelectionForegroundColor Color white
;
; since menus inherit from selectionInList,
; redefine the yellow settings ...
;
menuBackgroundColor =viewGrey
menuShadowColor =menuBackgroundColor darkened
menuLightColor =menuBackgroundColor lightened
; menuHilightForegroundColor Color white
; menuHilightBackgroundColor =darkerGrey
#if Display hasGreyscales
menuHilightFrameColor nil
menuHilightLevel -1
#else
menuHilightFrameColor Color black
menuHilightLevel 0
#endif
menuViewBackground =viewGrey
menuSeparatingLineLevel 0
pullDownMenuFont =selectionFont
pullDownMenuSeparatingLines false
pullDownMenuLevel 0
pullDownMenuHilightLevel -1
pullDownMenuHilightForegroundColor Color black
pullDownMenuKeepMenu true
; pullDownMenuToggleKeep true