styles/os2.style
author Claus Gittinger <cg@exept.de>
Fri, 30 Aug 1996 18:37:56 +0200
changeset 1040 c7c03aca6747
parent 498 ca1d11e446ce
child 1360 574d47019176
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     1
; View defaultStyle:#os2 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     2
;
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     3
; this is not yet completed
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     4
;
1040
c7c03aca6747 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
     5
; $Header: /cvs/stx/stx/libview/styles/os2.style,v 1.6 1996-08-30 16:37:56 cg Exp $
144
claus
parents: 122
diff changeset
     6
claus
parents: 122
diff changeset
     7
comment  'OS/2 look alike'
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     8
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 152
diff changeset
     9
#if (Language == #german) or:[Language == #de]
498
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    10
comment  'An `OS/2'' angelehnter Stil'
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    11
#endif
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    12
#if (Language == #french) or:[Language == #fr]
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    13
comment  'Comme `OS/2'''
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 152
diff changeset
    14
#endif
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 152
diff changeset
    15
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    16
is3D                      true
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    17
name                      #os2 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    18
144
claus
parents: 122
diff changeset
    19
; viewGrey                  Color grey:80
claus
parents: 122
diff changeset
    20
; darkerGrey                Color grey:67
152
claus
parents: 144
diff changeset
    21
claus
parents: 144
diff changeset
    22
claus
parents: 144
diff changeset
    23
#if Display hasColors 
1040
c7c03aca6747 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    24
Yellow                    Color red:100 green:100 blue:70
152
claus
parents: 144
diff changeset
    25
#else
1040
c7c03aca6747 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    26
Yellow                    Color white
152
claus
parents: 144
diff changeset
    27
#endif
claus
parents: 144
diff changeset
    28
claus
parents: 144
diff changeset
    29
#if Display hasGreyscales  
144
claus
parents: 122
diff changeset
    30
viewGrey                  Color grey:67 
152
claus
parents: 144
diff changeset
    31
brighterGrey              Color grey:80 
144
claus
parents: 122
diff changeset
    32
darkerGrey                Color grey:50 
152
claus
parents: 144
diff changeset
    33
#else
1040
c7c03aca6747 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    34
Yellow                    Color white
152
claus
parents: 144
diff changeset
    35
viewGrey                  Color white 
claus
parents: 144
diff changeset
    36
brighterGrey              Color white 
claus
parents: 144
diff changeset
    37
darkerGrey                Color white 
claus
parents: 144
diff changeset
    38
#endif
144
claus
parents: 122
diff changeset
    39
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    40
borderWidth               0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    41
viewBackground            =viewGrey
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    42
144
claus
parents: 122
diff changeset
    43
fatFont                   Font family:'variable' face:nil style:nil size:nil encoding:nil "/ Font family:'helvetica' face:'bold' style:'roman' size:12
claus
parents: 122
diff changeset
    44
thinFont                  Font family:'helvetica' face:'medium' style:'roman' size:12
claus
parents: 122
diff changeset
    45
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    46
scrollBarPosition         #right
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    47
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    48
scrollBarButtonPositions  #around     
144
claus
parents: 122
diff changeset
    49
scrollBarLevel            -1
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    50
scrollBarElementSpacing   0
144
claus
parents: 122
diff changeset
    51
scrollBarDisableButtons   true
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    52
144
claus
parents: 122
diff changeset
    53
scrollerLevel             0
claus
parents: 122
diff changeset
    54
scrollerViewBackground    =darkerGrey 
claus
parents: 122
diff changeset
    55
scrollerThumbColor        =viewGrey
claus
parents: 122
diff changeset
    56
scrollerThumbLevel        1
claus
parents: 122
diff changeset
    57
scrollerThumbInset        0
152
claus
parents: 144
diff changeset
    58
;scrollerThumbInset        1
144
claus
parents: 122
diff changeset
    59
claus
parents: 122
diff changeset
    60
buttonEdgeStyle                 #soft
claus
parents: 122
diff changeset
    61
buttonActiveLevel               -1
claus
parents: 122
diff changeset
    62
buttonPassiveLevel              3
claus
parents: 122
diff changeset
    63
buttonReturnButtonHasBorder     true
152
claus
parents: 144
diff changeset
    64
; buttonActiveBackgroundColor     =darkerGrey
claus
parents: 144
diff changeset
    65
#if Display hasGreyscales 
claus
parents: 144
diff changeset
    66
buttonActiveBackgroundColor     =brighterGrey
claus
parents: 144
diff changeset
    67
#else
claus
parents: 144
diff changeset
    68
buttonActiveBackgroundColor     Color black
claus
parents: 144
diff changeset
    69
buttonActiveForegroundColor     Color white
claus
parents: 144
diff changeset
    70
#endif
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    71
152
claus
parents: 144
diff changeset
    72
textCursorType                  #solidCaret
claus
parents: 144
diff changeset
    73
textCursorBackgroundColor       Color black
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    74
152
claus
parents: 144
diff changeset
    75
popupShadow                     true
claus
parents: 144
diff changeset
    76
popupShadowColor                Color black
claus
parents: 144
diff changeset
    77
popupBorderWidth                1     
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    78
144
claus
parents: 122
diff changeset
    79
arrowButtonStyle                  #os2 
claus
parents: 122
diff changeset
    80
arrowButtonForegroundColor        Color black
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    81
arrowButtonActiveBackgroundColor  =viewGrey
144
claus
parents: 122
diff changeset
    82
arrowButtonUpFormFile             'ScrollUp.os2.14.xbm'.
claus
parents: 122
diff changeset
    83
arrowButtonDownFormFile           'ScrollDn.os2.14.xbm'.
claus
parents: 122
diff changeset
    84
arrowButtonLeftFormFile           'ScrollLt.os2.14.xbm'.
claus
parents: 122
diff changeset
    85
arrowButtonRightFormFile          'ScrollRt.os2.14.xbm'.
claus
parents: 122
diff changeset
    86
arrowButtonActiveLevel            -1 "/ 0
claus
parents: 122
diff changeset
    87
arrowButtonPassiveLevel           1
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    88
152
claus
parents: 144
diff changeset
    89
#if Display hasGreyscales 
144
claus
parents: 122
diff changeset
    90
buttonDisabledForegroundColor     Color white
152
claus
parents: 144
diff changeset
    91
arrowButtonActiveForegroundColor  Color white
claus
parents: 144
diff changeset
    92
#else
claus
parents: 144
diff changeset
    93
buttonDisabledForegroundColor     Color grey
claus
parents: 144
diff changeset
    94
arrowButtonActiveForegroundColor  Color grey
claus
parents: 144
diff changeset
    95
#endif
144
claus
parents: 122
diff changeset
    96
claus
parents: 122
diff changeset
    97
checkToggleCheckColor             Color black
152
claus
parents: 144
diff changeset
    98
#if Display hasGreyscales not
claus
parents: 144
diff changeset
    99
checkToggleActiveBackgroundColor  Color white
claus
parents: 144
diff changeset
   100
#endif
144
claus
parents: 122
diff changeset
   101
152
claus
parents: 144
diff changeset
   102
selectionFont                     =fatFont
claus
parents: 144
diff changeset
   103
labelFont                         =thinFont
144
claus
parents: 122
diff changeset
   104
1040
c7c03aca6747 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
   105
selectionBackgroundColor          =Yellow
152
claus
parents: 144
diff changeset
   106
selectionHilightForegroundColor   Color white
claus
parents: 144
diff changeset
   107
#if Display hasGreyscales
claus
parents: 144
diff changeset
   108
selectionHilightBackgroundColor   Color grey:50
claus
parents: 144
diff changeset
   109
#else
claus
parents: 144
diff changeset
   110
selectionHilightBackgroundColor   Color black
claus
parents: 144
diff changeset
   111
#endif
claus
parents: 144
diff changeset
   112
selectionHilightFrameColor        Color grey:25
144
claus
parents: 122
diff changeset
   113
152
claus
parents: 144
diff changeset
   114
selectionHilightLevel             0
claus
parents: 144
diff changeset
   115
selectionRightArrowLevel          0
claus
parents: 144
diff changeset
   116
1040
c7c03aca6747 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
   117
editFieldBackgroundColor            =Yellow
152
claus
parents: 144
diff changeset
   118
editFieldSelectionBackgroundColor   Color black
claus
parents: 144
diff changeset
   119
editFieldSelectionForegroundColor   Color white
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   120
144
claus
parents: 122
diff changeset
   121
;
claus
parents: 122
diff changeset
   122
; since menus inherit from selectionInList,
1040
c7c03aca6747 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
   123
; redefine the Yellow settings ...
144
claus
parents: 122
diff changeset
   124
;
152
claus
parents: 144
diff changeset
   125
menuBackgroundColor                 =viewGrey
claus
parents: 144
diff changeset
   126
menuShadowColor                     =menuBackgroundColor darkened
claus
parents: 144
diff changeset
   127
menuLightColor                      =menuBackgroundColor lightened
claus
parents: 144
diff changeset
   128
; menuHilightForegroundColor        Color white
claus
parents: 144
diff changeset
   129
; menuHilightBackgroundColor        =darkerGrey
claus
parents: 144
diff changeset
   130
#if Display hasGreyscales
claus
parents: 144
diff changeset
   131
menuHilightFrameColor               nil
claus
parents: 144
diff changeset
   132
menuHilightLevel                    -1
claus
parents: 144
diff changeset
   133
#else
claus
parents: 144
diff changeset
   134
menuHilightFrameColor               Color black
claus
parents: 144
diff changeset
   135
menuHilightLevel                    0
claus
parents: 144
diff changeset
   136
#endif
claus
parents: 144
diff changeset
   137
menuViewBackground                  =viewGrey
claus
parents: 144
diff changeset
   138
menuSeparatingLineLevel             0
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   139
152
claus
parents: 144
diff changeset
   140
pullDownMenuFont                    =selectionFont
claus
parents: 144
diff changeset
   141
pullDownMenuSeparatingLines         false
claus
parents: 144
diff changeset
   142
pullDownMenuLevel                   0
claus
parents: 144
diff changeset
   143
pullDownMenuHilightLevel            -1
claus
parents: 144
diff changeset
   144
pullDownMenuHilightForegroundColor  Color black
claus
parents: 144
diff changeset
   145
pullDownMenuKeepMenu                true
claus
parents: 144
diff changeset
   146
; pullDownMenuToggleKeep              true