styles/mswindowsXP.style
author Claus Gittinger <cg@exept.de>
Thu, 05 Sep 2002 19:20:08 +0200
changeset 3722 61a5935d6c3e
parent 3720 746e0a7b1475
child 3725 ecbc42849fea
permissions -rw-r--r--
''
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3720
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
; View defaultStyle:#mswindowsXP 
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
;
3722
Claus Gittinger <cg@exept.de>
parents: 3720
diff changeset
     3
; $Header: /cvs/stx/stx/libview/styles/mswindowsXP.style,v 1.2 2002-09-05 17:20:08 cg Exp $
3720
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
name                            #winXP 
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
;
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
; for now, much like win95, except for some menuPanel details
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
; (animated menu-popup is not yet implemented; but, who likes it ?)
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
;
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
.
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
#include 'mswindows95.style'
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
comment  'winXP lookalike'
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
#if (Language == #german) or:[Language == #de]
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
comment  'an MS WindowsXP angelehnter Stil'
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
#endif
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
#if (Language == #french) or:[Language == #fr]
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
comment  'Un style qui résemble MS WindowsXP'
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
#endif
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
menu.enteredLevel               0
3722
Claus Gittinger <cg@exept.de>
parents: 3720
diff changeset
    25
;; enable this, when old menuView cares for it also
Claus Gittinger <cg@exept.de>
parents: 3720
diff changeset
    26
;; menu.itemMargin                 1
3720
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
menu.selectionFollowsMouse      true 
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
menu.enteredBackgroundColor     =menu.hilightBackgroundColor
746e0a7b1475 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
menu.enteredForegroundColor     =menu.hilightForegroundColor