styles/motif.common
author Claus Gittinger <cg@exept.de>
Wed, 07 Oct 2015 01:47:15 +0200
changeset 6998 7b934144a496
parent 6995 3bbd6e440efc
child 7738 ccae8e4abae1
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
;
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 199
diff changeset
     2
; common motif stuff (not a style, but included by all motif style variations)
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
;
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
;
6995
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
     5
; $Header$
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
;
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
; this is to be included from the real style,
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
; with (at least) viewGrey, shadowColor, lightColor and mediumColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
; being predefined
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
;
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
is3D                            true
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
name                            #motif
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
3703
b186440a7cf7 *** empty log message ***
penk
parents: 3550
diff changeset
    16
fatFont                         ? Font family:'helvetica' face:'bold' style:'roman' size:12
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
2155
27862eea4474 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1951
diff changeset
    18
selectionFont                   ? =fatFont
27862eea4474 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1951
diff changeset
    19
labelFont                       ? =fatFont
27862eea4474 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1951
diff changeset
    20
menuFont                        ? =fatFont
6621
a1b4cfc5fd1d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3755
diff changeset
    21
textFont                        ? Font family:'courier' size:12
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
viewBackground                  =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
borderWidth                     0
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
focusColor                      Color black
2562
9628fa11ba4a dec motif style3 added
Claus Gittinger <cg@exept.de>
parents: 2539
diff changeset
    28
focus.explicitWithButtonPress   true
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
; focusColor                      Color yellow
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
6621
a1b4cfc5fd1d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3755
diff changeset
    31
scrollBar.position               #right
a1b4cfc5fd1d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3755
diff changeset
    32
scrollBar.buttonPositions        #around
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    33
scrollBar.level                  -2
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    34
scrollBar.elementSpacing         0
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    35
scrollBar.disableButtons         true
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    36
; scrollBar.hiding                 true
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2982
diff changeset
    38
#if Screen current isNil or:[Screen current hasGreyscales]
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    39
scroller.thumbColor               =viewGrey
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    40
scroller.viewBackground           =mediumColor
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
#else
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
; grey 50 is too heavy - isn't it ?
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    43
; scroller.viewBackground          Color grey:50
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    44
scroller.viewBackground           Color white
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    45
scroller.thumbColor               Color white
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
#endif
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    47
scroller.thumbLevel               2
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    48
scroller.thumbInset               0
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    49
scrolled.viewLevel               -2
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    51
scroller.ghostFrameColor         Color black
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    52
scroller.middleButtonJump        true
451
df6eb30df68c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    53
2468
1a93026b436f slightly increased miniScroller sizes
Claus Gittinger <cg@exept.de>
parents: 2155
diff changeset
    54
miniScroller.size                2.5       "/ millimeters
1a93026b436f slightly increased miniScroller sizes
Claus Gittinger <cg@exept.de>
parents: 2155
diff changeset
    55
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    56
slider.level                      -1
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    58
variablePanel.trackingStyle       #solidLine
3283
0cc863d1405d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3176
diff changeset
    59
variablePanel.handlePosition      #left
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
1924
5d09bd2ff0c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1879
diff changeset
    61
framedBox.labelPosition           #topLeft
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    63
label.foregroundColor             Color black
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
6621
a1b4cfc5fd1d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3755
diff changeset
    65
button.activeLevel                -2
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    66
button.passiveLevel               2
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    67
button.returnButtonHasBorder      true
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    69
button.activeBackgroundColor      =mediumColor
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    70
button.activeForegroundColor      Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    71
button.disabledForegroundColor    =shadowColor
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2982
diff changeset
    73
#if Screen current notNil and:[Screen current hasGreyscales not]
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    74
button.activeBackgroundColor      Color grey:80
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
#endif
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    77
arrowButton.style                 #motif
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    78
arrowButton.activeLevel           0
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    79
arrowButton.passiveLevel          0
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    81
arrowButton.foregroundColor         =viewGrey
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    82
arrowButton.backgroundColor         =mediumColor
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    83
arrowButton.activeForegroundColor   =viewGrey
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    84
arrowButton.activeBackgroundColor   =viewGrey
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    85
arrowButton.disabledForegroundColor =viewGrey
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
6995
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    87
radioButton.style                   #motif
1951
5290a36652db *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1948
diff changeset
    88
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
    89
editField.backgroundColor           =mediumColor
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
6995
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    91
menu.hilightLevel                   2
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    92
menu.separatingLineInset            0
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    93
menuBackgroundColor                 =viewGrey
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    94
menu.viewBackgroundColor            =viewGrey
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    95
menu.disabledForegroundColor        =shadowColor
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    96
menu.extraMargin                    2
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    97
menu.suppressSeparatingLinesInToolbar        true
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    98
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
    99
menu.buttonPassiveLevel        1
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
   100
menu.buttonActiveLevel         -1
3bbd6e440efc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6621
diff changeset
   101
menu.buttonEnteredLevel        1
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   102
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   103
pullDownMenu.keepMenu                 true
3176
f14d2900bb5e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2991
diff changeset
   104
pullDownMenu.menuLevel                2
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   105
pullDownMenu.level                    1
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   106
pullDownMenu.hilightLevel             2
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2982
diff changeset
   107
#if Screen current notNil and:[Screen current hasGreyscales not]
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   108
pullDownMenu.hilightForegroundColor   Color white
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   109
pullDownMenu.hilightBackgroundColor   Color black
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   110
#endif
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   111
pullDownMenu.autoselectFirst         true
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
2581
fd2db32b26b8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2562
diff changeset
   113
popup.level                          2
6621
a1b4cfc5fd1d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3755
diff changeset
   114
popup.borderWidth                    1
a1b4cfc5fd1d *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3755
diff changeset
   115
popup.hideOnRelease                  false
2581
fd2db32b26b8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2562
diff changeset
   116
; popup.shadow                       false      "/ false is the default, anyway
fd2db32b26b8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2562
diff changeset
   117
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   118
#selection.multiSelectionModifier      #Control
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   119
#selection.rightArrowLevel             -1
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   120
selection.rightArrowLevel             2
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   121
selection.lineSpacing                 4
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   122
selection.foregroundColor             Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   123
selection.hilightBackgroundColor      Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   124
selection.hilightStyle                #motif
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   125
selection.disabledForegroundColor     =shadowColor
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   126
3716
d7739a80eac8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3714
diff changeset
   127
text.alternativeSelectionForegroundColor    Color black
d7739a80eac8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3714
diff changeset
   128
text.alternativeSelectionBackgroundColor    (Color redByte:150 "255" greenByte:255 blueByte:100 "204")
d7739a80eac8 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3714
diff changeset
   129
1360
574d47019176 better noFocus cursors
Claus Gittinger <cg@exept.de>
parents: 1107
diff changeset
   130
#textCursorType                       #caret
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   131
textCursor.type                       #ibeam
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   132
textCursor.noFocusForegroundColor     Color grey
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   133
3755
c858c8ac184a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3716
diff changeset
   134
activeHelp.backgroundColor            Color yellow lightened lightened lightened
c858c8ac184a *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3716
diff changeset
   135
activeHelp.borderWidth                1
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   136
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   137
ruler.foregroundColor            Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   138
ruler.backgroundColor            =viewGrey
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   139
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2982
diff changeset
   140
#if Screen current notNil and:[Screen current hasGrayscales not]
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   141
html.anchorUnderline                true
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   142
html.anchorForegroundColor          Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   143
html.backgroundColor                Color white
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   144
html.activeAnchorForegroundColor    Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   145
html.activeAnchorBackgroundColor    =htmlBackgroundColor
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   146
html.visitedAnchorForegroundColor   Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   147
html.exampleAnchorForegroundColor   Color black
1620
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   148
#endif
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
3703
b186440a7cf7 *** empty log message ***
penk
parents: 3550
diff changeset
   150
dataSet.labelView.level             -1
b186440a7cf7 *** empty log message ***
penk
parents: 3550
diff changeset
   151
dataSet.labelView.verticalSpace     2
b186440a7cf7 *** empty log message ***
penk
parents: 3550
diff changeset
   152
2486
a310c1c75516 ok is on the left with motif style.
Claus Gittinger <cg@exept.de>
parents: 2468
diff changeset
   153
;
a310c1c75516 ok is on the left with motif style.
Claus Gittinger <cg@exept.de>
parents: 2468
diff changeset
   154
; this reverses the ok-cancel order in dialogs;
a310c1c75516 ok is on the left with motif style.
Claus Gittinger <cg@exept.de>
parents: 2468
diff changeset
   155
; some may be used to ok being on the left ...
2591
05699d29d642 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2581
diff changeset
   156
;
2982
b52d24260115 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2981
diff changeset
   157
dialogBox.okAtLeft                 true
2486
a310c1c75516 ok is on the left with motif style.
Claus Gittinger <cg@exept.de>
parents: 2468
diff changeset
   158
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   159
infoBox.separator                  true
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   160
infoBox.iconFile                   'bitmaps/Information_motif.xbm'
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   161
warningBox.iconFile                'bitmaps/Warning_motif.xbm'
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   162
requestBox.iconFile                'bitmaps/Request_motif.xbm'
3550
675028a65fb6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3283
diff changeset
   163
errorBox.iconFile                  'bitmaps/Error_motif.xbm'
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   164
6998
7b934144a496 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6995
diff changeset
   165
launcher.editorLevel        1
7b934144a496 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6995
diff changeset
   166
infobar.level               1
7b934144a496 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 6995
diff changeset
   167
application.toolbarLevel    1
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   168
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2982
diff changeset
   169
#if Screen current isNil or:[Screen current hasGrayscales]
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   170
arrowButton.upForm                 Image extent:11@12 \
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   171
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   172
					bits:#[4r0000 4r0100 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   173
					       4r0000 4r1120 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   174
					       4r0000 4r1120 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   175
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   176
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   177
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   178
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   179
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   180
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   181
					       4r1122 4r2222 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   182
					       4r1222 4r2222 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   183
					       4r0000 4r0000 4r0000] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   184
					pad:8
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   185
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   186
arrowButton.downForm               Image extent:11@12 \
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   187
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   188
					bits:#[ \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   189
					       4r0000 4r0000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   190
					       4r1111 4r1111 4r1110 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   191
					       4r1111 4r1111 4r1220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   192
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   193
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   194
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   195
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   196
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   197
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   198
					       4r0000 4r1220 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   199
					       4r0000 4r1220 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   200
					       4r0000 4r0200 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   201
					      ] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   202
					pad:8
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   203
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   204
arrowButton.leftForm               Image extent:12@11 \
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   205
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   206
					bits:#[ \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   207
					       4r0000 4r0000 4r0110 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   208
					       4r0000 4r0001 4r1120 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   209
					       4r0000 4r0111 4r1220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   210
					       4r0001 4r1113 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   211
					       4r0111 4r1333 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   212
					       4r1113 4r3333 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   213
					       4r0222 4r2333 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   214
					       4r0002 4r2223 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   215
					       4r0000 4r0222 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   216
					       4r0000 4r0002 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   217
					       4r0000 4r0000 4r0220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   218
					      ] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   219
					pad:8
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   220
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   221
arrowButton.rightForm              Image extent:12@11 \
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   222
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   223
					bits:#[ \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   224
					       4r0110 4r0000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   225
					       4r0111 4r1000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   226
					       4r0111 4r1110 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   227
					       4r0113 4r3111 4r1000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   228
					       4r0113 4r3331 4r1110 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   229
					       4r0113 4r3333 4r3222 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   230
					       4r0113 4r3332 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   231
					       4r0113 4r3222 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   232
					       4r0112 4r2220 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   233
					       4r0122 4r2000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   234
					       4r0120 4r0000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   235
					      ] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   236
					pad:8
1624
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   237
#else
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   238
arrowButton.upForm                 Image extent:11@12 \
1624
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   239
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   240
					bits:#[2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   241
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   242
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   243
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   244
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   245
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   246
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   247
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   248
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   249
					       2r01111111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   250
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   251
					       2r00000000 2r00000000] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   252
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   253
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   254
arrowButton.downForm               Image extent:11@12 \
1624
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   255
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   256
					bits:#[2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   257
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   258
					       2r01111111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   259
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   260
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   261
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   262
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   263
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   264
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   265
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   266
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   267
					       2r00000000 2r00000000] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   268
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   269
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   270
arrowButton.leftForm               Image extent:12@11 \
1624
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   271
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   272
					bits:#[ \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   273
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   274
					       2r00000000 2r01000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   275
					       2r00000001 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   276
					       2r00000111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   277
					       2r00011111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   278
					       2r01111111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   279
					       2r00011111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   280
					       2r00000111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   281
					       2r00000001 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   282
					       2r00000000 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   283
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   284
					      ] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   285
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   286
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1924
diff changeset
   287
arrowButton.rightForm              Image extent:12@11 \
1624
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   288
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   289
					bits:#[ \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   290
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   291
					       2r00100000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   292
					       2r00111000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   293
					       2r00111110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   294
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   295
					       2r00111111 2r11100000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   296
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   297
					       2r00111110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   298
					       2r00111000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   299
					       2r00100000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   300
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   301
					      ] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   302
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   303
#endif