author | Claus Gittinger <cg@exept.de> |
Mon, 10 Mar 2008 10:37:42 +0100 | |
changeset 4927 | 74d7fcbe1365 |
parent 4925 | e201d1eafced |
child 5038 | 26da8bdd54e2 |
permissions | -rw-r--r-- |
4296 | 1 |
; View defaultStyle:#mswindowsXP |
3720 | 2 |
; |
4927 | 3 |
; $Header: /cvs/stx/stx/libview/styles/mswindowsXP.style,v 1.34 2008-03-10 09:37:42 cg Exp $ |
3720 | 4 |
|
4296 | 5 |
name #winXP |
3720 | 6 |
|
4394 | 7 |
ToolbarIconLibrary ?XPToolbarIconLibrary |
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 |
|
3725 | 62 |
comment 'winXP lookalike (smarty design; experimental)' |
3720 | 63 |
|
64 |
#if (Language == #german) or:[Language == #de] |
|
65 |
comment 'an MS WindowsXP angelehnter Stil' |
|
66 |
#endif |
|
67 |
||
68 |
#if (Language == #french) or:[Language == #fr] |
|
69 |
comment 'Un style qui résemble MS WindowsXP' |
|
70 |
#endif |
|
71 |
||
72 |
menu.enteredLevel 0 |
|
3725 | 73 |
; menu.buttonEnteredLevel 2 "/ sigh - does not work |
74 |
||
3722 | 75 |
;; enable this, when old menuView cares for it also |
4311 | 76 |
;; menu.itemMargin 1 |
77 |
menu.selectionFollowsMouse true |
|
78 |
menu.enteredBackgroundColor =menu.hilightBackgroundColor |
|
79 |
menu.enteredForegroundColor =menu.hilightForegroundColor |
|
80 |
menu.iconIndicationOn.bitmapFile 'CheckOn_xp.xpm' |
|
81 |
menu.iconIndicationOff.bitmapFile 'CheckOff_xp.xpm' |
|
82 |
menu.iconRadioOn.bitmapFile 'RadioOn_xp.xpm' |
|
83 |
menu.iconRadioOff.bitmapFile 'RadioOff_xp.xpm' |
|
4307 | 84 |
menu.iconDisabledIndicationOn.bitmapFile 'CheckOn_disabled_xp.xpm' |
85 |
menu.iconDisabledIndicationOff.bitmapFile 'CheckOff_disabled_xp.xpm' |
|
86 |
menu.iconDisabledRadioOn.bitmapFile 'RadioOn_disabled_xp.xpm' |
|
87 |
menu.iconDisabledRadioOff.bitmapFile 'RadioOff_disabled_xp.xpm' |
|
3725 | 88 |
|
4311 | 89 |
;button.edgeStyle #soft |
90 |
;button.activeLevel -1 |
|
91 |
;button.passiveLevel 3 |
|
92 |
;button.enteredBackgroundColor [ (Screen current getSystemColor:#'COLOR_BTNFACE') lightened ] |
|
3725 | 93 |
|
4300 | 94 |
comboView.downFormFile 'ComboDn_xp.xpm'. |
95 |
comboView.disabledDownFormFile 'ComboDn_disabled_xp.xpm'. |
|
96 |
comboView.activeDownFormFile 'ComboDn_active_xp.xpm'. |
|
97 |
comboView.enteredDownFormFile 'ComboDn_entered_xp.xpm'. |
|
98 |
comboView.button.activeLevel 0 |
|
99 |
comboView.button.passiveLevel 0 |
|
100 |
comboView.button.activeBackgroundColor =viewGrey |
|
4301 | 101 |
; comboView.button.activeBackgroundColor (Color white) |
102 |
; comboView.button.backgroundColor (Color white) |
|
103 |
; comboView.level 0 |
|
3725 | 104 |
|
4925
e201d1eafced
disbled ugly hover-highlight for trees
Claus Gittinger <cg@exept.de>
parents:
4680
diff
changeset
|
105 |
; selection.highlightEnterItem true "/ underline-highlight item under cursor |
3749 | 106 |
|
4316 | 107 |
#if Screen current platformName = 'WIN32' |
4296 | 108 |
scroller.viewBackground (Color redByte:16rFB greenByte:16rFB blueByte:16rF9) |
4316 | 109 |
#else |
110 |
scroller.viewBackground (Color redByte:221 greenByte:221 blueByte:204) |
|
111 |
#endif |
|
3725 | 112 |
scroller.thumbColor (Color redByte:175 greenByte:190 blueByte:240) slightlyLightened |
4323 | 113 |
"/ scroller.thumbLightColor (Color redByte:16rCF greenByte:16rDD blueByte:16rFD) |
114 |
scroller.thumbLightColor (Color redByte:238 greenByte:244 blueByte:254) |
|
4296 | 115 |
scroller.thumbShadowColor (Color redByte:16r83 greenByte:16r9E blueByte:16rD8) |
3725 | 116 |
scroller.thumbEnteredColor (Color redByte:175 greenByte:190 blueByte:240) lightened |
117 |
scroller.thumbActiveColor (Color red:64 green:75 blue:98) |
|
118 |
scroller.thumbLevel 0 |
|
119 |
scroller.thumbInset 1 |
|
4318 | 120 |
; scroller.thumbFrameColor Color white "/ (Color redByte:175 greenByte:190 blueByte:240) darkened |
4323 | 121 |
scroller.thumbFrameColor (Color redByte:159 greenByte:181 blueByte:210) |
4324 | 122 |
scroller.thumbFrameColor2 (Color redByte:16rEF greenByte:16rEF blueByte:16rEF) |
3725 | 123 |
scroller.thumbEdgeStyle #edged |
124 |
scroller.NTallyMarks 4 |
|
125 |
scroller.tallyLevel 1 |
|
4323 | 126 |
scroller.tallyInset 6 |
3725 | 127 |
scroller.tallyDistance 2 |
128 |
scroller.snapBackDistance 100 |
|
129 |
scroller.minThumbSize 16 |
|
130 |
||
131 |
arrowButton.upFormFile 'ScrollUp.xp.xpm' |
|
132 |
arrowButton.enteredUpFormFile 'ScrollUp_entered.xp.xpm' |
|
133 |
arrowButton.activeUpFormFile 'ScrollUp_active.xp.xpm' |
|
134 |
arrowButton.disabledUpFormFile 'ScrollUp_disabled.xp.xpm' |
|
135 |
||
136 |
arrowButton.downFormFile 'ScrollDn.xp.xpm' |
|
137 |
arrowButton.enteredDownFormFile 'ScrollDn_entered.xp.xpm' |
|
138 |
arrowButton.activeDownFormFile 'ScrollDn_active.xp.xpm' |
|
139 |
arrowButton.disabledDownFormFile 'ScrollDn_disabled.xp.xpm' |
|
140 |
||
141 |
arrowButton.leftFormFile 'ScrollLt.xp.xpm' |
|
142 |
arrowButton.enteredLeftFormFile 'ScrollLt_entered.xp.xpm' |
|
143 |
arrowButton.activeLeftFormFile 'ScrollLt_active.xp.xpm' |
|
144 |
arrowButton.disabledLeftFormFile 'ScrollLt_disabled.xp.xpm' |
|
145 |
||
146 |
arrowButton.rightFormFile 'ScrollRt.xp.xpm' |
|
147 |
arrowButton.enteredRightFormFile 'ScrollRt_entered.xp.xpm' |
|
148 |
arrowButton.activeRightFormFile 'ScrollRt_active.xp.xpm' |
|
149 |
arrowButton.disabledRightFormFile 'ScrollRt_disabled.xp.xpm' |
|
150 |
||
151 |
arrowButton.passiveLevel 0 |
|
152 |
arrowButton.activeLevel 0 |
|
3728 | 153 |
arrowButton.backgroundColor =scroller.viewBackground |
154 |
arrowButton.activeBackgroundColor =scroller.viewBackground |
|
3725 | 155 |
|
4311 | 156 |
noteBook.backgroundColor =lightenedViewGrey |
157 |
noteBook.activeBackgroundColor =viewBackground |
|
3944 | 158 |
noteBook.foregroundColor Color black |
4311 | 159 |
noteBook.lightColor =darkenedViewGrey |
160 |
noteBook.shadowColor =darkenedViewGrey |
|
161 |
noteBook.passiveBackgroundColor =lightenedViewGrey |
|
4302 | 162 |
|
4303 | 163 |
checkToggle.bitmapFile 'CheckOn10_xp.xpm' |
4306 | 164 |
radioButton.passiveImageFile 'RadioOff_xp.xpm' |
165 |
radioButton.activeImageFile 'RadioOn_xp.xpm' |
|
4308 | 166 |
|
4310 | 167 |
noteBook.activeTabMarkerColor (Color red:100 green:78 blue:23) |
4330 | 168 |
|
4394 | 169 |
; does not work |
170 |
; editField.level 0 |
|
171 |
; comboView.level 0 |
|
172 |
; comboView.borderWidth 1 |
|
173 |
; comboView.borderColor (Color redByte:175 greenByte:190 blueByte:240) |
|
174 |
; editField.borderColor (Color redByte:175 greenByte:190 blueByte:240) |
|
175 |
||
4330 | 176 |
; label.foregroundColor (Color redByte:0 greenByte:70 blueByte:213) |
177 |
; button.foregroundColor (Color black) |
|
178 |
; radioButton.foregroundColor (Color black) |
|
179 |
; checkBox.labelForegroundColor (Color black) |
|
4331 | 180 |
|
181 |
; noteBook.foregroundColor (Color redByte:0 greenByte:70 blueByte:213) |
|
4330 | 182 |
framedBox.foregroundColor (Color redByte:0 greenByte:70 blueByte:213) |
4370 | 183 |
|
4373 | 184 |
infoBox.iconFile 'bitmaps/Information_XP.xpm' |
4370 | 185 |
warningBox.iconFile 'bitmaps/Warning_XP.xpm' |
4371 | 186 |
requestBox.iconFile 'bitmaps/Request_XP.xpm' |
4373 | 187 |
errorBox.iconFile 'bitmaps/Error_XP.xpm' |