styles/st80.style
author Claus Gittinger <cg@exept.de>
Mon, 04 Dec 1995 01:08:24 +0100
changeset 274 30d54aac94a7
parent 153 c56277fa4865
child 309 8cc4d0e7b41b
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:#st80 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     2
;
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     3
; simulation of the old st80 style - looks somewhat like os2
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     4
;
274
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
     5
; $Header: /cvs/stx/stx/libview/styles/st80.style,v 1.5 1995-12-04 00:08:24 cg Exp $
144
claus
parents: 122
diff changeset
     6
claus
parents: 122
diff changeset
     7
comment  'old ST80 3D look alike'
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     8
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     9
name            #st80
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    10
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    11
;
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    12
; take a smaller font on VGA displays
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    13
;
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    14
#if Display width == 640
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    15
; take smaller fonts on VGA screens
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    16
font               Font family:'courier' face:'medium' style:'roman' size:10
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    17
selectionFont      Font family:'helvetica' face:'medium' style:'roman' size:10
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    18
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    19
selectionFont      Font family:'helvetica' face:'medium' style:'roman' size:12
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    20
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    21
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    22
#if Display hasGreyscales
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    23
is3D                      true
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    24
borderWidth               0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    25
viewGrey                  Color grey:80
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    26
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    27
viewGrey                  Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    28
lightColor                Color grey:50
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    29
borderWidth               1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    30
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    31
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    32
viewBackground            =viewGrey
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    33
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    34
scrollBarPosition         #right
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    35
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    36
scrollBarButtonPositions  #around     
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    37
scrollBarLevel            0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    38
scrollBarElementSpacing   0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    39
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    40
scrollerLevel             1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    41
scrollerViewBackground    =viewGrey
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    42
scrollerThumbColor        Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    43
scrollerThumbFrameColor   nil
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    44
scrollerThumbLevel        0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    45
scrollerThumbInset        3
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    46
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    47
textCursorType                   #solidCaret
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    48
textCursorBackgroundColor        Color black
274
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    49
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    50
#if Display hasColors
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    51
textSelectionBackgroundColor     Color green
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    52
textSelectionForegroundColor     Color black
274
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    53
#else
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    54
# if Display hasGreyscales
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    55
textSelectionBackgroundColor     =viewGrey "Color grey"
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    56
textSelectionForegroundColor     Color black
30d54aac94a7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 153
diff changeset
    57
# endif
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    58
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    59
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    60
popupBorderWidth                 1     
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    61
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    62
arrowButtonStyle                 #st80 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    63
arrowButtonActiveForegroundColor Color white   
153
claus
parents: 152
diff changeset
    64
; buttonActiveForegroundColor      Color white
claus
parents: 152
diff changeset
    65
buttonActiveBackgroundColor      Color grey
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    66
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    67
menuViewBackground               Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    68
menuForegroundColor              Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    69
menuBackgroundColor              Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    70
menuHilightForegroundColor       =menuBackgroundColor
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    71
menuHilightBackgroundColor       =menuForegroundColor
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    72
menuHighlightLevel               0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    73
menuSeparatingLineLevel          0
152
claus
parents: 144
diff changeset
    74
menuSeparatingLineInset          0
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    75
153
claus
parents: 152
diff changeset
    76
pullDownMenuViewBackground       =viewGrey
claus
parents: 152
diff changeset
    77
pullDownMenuLevel                1
claus
parents: 152
diff changeset
    78
pullDownMenuHilightLevel         -1
claus
parents: 152
diff changeset
    79
pullDownMenuHilightBackgroundColor  Color grey