author | convert-repo |
Fri, 21 Dec 2018 04:38:02 +0000 | |
changeset 8601 | bee9c53ab413 |
parent 6810 | 9eff0273af98 |
permissions | -rw-r--r-- |
4296 | 1 |
; View defaultStyle:#mswindowsXP |
3720 | 2 |
; |
6810 | 3 |
; $Header: /cvs/stx/stx/libview/styles/mswindowsXP.style,v 1.37 2015-03-02 10:27:56 cg Exp $ |
3720 | 4 |
|
4296 | 5 |
name #winXP |
3720 | 6 |
|
5038 | 7 |
ToolbarIconLibrary ?(Smalltalk at:#XPToolbarIconLibrary) ? GenericToolbarIconLibrary |
4680 | 8 |
useQuestForHelp true |
4314 | 9 |
|
3720 | 10 |
; |
11 |
; for now, much like win95, except for some menuPanel details |
|
3725 | 12 |
; scrollbars are to come ... |
3720 | 13 |
; |
4927 | 14 |
|
3750 | 15 |
; |
16 |
; notice: the values below |
|
17 |
; are not used when running under native Windows |
|
18 |
; (uses system-settings values then) |
|
19 |
; |
|
4296 | 20 |
#if Screen current hasGreyscales |
3750 | 21 |
|
22 |
selectionBlue (Color red:0 green:0 blue:50) exactOrNearestOn:(Screen current) |
|
23 |
||
4316 | 24 |
; viewGrey (Color redByte:241 greenByte:242 blueByte:239) exactOrNearestOn:(Screen current) |
25 |
viewGrey (Color grey:90) exactOrNearestOn:(Screen current) |
|
4296 | 26 |
viewLightGrey Color white |
3750 | 27 |
lightColor Color white |
28 |
halfShadowColor (Color grey:80) exactOrNearestOn:(Screen current) |
|
29 |
halfLightColor =viewGrey |
|
30 |
shadowColor (Color grey:50) exactOrNearestOn:(Screen current) |
|
31 |
||
32 |
#else |
|
33 |
||
34 |
selectionBlue Color black |
|
35 |
viewGrey Color white |
|
4296 | 36 |
viewLightGrey Color white |
3750 | 37 |
lightColor Color grey:50 |
38 |
shadowColor Color black |
|
39 |
||
40 |
#endif |
|
41 |
||
42 |
#if Screen current platformName = 'WIN32' |
|
43 |
||
44 |
selectionBlue [Screen current getSystemColor:#'COLOR_HIGHLIGHT'] |
|
45 |
menu.backgroundColor [Screen current getSystemColor:#'COLOR_MENU' ] |
|
46 |
menu.foregroundColor [Screen current getSystemColor:#'COLOR_MENUTEXT' ] |
|
47 |
viewGrey [Screen current getSystemColor:#'COLOR_BTNFACE' ] |
|
4311 | 48 |
lightenedViewGrey [(Screen current getSystemColor:#'COLOR_BTNFACE') lightened ] |
49 |
darkenedViewGrey [(Screen current getSystemColor:#'COLOR_BTNFACE') darkened ] |
|
50 |
||
51 |
#else |
|
52 |
||
53 |
lightenedViewGrey Color redByte:240 greenByte:240 blueByte:240 |
|
54 |
darkenedViewGrey Color redByte:150 greenByte:150 blueByte:150 |
|
3750 | 55 |
|
56 |
#endif |
|
57 |
||
58 |
#include 'mswindows95.common' |
|
4311 | 59 |
|
4296 | 60 |
name #winXP |
3720 | 61 |
|
5446 | 62 |
comment 'winXP lookalike' |
63 |
previewFileName 'viewStyleSample_winxp.png' |
|
3720 | 64 |
|
65 |
#if (Language == #german) or:[Language == #de] |
|
6810 | 66 |
comment 'an WindowsXP angelehnter Stil' |
3720 | 67 |
#endif |
68 |
||
69 |
#if (Language == #french) or:[Language == #fr] |
|
6810 | 70 |
comment 'Un style qui résemble WindowsXP' |
3720 | 71 |
#endif |
72 |
||
73 |
menu.enteredLevel 0 |
|
3725 | 74 |
; menu.buttonEnteredLevel 2 "/ sigh - does not work |
75 |
||
3722 | 76 |
;; enable this, when old menuView cares for it also |
4311 | 77 |
;; menu.itemMargin 1 |
78 |
menu.selectionFollowsMouse true |
|
79 |
menu.enteredBackgroundColor =menu.hilightBackgroundColor |
|
80 |
menu.enteredForegroundColor =menu.hilightForegroundColor |
|
81 |
menu.iconIndicationOn.bitmapFile 'CheckOn_xp.xpm' |
|
82 |
menu.iconIndicationOff.bitmapFile 'CheckOff_xp.xpm' |
|
83 |
menu.iconRadioOn.bitmapFile 'RadioOn_xp.xpm' |
|
84 |
menu.iconRadioOff.bitmapFile 'RadioOff_xp.xpm' |
|
4307 | 85 |
menu.iconDisabledIndicationOn.bitmapFile 'CheckOn_disabled_xp.xpm' |
86 |
menu.iconDisabledIndicationOff.bitmapFile 'CheckOff_disabled_xp.xpm' |
|
87 |
menu.iconDisabledRadioOn.bitmapFile 'RadioOn_disabled_xp.xpm' |
|
88 |
menu.iconDisabledRadioOff.bitmapFile 'RadioOff_disabled_xp.xpm' |
|
3725 | 89 |
|
4311 | 90 |
;button.edgeStyle #soft |
91 |
;button.activeLevel -1 |
|
92 |
;button.passiveLevel 3 |
|
93 |
;button.enteredBackgroundColor [ (Screen current getSystemColor:#'COLOR_BTNFACE') lightened ] |
|
3725 | 94 |
|
4300 | 95 |
comboView.downFormFile 'ComboDn_xp.xpm'. |
96 |
comboView.disabledDownFormFile 'ComboDn_disabled_xp.xpm'. |
|
97 |
comboView.activeDownFormFile 'ComboDn_active_xp.xpm'. |
|
98 |
comboView.enteredDownFormFile 'ComboDn_entered_xp.xpm'. |
|
99 |
comboView.button.activeLevel 0 |
|
100 |
comboView.button.passiveLevel 0 |
|
101 |
comboView.button.activeBackgroundColor =viewGrey |
|
4301 | 102 |
; comboView.button.activeBackgroundColor (Color white) |
103 |
; comboView.button.backgroundColor (Color white) |
|
104 |
; comboView.level 0 |
|
3725 | 105 |
|
4925
e201d1eafced
disbled ugly hover-highlight for trees
Claus Gittinger <cg@exept.de>
parents:
4680
diff
changeset
|
106 |
; selection.highlightEnterItem true "/ underline-highlight item under cursor |
3749 | 107 |
|
4316 | 108 |
#if Screen current platformName = 'WIN32' |
4296 | 109 |
scroller.viewBackground (Color redByte:16rFB greenByte:16rFB blueByte:16rF9) |
4316 | 110 |
#else |
111 |
scroller.viewBackground (Color redByte:221 greenByte:221 blueByte:204) |
|
112 |
#endif |
|
3725 | 113 |
scroller.thumbColor (Color redByte:175 greenByte:190 blueByte:240) slightlyLightened |
4323 | 114 |
"/ scroller.thumbLightColor (Color redByte:16rCF greenByte:16rDD blueByte:16rFD) |
115 |
scroller.thumbLightColor (Color redByte:238 greenByte:244 blueByte:254) |
|
4296 | 116 |
scroller.thumbShadowColor (Color redByte:16r83 greenByte:16r9E blueByte:16rD8) |
3725 | 117 |
scroller.thumbEnteredColor (Color redByte:175 greenByte:190 blueByte:240) lightened |
118 |
scroller.thumbActiveColor (Color red:64 green:75 blue:98) |
|
119 |
scroller.thumbLevel 0 |
|
120 |
scroller.thumbInset 1 |
|
4318 | 121 |
; scroller.thumbFrameColor Color white "/ (Color redByte:175 greenByte:190 blueByte:240) darkened |
4323 | 122 |
scroller.thumbFrameColor (Color redByte:159 greenByte:181 blueByte:210) |
4324 | 123 |
scroller.thumbFrameColor2 (Color redByte:16rEF greenByte:16rEF blueByte:16rEF) |
3725 | 124 |
scroller.thumbEdgeStyle #edged |
125 |
scroller.NTallyMarks 4 |
|
126 |
scroller.tallyLevel 1 |
|
4323 | 127 |
scroller.tallyInset 6 |
3725 | 128 |
scroller.tallyDistance 2 |
129 |
scroller.snapBackDistance 100 |
|
130 |
scroller.minThumbSize 16 |
|
131 |
||
132 |
arrowButton.upFormFile 'ScrollUp.xp.xpm' |
|
133 |
arrowButton.enteredUpFormFile 'ScrollUp_entered.xp.xpm' |
|
134 |
arrowButton.activeUpFormFile 'ScrollUp_active.xp.xpm' |
|
135 |
arrowButton.disabledUpFormFile 'ScrollUp_disabled.xp.xpm' |
|
136 |
||
137 |
arrowButton.downFormFile 'ScrollDn.xp.xpm' |
|
138 |
arrowButton.enteredDownFormFile 'ScrollDn_entered.xp.xpm' |
|
139 |
arrowButton.activeDownFormFile 'ScrollDn_active.xp.xpm' |
|
140 |
arrowButton.disabledDownFormFile 'ScrollDn_disabled.xp.xpm' |
|
141 |
||
142 |
arrowButton.leftFormFile 'ScrollLt.xp.xpm' |
|
143 |
arrowButton.enteredLeftFormFile 'ScrollLt_entered.xp.xpm' |
|
144 |
arrowButton.activeLeftFormFile 'ScrollLt_active.xp.xpm' |
|
145 |
arrowButton.disabledLeftFormFile 'ScrollLt_disabled.xp.xpm' |
|
146 |
||
147 |
arrowButton.rightFormFile 'ScrollRt.xp.xpm' |
|
148 |
arrowButton.enteredRightFormFile 'ScrollRt_entered.xp.xpm' |
|
149 |
arrowButton.activeRightFormFile 'ScrollRt_active.xp.xpm' |
|
150 |
arrowButton.disabledRightFormFile 'ScrollRt_disabled.xp.xpm' |
|
151 |
||
152 |
arrowButton.passiveLevel 0 |
|
153 |
arrowButton.activeLevel 0 |
|
3728 | 154 |
arrowButton.backgroundColor =scroller.viewBackground |
155 |
arrowButton.activeBackgroundColor =scroller.viewBackground |
|
3725 | 156 |
|
4311 | 157 |
noteBook.backgroundColor =lightenedViewGrey |
158 |
noteBook.activeBackgroundColor =viewBackground |
|
3944 | 159 |
noteBook.foregroundColor Color black |
4311 | 160 |
noteBook.lightColor =darkenedViewGrey |
161 |
noteBook.shadowColor =darkenedViewGrey |
|
162 |
noteBook.passiveBackgroundColor =lightenedViewGrey |
|
4302 | 163 |
|
4303 | 164 |
checkToggle.bitmapFile 'CheckOn10_xp.xpm' |
4306 | 165 |
radioButton.passiveImageFile 'RadioOff_xp.xpm' |
166 |
radioButton.activeImageFile 'RadioOn_xp.xpm' |
|
4308 | 167 |
|
4310 | 168 |
noteBook.activeTabMarkerColor (Color red:100 green:78 blue:23) |
4330 | 169 |
|
4394 | 170 |
; does not work |
171 |
; editField.level 0 |
|
172 |
; comboView.level 0 |
|
173 |
; comboView.borderWidth 1 |
|
174 |
; comboView.borderColor (Color redByte:175 greenByte:190 blueByte:240) |
|
175 |
; editField.borderColor (Color redByte:175 greenByte:190 blueByte:240) |
|
176 |
||
4330 | 177 |
; label.foregroundColor (Color redByte:0 greenByte:70 blueByte:213) |
178 |
; button.foregroundColor (Color black) |
|
179 |
; radioButton.foregroundColor (Color black) |
|
180 |
; checkBox.labelForegroundColor (Color black) |
|
4331 | 181 |
|
182 |
; noteBook.foregroundColor (Color redByte:0 greenByte:70 blueByte:213) |
|
4330 | 183 |
framedBox.foregroundColor (Color redByte:0 greenByte:70 blueByte:213) |
4370 | 184 |
|
4373 | 185 |
infoBox.iconFile 'bitmaps/Information_XP.xpm' |
4370 | 186 |
warningBox.iconFile 'bitmaps/Warning_XP.xpm' |
4371 | 187 |
requestBox.iconFile 'bitmaps/Request_XP.xpm' |
4373 | 188 |
errorBox.iconFile 'bitmaps/Error_XP.xpm' |