author | Claus Gittinger <cg@exept.de> |
Sat, 21 Jan 2017 04:04:02 +0100 | |
changeset 7779 | 5931d9c57148 |
parent 6808 | ec8da1782959 |
permissions | -rw-r--r-- |
4312 | 1 |
; View defaultStyle:#mswindows95 |
2100 | 2 |
; |
6808 | 3 |
; $Header: /cvs/stx/stx/libview/styles/mswindows95.style,v 1.48 2015-03-02 10:26:59 cg Exp $ |
2100 | 4 |
|
3725 | 5 |
comment 'win95/nt lookalike' |
2100 | 6 |
|
7 |
#if (Language == #german) or:[Language == #de] |
|
6808 | 8 |
comment 'an Windows95 angelehnter Stil' |
2100 | 9 |
#endif |
10 |
||
11 |
#if (Language == #french) or:[Language == #fr] |
|
6808 | 12 |
comment 'Un style qui résemble Windows95' |
2100 | 13 |
#endif |
14 |
||
4312 | 15 |
name #win95 |
5455 | 16 |
previewFileName 'viewStyleSample_win95.png' |
2100 | 17 |
|
2542 | 18 |
; |
19 |
; notice: the values below |
|
20 |
; are not used when running under native Windows |
|
21 |
; (uses system-settings values then) |
|
22 |
; |
|
4312 | 23 |
#if Screen current hasGreyscales |
2307
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
24 |
|
2100 | 25 |
selectionBlue (Color red:0 green:0 blue:50) exactOrNearestOn:(Screen current) |
26 |
||
4312 | 27 |
; viewGrey (Color grey:67) exactOrNearestOn:(Screen current) |
2100 | 28 |
viewGrey (Color grey:77) exactOrNearestOn:(Screen current) |
4312 | 29 |
; viewLightGrey (Color grey:80) exactOrNearestOn:(Screen current) |
30 |
viewLightGrey (Color grey:90) exactOrNearestOn:(Screen current) |
|
2100 | 31 |
lightColor Color white |
32 |
halfShadowColor (Color grey:33) exactOrNearestOn:(Screen current) |
|
33 |
; halfLightColor (Color grey:67) exactOrNearestOn:(Screen current) |
|
34 |
; halfLightColor Color white "/ grey:67 |
|
35 |
halfLightColor =viewGrey |
|
3728 | 36 |
shadowColor (Color grey:33) exactOrNearestOn:(Screen current) |
37 |
||
38 |
; shadowColor Color black |
|
2307
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
39 |
|
2100 | 40 |
#else |
2307
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
41 |
|
2100 | 42 |
selectionBlue Color black |
43 |
viewGrey Color white |
|
4312 | 44 |
viewLightGrey Color white |
2100 | 45 |
lightColor Color grey:50 |
3728 | 46 |
shadowColor Color black |
2307
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
47 |
|
2100 | 48 |
#endif |
49 |
||
2991
918e2f570098
removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents:
2629
diff
changeset
|
50 |
#if Screen current platformName = 'WIN32' |
2307
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
51 |
|
2991
918e2f570098
removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents:
2629
diff
changeset
|
52 |
selectionBlue [Screen current getSystemColor:#'COLOR_HIGHLIGHT'] |
918e2f570098
removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents:
2629
diff
changeset
|
53 |
menu.backgroundColor [Screen current getSystemColor:#'COLOR_MENU' ] |
918e2f570098
removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents:
2629
diff
changeset
|
54 |
menu.foregroundColor [Screen current getSystemColor:#'COLOR_MENUTEXT' ] |
4312 | 55 |
pullDownMenu.backgroundColor [Screen current getSystemColor:#'COLOR_MENU' ] |
2991
918e2f570098
removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents:
2629
diff
changeset
|
56 |
viewGrey [Screen current getSystemColor:#'COLOR_BTNFACE' ] |
2307
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
57 |
|
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
58 |
#endif |
c61ba06af749
if running under native windows, use the systemColors
Claus Gittinger <cg@exept.de>
parents:
2258
diff
changeset
|
59 |
|
3750 | 60 |
#include 'mswindows95.common' |