ColorEditDialog.st
author Claus Gittinger <cg@exept.de>
Sun, 21 Dec 2014 17:02:44 +0100
changeset 3175 c205d80403ef
parent 2941 15df48eba1c4
child 3179 174a9f51db76
permissions -rw-r--r--
class: ColorEditDialog added: #hueGradientImage changed: #postBuildWith: #windowSpec
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 COPYRIGHT (c) 1995 by eXept Software AG
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
              All Rights Reserved
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 This software is furnished under a license and may be used
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 only in accordance with the terms of that license and with the
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
 be provided or otherwise made available to, or used by, any
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
 other person.  No title to or ownership of the software is
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 hereby transferred.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"{ Package: 'stx:libtool2' }"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
SimpleDialog subclass:#ColorEditDialog
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
    15
	instanceVariableNames:'red green blue hue light saturation colorNameHolder
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
    16
		htmlColorNameHolder colorDefinitionStringHolder previewBox
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
    17
		brightnessStringHolder'
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	classVariableNames:''
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	poolDictionaries:''
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	category:'Interface-UIPainter'
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
!ColorEditDialog class methodsFor:'documentation'!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
copyright
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
 COPYRIGHT (c) 1995 by eXept Software AG
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
              All Rights Reserved
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
 This software is furnished under a license and may be used
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
 only in accordance with the terms of that license and with the
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
 inclusion of the above copyright notice.   This software may not
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
 be provided or otherwise made available to, or used by, any
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
 other person.  No title to or ownership of the software is
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
 hereby transferred.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
documentation
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
    An edit-dialog for colors.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
examples
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
                                                                                [exBegin]                                      
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
    |editor color|
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
1846
65558eb9f4d3 comments
Claus Gittinger <cg@exept.de>
parents: 1840
diff changeset
    50
    editor := ColorEditDialog new.
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
    editor color:(Color green).
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
    editor open.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
    editor accepted ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
        editor color inspect.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
    ]
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
                                                                                [exEnd]
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
! !
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    60
!ColorEditDialog class methodsFor:'help specs'!
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    61
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    62
flyByHelpSpec
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    63
    "This resource specification was automatically generated
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    64
     by the UIHelpTool of ST/X."
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    65
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    66
    "Do not manually edit this!! If it is corrupted,
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    67
     the UIHelpTool may not be able to read the specification."
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    68
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    69
    "
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    70
     UIHelpTool openOnClass:ColorEditDialog    
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    71
    "
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    72
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    73
    <resource: #help>
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    74
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    75
    ^ super flyByHelpSpec addPairsFrom:#(
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    76
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    77
#pickColor
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    78
'Pick a Color from the Screen'
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    79
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    80
)
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    81
!
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    82
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    83
helpSpec
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    84
    "This resource specification was automatically generated
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    85
     by the UIHelpTool of ST/X."
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    86
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    87
    "Do not manually edit this!! If it is corrupted,
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    88
     the UIHelpTool may not be able to read the specification."
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    89
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    90
    "
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    91
     UIHelpTool openOnClass:ColorEditDialog    
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    92
    "
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    93
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    94
    <resource: #help>
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    95
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    96
    ^ super helpSpec addPairsFrom:#(
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
    97
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
    98
#brightness
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
    99
'The Color''s brightness value (0..1)'
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   100
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   101
#colorDefinitionString
2904
bd6cacbab203 changed: #flyByHelpSpec
Claus Gittinger <cg@exept.de>
parents: 2831
diff changeset
   102
'A Smalltalk expression to construct the color'
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   103
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   104
#colorName
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   105
'The standard colorname (as used in the X-Window System), if known'
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   106
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   107
#copyToClipboard
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   108
'Copy the color to the clipboard'
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   109
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   110
#hlsMixer
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   111
'Mix color from hls (hue-light-saturation) components'
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   112
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   113
#htmlColorName
2904
bd6cacbab203 changed: #flyByHelpSpec
Claus Gittinger <cg@exept.de>
parents: 2831
diff changeset
   114
'The color as used in an HTML page'
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   115
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   116
#pasteFromClipboard
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   117
'Paste color from the Clipboard'
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   118
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   119
#rgbMixer
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   120
'Mix color from rgb (red-green-blue) components'
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   121
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   122
)
2904
bd6cacbab203 changed: #flyByHelpSpec
Claus Gittinger <cg@exept.de>
parents: 2831
diff changeset
   123
bd6cacbab203 changed: #flyByHelpSpec
Claus Gittinger <cg@exept.de>
parents: 2831
diff changeset
   124
    "Modified: / 09-08-2012 / 09:35:29 / cg"
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   125
! !
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   126
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   127
!ColorEditDialog class methodsFor:'image specs'!
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   128
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   129
hueGradientImage
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   130
    "This resource specification was automatically generated
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   131
     by the ImageEditor of ST/X."
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   132
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   133
    "Do not manually edit this!! If it is corrupted,
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   134
     the ImageEditor may not be able to read the specification."
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   135
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   136
    "
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   137
     self hueGradientImage inspect
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   138
     ImageEditor openOnClass:self andSelector:#hueGradientImage
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   139
     Icon flushCachedIcons
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   140
    "
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   141
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   142
    <resource: #image>
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   143
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   144
    ^Icon
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   145
        constantNamed:'ColorEditDialog hueGradientImage'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   146
        ifAbsentPut:[(Depth8Image new) width:400; height:50; bits:(ByteArray fromPackedString:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   147
J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   148
''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   149
^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   150
+;F/+1 XFA"R$+"8.K!!&''"N^''''@I\@%WVU$TEAPA(:N#"(*J"(X_G1-,[F0UEQUOS6]OR;]K\WM1\R8.K"9>_''9>_''9>''Y46''Y6]M#Z************4-KR4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   151
-KR4-B,+J2,+J2,+J0-LS@-LSD1APTEAPTEAPTFK"8.K"8.K"5YVU")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   152
Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.GV8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   153
LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   154
#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   155
Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LE$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   156
''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   157
_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   158
+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,[F1[V5-[Z&)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   159
Y&Y&Y&X#H2L#BP$IBU%YVPDA@PE;^7,8NC 8G1<_F1,[F1\WE6]''Y6^7-;]3\7M3[6=/[0HB@ HB@ H6M#Z]''Y46M************+R4-KR4-KR4J2,+J2,+
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   160
J2,+B41LB41LSAYAPTEAPTDVPX.K"8.K"8.KU%X*J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (D9N$I@)ZV%+Z9^WGA8^RT$"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   161
H(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   162
^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LC
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   163
Z&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   164
K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@,KB0,VPQXVPQXVE!!ZKHB@ HB@ HB(*J")VU(HFA  HMCR_]7^9.;-ST4A@
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   165
%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAPTEAY2\''I26-+XRD!!I?_7=?F!!(Z!!8^G
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   166
!!8\7M0=PTE@@@@@@VE!!XVI.[&9-5]WVO#8>O#3@0LC@0LC@0^''):^''):^''*E!!XVE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   167
QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+:<XFA X$)J8.K"8Y)8#'')90
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   168
BW@IU5%YEAPT@ZN#(8*J"(*FG1<[[F1,EQTUS4=''S4.7R7E3\WD.K"8._''9>_''9>_)6]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   169
E$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7Z"("\''/K0?O2%)ZTQ+Q4\J-[T$IAD"$YD;N36(P(RD
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   170
!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   171
!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   172
W%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&).FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   173
''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB0,KB1YAE!!YAE!!XVE(, HB@ HB@ J"(*J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   174
N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   175
@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   176
.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   177
(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   178
"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]*J"I2^</C<?JV%)QF-GQ0*5-RP$DRJQ$S,;OZ!!B!!HRD,%1\, 9 XF@P
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   179
TZ^T%IR''KR4EKTYFQ$Y4]GP%IRU?ZF!!(*1*+!!5-[V5.I"P<OC5A<_@A<KB0,KI&Y&Y.H"H"OST6OSS@YFQ$0FQ$YNS$9NS%:^'')CP4MCP8VE#(8<OC2N#"</
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   180
K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HAT
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   181
UJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6****
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   182
********-KR4-KR4-KP+J2,+J2,+J2,KSD0KB0,KE$DVE$DVE!!XV"2@ HB@ HB@*J"(*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   183
MZB S$:P$B%)ZV-+%9\\G!!9IRRH"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   184
]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   185
 XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&).FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   186
F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB0,KB1YAE!!YAE!!XVE(, HB@ HB@ J"(*
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   187
J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WE22C&A XAAQ)9RT%J\-KPT-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   188
Q$YFQ''Q4]BT%IW=(ZF"+F*.GV5-[V8&IC0<OTG1<@G0,KB0,&Y&Y&8"H"H=MSX=MLA$YFS@YFQ$9NS$9NW):^$MCP4MC!!XVN##0<OH:NK2</K2</K2=9^W%9
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   189
^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   190
+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   191
-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   192
Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.GV8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   193
LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   194
#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   195
Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KB0,KE$DVE$DVE!!XV"2@ HB@ HB@*J"(*U%ZBA XHBCP4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   196
''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB S$:P$B%)ZV-+%9\\G!!9IRRH"#X4;N36(P(RD!!KI\WKHNXFA DEF''%IRT)24-AR5FQ$YF]GQ4IRT%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   197
_6!!(ZJ,Z*8][V5-["X$OC0=P_G0@_B0,KB2Y&Y&["H"H#45M#440FQ$YLA$YFS$9NS$9^''):P4MCP4NE!!X:NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   198
+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   199
.FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   200
J2,+B41LB41LSDEAPTEAPTEAPX.K"8.K"8.KU%YVJ%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (D9N$I@)ZV%+Z9^WGA8^RT$"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   201
H(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   202
^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LC
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   203
Z&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F1,V5-[V6)*VY&Y&Y&H2L#H0$IBP%YVU$A@PDA^7-;NC 8NA<_G1,[F1,WE1]''Y6]''-;^7\7M3\6=/
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   204
[6<B@ HB@ HBM#X6''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@-LSD1APTEAPTEAPTFK"8.K"8.K"5YVU")VU(HFA  HMCR_]7^9.;-ST4A@
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   205
%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JANS)BPJV%)Z6.W%10^G$%IH"JM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.G
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   206
V8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   207
QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   208
BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   209
E$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   210
!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   211
!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   212
W%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&).FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   213
''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB0,KB1YAE!!YAE!!XVE(, HB@ HB@ J"(*J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   214
N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   215
@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   216
.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   217
(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@,KB0,VPQXVPQXVE!!ZK
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   218
HB@ HB@ HB(*J")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]*J"I2^</C<?JV%)QF-GQ0*5-RP$DRJQ$S,;OZ!!B!!HRD,%22, 8NC 9Q
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   219
TYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.GV8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   220
K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HAT
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   221
UJZ&)FM#XVF3,:>1,[E-[V5-*Z%&Y&Y&Y"L#H2LIBP$IVU%Y@PDA@W-;^3 8NC _G1<[F1,[E1\WY6]''Y;^7-7M3\7M/[6=/@ HB@ HB@#X6M)6]''SX6****
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   222
********-KR4-KR4-KP+J2,+J2,+J2,KSD0KB0,KE$DVE$DVE!!XV"2@ HB@ HB@*J"(*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   223
MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@TEAPV\''I2\-+Z6D!!HR_7=?_1(ZF(^G!!8^GM3\OTEAP@@@@@E!!XVE"[&9.[
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   224
]WU5#8>O#8<0LC@0LC@0LG):^''):^''):!!XVE!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   225
 XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,[F1[V5-[Z&)Y&Y&Y&X#H2L#BP$IBU%YVPDA@PE;^7,8NC 8G1<_
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   226
F1,[F1\WE6]''Y6^7-;]3\7M3[6=/[0HB@ HB@ H6M#Z]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB41LSAYAPTEAPTDVPX.K"8.K"8.KU%X*
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   227
J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WE22C&A XAAQ)9RT%J\-APT-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   228
Q$YFQ''Q4-"T%IW=?_6"+F*.G!!5.GV8$7C5APT@@@@G0,VB0,&Y&[&8"H"H=MSX=MLA$YFS@YFQ$9^#$9NW):^$NE!!TMC!!XVN##0<OH:NK2</K2</K2=9^W%9
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   229
^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   230
+;F1,V5-[V6)*VY&Y&Y&H2L#H0$IBP%YVU$A@PDA^7-;NC 8NA<_G1,[F1,WE1]''Y6]''-;^7\7M3\6=/[6<B@ HB@ HBM#X6''Y6]M#Z************4-KR4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   231
-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   232
Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAPTEAY2\''I26-+XRD!!I?_7=?F!!(Z!!8^G!!8\7M0=PTE@@@@@@VE!!XVI.[&9-5]WVO#8>O#3@0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   233
LC@0LC@0^''):^''):^''*E!!XVE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   234
#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1,[E-[V5-*Z%&Y&Y&Y"L#H2LIBP$IVU%Y@PDA@W-;^3 8NC _G1<[F1,[E1\WY6]''
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   235
Y;^7-7M3\7M/[6=/@ HB@ HB@#X6M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LE$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   236
''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB S$:P$B%)ZV-+%9\\G!!9IRRH"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@TEAPV\''I2\-+Z6D!!HR
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   237
_7=?_1(ZF(^G!!8^GM3\OTEAP@@@@@E!!XVE"[&9.[]WU5#8>O#8<0LC@0LC@0LG):^''):^''):!!XVE!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   238
+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   239
.FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   240
J2,+B41LB41LSAYAPTEAPTDVPX.K"8.K"8.KU%X*J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$Q
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   241
H(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   242
^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LC
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   243
Z&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F1,V5-[V6)*VY&Y&Y&H2L#H0$IBP%YVU$A@PDA^7-;NC 8NA<_G1,[F1,WE1]''Y6]''-;^7\7M3\6=/
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   244
[6<B@ HB@ HBM#X6''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@,KB0,VPQXVPQXVE!!ZKHB@ HB@ HB(*J")VU(HFA  HMCR_]7^9.;-ST4A@
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   245
%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JANS)BPJV%)Z6.W%10^G$%IH"JM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.G
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   246
V8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   247
QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+:<XFA X$)J8.K"8Y)8#'')90
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   248
BW@IU5%YEAPT@ZN#(8*J"(*FG1<[[F1,EQTUS4=''S4.7R7E3\WD.K"8._''9>_''9>_)6]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KB0,K
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   249
E$DVE$DVE!!XV"2@ HB@ HB@*J"(*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   250
!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   251
!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   252
W%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&).FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   253
''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB0,KB1YAE!!YAE!!XVE(, HB@ HB@ J"(*J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   254
N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEAPTE''I2\''KZ6-!!HRD''=?_7<ZF!!*G!!8^G!!3\7C5APT@@@
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   255
@@AXVE!!X&9.[&7U5]X>O#8>OLC@0LC@0LCA:^''):^''):^(VE!!XVE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   256
.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F1,V5-[V6)*VY&Y&Y&H2L#H0$IBP%YVU$A@PDA
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   257
^7-;NC 8NA<_G1,[F1,WE1]''Y6]''-;^7\7M3\6=/[6<B@ HB@ HBM#X6''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   258
"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JANS)BPJV%)Z6.W%10^G$%IH"JM#S,;OZ!!B!!HRD,%22, 8NC 9Q
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   259
TYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.GV8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   260
K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HAT
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   261
UJZ&)FM#XVF3,:>1+:<XFA X$)J8.K"8Y)8#'')90BW@IU5%YEAPT@ZN#(8*J"(*FG1<[[F1,EQTUS4=''S4.7R7E3\WD.K"8._''9>_''9>_)6]M)6]''SX6****
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   262
********-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LE$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   263
MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   264
]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   265
 XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>/FA XFIJR.K"8.FZ^H9:^\@%0BU]YVQPTE@F#(:NJ"(*J!!!!<_
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   266
F61,[ATUET=OY4=K-4-1\7E1K"8.K''9>_''9>_'':]''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB41LSAYAPTEAPTDVPX.K"8.K"8.KU%X*
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   267
J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WE22C&A XAAQ)9RT%J\-KPT-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   268
Q$YFQ''Q4]BT%IW=(ZF"+F*.GV5-[V8&IC0<OTG1<@G0,KB0,&Y&Y&8"H"H=MSX=MLA$YFS@YFQ$9NS$9NW):^$MCP4MC!!XVN##0<OH:NK2</K2</K2=9^W%9
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   269
^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   270
+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   271
-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JANS)BPJV%)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   272
Z6.W%10^G$%IH"JM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.GV8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   273
LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   274
#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   275
Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LE$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   276
''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB S$:P$B%)ZV-+%9\\G!!9IRRH"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   277
_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   278
+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   279
.FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   280
J2,+B41LB41LSDEAPTEAPTEAPX.K"8.K"8.KU%YVJ%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (D9N$I@)ZV%+Z9^WGA8^RT$"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   281
H(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEAPTE''I2\''KZ6-!!HRD''=?_7<ZF!!*G!!8^G!!3\7C5APT@@@@@AXVE!!X&9.[&7U5]X>O#8>OLC@0LC@0LCA:^''):
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   282
^''):^(VE!!XVE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LC
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   283
Z&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   284
K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   285
%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.G
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   286
V8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   287
QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   288
BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   289
E$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB S$:P$B%)ZV-+%9\\G!!9IRRH"#X4;N36(P(RD
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   290
!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   291
!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   292
W%82L%)Z+HB@UER&)*Q#X6E!!,;N/,[F1[V5-[Z&)Y&Y&Y&X#H2L#BP$IBU%YVPDA@PE;^7,8NC 8G1<_F1,[F1\WE6]''Y6^7-;]3\7M3[6=/[0HB@ HB@ H6
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   293
M#Z]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB41LSDEAPTEAPTEAPX.K"8.K"8.KU%YVJ%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   294
N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   295
@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   296
.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/+1 XFA"R$+"8.K!!&''"N^''''@I\@%WVU$TEAPA
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   297
(:N#"(*J"(X_G1-,[F0UEQUOS6]OR;]K\WM1\R8.K"9>_''9>_''9>''Y46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   298
"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JANS)BPJV%)Z6.W%10^G$%IH"JM#S,;OZ!!B!!HRD,%22, 8NC 9Q
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   299
TYRT%IRTAPTEAY2\''I26-+XRD!!I?_7=?F!!(Z!!8^G!!8\7M0=PTE@@@@@@VE!!XVI.[&9-5]WVO#8>O#3@0LC@0LC@0^''):^''):^''*E!!XVE!!XVEOH8<OC2N#"</
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   300
K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HAT
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   301
UJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6****
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   302
********-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LPTEAPTEAPTEA"8.K"8.K"8-VU%X*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   303
MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   304
]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   305
 XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>/FA XFIJR.K"8.FZ^H9:^\@%0BU]YVQPTE@F#(:NJ"(*J!!!!<_
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   306
F61,[ATUET=OY4=K-4-1\7E1K"8.K''9>_''9>_'':]''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB41LSAYAPTEAPTDVPX.K"8.K"8.KU%X*
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   307
J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$QH(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEAPTE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   308
''I2\''KZ6-!!HRD''=?_7<ZF!!*G!!8^G!!3\7C5APT@@@@@AXVE!!X&9.[&7U5]X>O#8>OLC@0LC@0LCA:^''):^''):^(VE!!XVE!!XT<##0<OH:NK2</K2</K2=9^W%9
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   309
^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   310
+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   311
-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ%YVU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   312
Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.GV8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   313
LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   314
#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1,[E-[V5-*Z%&Y&Y&Y"L#H2LIBP$IVU%Y@PDA@W-;^3 8NC _G1<[F1,[E1\WY6]''
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   315
Y;^7-7M3\7M/[6=/@ HB@ HB@#X6M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LE$EAPTEAPQYA"8.K"8.K"8-VU"(*U%ZBA XHBCP4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   316
''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD!!KI\WKHNXFA DEF''%IRT)24-AR5FQ$YF]GQ4IRT%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   317
_6!!(ZJ,Z*8][V5-["X$OC0=P_G0@_B0,KB2Y&Y&["H"H#45M#440FQ$YLA$YFS$9NS$9^''):P4MCP4NE!!X:NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   318
+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   319
.FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   320
J2,+B41LB0,KB1YAE!!YAE!!XVE(, HB@ HB@ J"(*J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$Q
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   321
H(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   322
^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LC
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   323
Z&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   324
K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ")VU(HFA  HMCR_]7^9.;-ST4A@
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   325
%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.G
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   326
V8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   327
QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   328
BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   329
E$EAPTEAPQYA"8.K"8.K"8-VU"(SU%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   330
!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   331
!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0L
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   332
W%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&).FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   333
''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB41LSDEAPTEAPTEAPX.K"8.K"8.KU%YVD5YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   334
N#*Z&#NCA0]6(*H''I;2<O3<)ZV%DZ4]GB+V5IBPQH)FQN3,=*DJD!!HR2WE22C&A XAAQ)9RT%J\-KPT-Q$YFQ''Q4]BT%IW=(ZF"+F*.GV5-[V8&IC0<OTG1<
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   335
@G0,KB0,&Y&Y&8"H"H=MSX=MLA$YFS@YFQ$9NS$9NW):^$MCP4MC!!XVN##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   336
.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   337
(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@,KB0,VPQXVPQXVE!!ZK
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   338
HB@ HB@ HB(*J!!MVU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9Q
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   339
TYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.GV8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   340
K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HAT
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   341
UJZ&)FM#XVF3,:>1,[E-[V5-*Z%&Y&Y&Y"L#H2LIBP$IVU%Y@PDA@W-;^3 8NC _G1<[F1,[E1\WY6]''Y;^7-7M3\7M/[6=/@ HB@ HB@#X6M)6]''SX6****
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   342
********-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LPTEAPTEAPTEA"8.K"8.K"8-VU%X*U%ZBA XHBCP4''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   343
MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD!!KI\,+HNC 8NTUFT%IRT%@T-APV\''I2\-+Y4D!!HR_6!!(_1(ZF(][!!5.GM8$OC0=P_G0@@E ,VE"[&9&[
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   344
]WU5#8>O#8<0LC@0LC@0LG(9^''):^''):!!TMC!!XVE!!S2NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF-
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   345
 XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&).FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   346
F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+J2,+B41LB41LSAYAPTEAPTDVPX.K"8.K"8.KU%X*
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   347
J%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (D9N$I@)ZV%+Z9^WGA8^RT$"H(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEKPTE
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   348
''I2\''KZ6]AHRD''=(ZG<ZF!!*GV8][!!3^IC0<OTG1<@@AXKE!!X&9.Y&7U5]X>O#8>OLC@0LC@0LCA:NW):^''):^(UCP8VE!!XT<##0<OH:NK2</K2</K2=9^W%9
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   349
^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LCZ&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   350
+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   351
-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ%YVU(HFA  HMCR_]7^9.;-ST4A@%&9.,KAHRBD!!X#(:&)(3 0\G]#T5(JB<S)@?JV%)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   352
Z6.WQ125G$%IDRJM#S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAPTEAY2\''I26-+XRD!!I?_7=?F!!(Z!!8^G!!8\7M0=PTE@@@@@@VE!!XVI.[&9-5]WVO#8>O#3@0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   353
LC@0LC@0^''):^''):^''*E!!XVE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   354
#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1,[E-[V5-*Z%&Y&Y&Y"L#H2LIBP$IVU%Y@PDA@W-;^3 8NC _G1<[F1,[E1\WY6]''
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   355
Y;^7-7M3\7M/[6=/@ HB@ HB@#X6M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KSD1LPTEAPTEAPTEA"8.K"8.K"8-VU%ZBU%ZBA XHBCP4
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   356
''7]7.[.;T5M@PIY.[+B0RD !!HVH:N)*ZL8LGA7X5MZB /D:PO2%)ZV-+%4\\-Q9IRQD"#X4;N36(P(RD!!KI\WKHNXFA DEF''%IRT)24EAR5FQ$YF]GR6IRT%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   357
_7=?ZJ,Z*8^GV8]["S\OTEAP@@@@_B1XKB2Y&Y.["H"H#45M#440FQ$YLA$YFS%:NS$9^''):P8VEP4NE!!X:NOC0<#(8/K2</K2</K7%9^W%9^W%9+*:.+*:.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   358
+&U%YVU%YVU%YTUEAIVU$9MRT+*:^G MW55]LSF- XEUUS8>)ZU$#H1JR''I2GQ6X@0M*Z''5=JB &(P0LW%82L%)Z+HB@UER&)*Q#X6E!!,;N/,Z>1FF5-FJ&)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   359
.FY&Y&X#H98#\@$IBU%YVPDA@PF#(7,8NH(8G1<_F60[F1\WE6]''Y6^7-4-3\7M3[28.[0HB@ HB_ H6''SZ]''Y46M************+R4-KR4-KR4J2,+J2,+
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   360
J2,+B41LB0,KB1YAE!!YAE!!XVE(, HB@ HB@ J"(*A%YV  XFB@ 4MI=7];&;.5MSPDBV[&:0,D!!HHRE"N#*Z&#NCA0]6MSV (K1N$C<)ZV%+Z9]GGKT^RT$Q
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   361
H(6MN3,=*DJD!!HR2WKJ2C 8NC%EQ%IRT%IPEAPTE''I2\''KZ6-!!HRD''=?_7<ZF!!*G!!8^G!!3\7C5APT@@@@@AXVE!!X&9.[&7U5]X>O#8>OLC@0LC@0LCA:^''):
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   362
^''):^(VE!!XVE!!XT<##0<OH:NK2</K2</K2=9^W%9^W%9^Z:.+*:.+*9%YVU%YVU%YVUEQPRU%YNST%J:.''!!8CU=]WSD1+XFAUUT>O*V%YH2LR$)2\!!4]&@LC
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   363
Z&)=_R (I*DLCE9^L#IZV*2@ EQT)*Z$X6M!!X[N3+;F/,Q!!-[Q")*[!!&Y&Y&H2N^H7@IBP%YVU$A@PDA(:M;NC"JNA<_G1-,F1,WE1]''Y6]''-;]K\7M3\6<.
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   364
K&<B@ HB@''8BM)46''Y6]M#Z************4-KR4-KR4-B,+J2,+J2,+J0-LS@-LSD0VPTEAPTEAE$FK"8.K"8.K"5YVJ#QVU(HFA  HMCR_]7^9.;-ST4A@
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   365
%&9.,KAHRBD!!X#(:&)(3 0\G]*J"I2^</C<?JV%)QF-GQ0*5-RP$DRJQ$S,;OZ!!B!!HRD,%22, 8NC 9QTYRT%IRTAR4EAY2\''I26-''PRD!!I?ZF!!?F!!(Z!!5.G
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   366
V8\7"P<OC5A<_@@@VB1XVI.[&Y-5]WVO#8>O#3@0LC@0LC@0^#%:^''):^''*EP4NE!!XVEOH8<OC2N#"</K2</K2</^W%9^W%9^W&.+*:.+*:.YVU%YVU%YVU%
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   367
QTTD%YVS$5IR.+)8^@5_WU41LZ6A UUUO#:%)VRL#D)J\''H]GY C@6)*_W4(JBZ!!C@1^W#H2V%*, HATUJZ&)FM#XVF3,:>1+;DX[V4X*Z&8Y&Y&Y"L#''"M0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   368
BP$IVU%Y@PDA@ZN#^3 8"# _G1<[[A,[E1\WY6]''Y;^7R7M3\7M/K"9/@ HB@ I>@#Z]M)6]''SX6************-KR4-KR4-KP+J2,+J2,+J2,KSD0KB0,K
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   369
E$DVE$DVE!!XV"2@ HB@ HB@*J"(b') ; colorMapFromArray:#[108 168 80 124 90 170 164 90 170 92 122 170 92 164 170 144 168 80 164 96 90 168 132 80 164 98 90 116 90 170 164 152 80 164 90 120 92 110 170 92 152 170 156 168 80 112 166 80 152 166 80 164 158 80 132 168 80 164 88 90 124 88 170 144 88 170 164 90 110 144 90 170 100 88 170 92 166 90 124 168 80 140 90 170 168 152 80 92 126 170 168 154 80 136 90 170 164 90 100 164 122 90 168 158 80 112 90 170 164 156 80 132 166 80 92 114 170 164 138 80 92 116 170 168 144 80 164 90 90 164 90 130 104 166 80 144 166 80 160 88 170 92 166 130 92 168 90 92 146 170 92 106 170 164 130 80 164 100 90 168 136 80 164 90 160 116 168 80 132 90 170 92 166 100 164 126 90 168 162 80 92 168 120 168 164 80 92 138 170 164 142 80 164 112 90 164 92 110 164 166 80 92 166 110 164 148 80 92 166 170 140 166 80 164 150 80 164 120 90 168 156 80 92 130 170 152 88 170 164 92 120 92 166 80 168 140 80 148 88 170 112 168 80 152 168 80 92 158 170 164 110 90 92 98 170 92 140 170 164 92 90 120 88 170 104 168 80 120 90 170 92 104 170 120 166 80 160 166 80 92 148 170 92 108 170 92 150 170 156 166 80 92 90 170 164 124 90 92 92 170 92 134 170 92 166 160 108 90 170 148 90 170 128 166 80 168 146 80 92 120 170 168 148 80 140 88 170 100 90 170 164 116 90 160 90 170 116 88 170 156 88 170 92 128 170 156 90 170 136 166 80 96 168 80 164 134 80 164 104 90 92 154 170 92 166 140 92 168 100 128 90 170 108 166 80 92 118 170 164 88 170 128 168 80 92 100 170 92 142 170 164 94 90 168 130 80 164 168 80 92 168 110 136 88 170 120 168 80 96 166 80 116 166 80 132 88 170 164 92 100 92 132 170 168 160 80 92 166 120 92 168 80 168 142 80 164 160 80 104 88 170 92 160 170 148 168 80 92 162 170 164 114 90 168 150 80 92 124 170 100 166 80 164 128 80 100 168 80 140 168 80 164 88 160 112 88 170 164 102 90 168 138 80 92 112 170 164 136 80 128 88 170 92 94 170 92 136 170 92 96 170 148 166 80 168 166 80 104 90 170 164 90 150 124 166 80 92 102 170 92 144 170 92 166 150 96 88 170 164 118 90 96 90 170 160 168 80 92 88 170 164 90 140 164 154 80 136 168 80 152 90 170 108 88 170 164 106 90 92 156 170 164 108 90 164 140 80]; yourself]
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   370
!
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   371
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   372
pickColorIcon
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   373
    ^ ToolbarIconLibrary pipette16x16Icon
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   374
! !
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
   375
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   376
!ColorEditDialog class methodsFor:'interface specs'!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   377
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   378
windowSpec
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   379
    "This resource specification was automatically generated
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   380
     by the UIPainter of ST/X."
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   381
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   382
    "Do not manually edit this!! If it is corrupted,
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   383
     the UIPainter may not be able to read the specification."
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   384
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   385
    "
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   386
     UIPainter new openOnClass:ColorEditDialog andSelector:#windowSpec
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   387
     ColorEditDialog new openInterface:#windowSpec
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   388
     ColorEditDialog open
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   389
    "
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   390
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   391
    <resource: #canvas>
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   392
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   393
    ^ 
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   394
    #(FullSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   395
       name: windowSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   396
       window: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   397
      (WindowSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   398
         label: 'Define Color'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   399
         name: 'Define Color'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   400
         min: (Point 440 360)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   401
         bounds: (Rectangle 0 0 440 360)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   402
       )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   403
       component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   404
      (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   405
         collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   406
          (VerticalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   407
             name: 'RGBLabelPanel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   408
             layout: (LayoutFrame 0 0 0 0 90 0 76 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   409
             horizontalLayout: fit
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   410
             verticalLayout: spreadSpace
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   411
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   412
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   413
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   414
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   415
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   416
                (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   417
                   label: 'Red:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   418
                   name: 'RedLabel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   419
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   420
                   adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   421
                   useDefaultExtent: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   422
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   423
                (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   424
                   label: 'Green:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   425
                   name: 'GreenLabel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   426
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   427
                   adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   428
                   useDefaultExtent: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   429
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   430
                (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   431
                   label: 'Blue:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   432
                   name: 'BlueLabel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   433
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   434
                   adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   435
                   useDefaultExtent: true
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   436
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   437
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   438
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   439
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   440
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   441
          (VerticalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   442
             name: 'RGBSliderPanel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   443
             layout: (LayoutFrame 90 0 0 0 -177 1 76 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   444
             horizontalLayout: fit
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   445
             verticalLayout: spreadSpace
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   446
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   447
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   448
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   449
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   450
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   451
                (SliderSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   452
                   name: 'RedSlider'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   453
                   tabable: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   454
                   model: red
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   455
                   orientation: horizontal
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   456
                   stop: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   457
                   step: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   458
                   backgroundColor: (Color 100.0 0.0 0.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   459
                   extent: (Point 173 16)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   460
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   461
                (SliderSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   462
                   name: 'GreenSlider'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   463
                   tabable: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   464
                   model: green
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   465
                   orientation: horizontal
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   466
                   stop: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   467
                   step: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   468
                   backgroundColor: (Color 0.0 100.0 0.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   469
                   extent: (Point 173 16)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   470
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   471
                (SliderSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   472
                   name: 'BlueSlider'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   473
                   tabable: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   474
                   model: blue
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   475
                   orientation: horizontal
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   476
                   stop: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   477
                   step: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   478
                   backgroundColor: (Color 0.0 0.0 100.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   479
                   extent: (Point 173 16)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   480
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   481
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   482
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   483
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   484
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   485
          (VerticalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   486
             name: 'RGBFieldPanel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   487
             layout: (LayoutFrame -173 1 0 0 -130 1 76 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   488
             horizontalLayout: fit
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   489
             verticalLayout: spreadSpace
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   490
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   491
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   492
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   493
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   494
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   495
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   496
                   name: 'RedField'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   497
                   model: red
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   498
                   type: numberInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   499
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   500
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   501
                   maxValue: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   502
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   503
                   extent: (Point 41 20)
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   504
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   505
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   506
                   name: 'GreenField'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   507
                   model: green
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   508
                   type: numberInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   509
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   510
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   511
                   maxValue: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   512
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   513
                   extent: (Point 41 20)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   514
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   515
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   516
                   name: 'BlueField'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   517
                   model: blue
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   518
                   type: numberInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   519
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   520
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   521
                   maxValue: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   522
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   523
                   extent: (Point 41 20)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   524
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   525
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   526
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   527
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   528
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   529
          (VerticalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   530
             name: 'RGBFieldPanelHex'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   531
             layout: (LayoutFrame -130 1 0 0 -100 1 76 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   532
             horizontalLayout: fit
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   533
             verticalLayout: spreadSpace
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   534
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   535
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   536
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   537
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   538
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   539
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   540
                   name: 'EntryField4'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   541
                   model: red
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   542
                   type: hexIntegerInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   543
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   544
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   545
                   maxValue: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   546
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   547
                   extent: (Point 28 20)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   548
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   549
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   550
                   name: 'EntryField5'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   551
                   model: green
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   552
                   type: hexIntegerInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   553
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   554
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   555
                   maxValue: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   556
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   557
                   extent: (Point 28 20)
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   558
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   559
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   560
                   name: 'EntryField6'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   561
                   model: blue
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   562
                   type: hexIntegerInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   563
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   564
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   565
                   maxValue: 255
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   566
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   567
                   extent: (Point 28 20)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   568
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   569
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   570
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   571
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   572
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   573
          (VerticalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   574
             name: 'HLSLabelPanel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   575
             layout: (LayoutFrame 0 0 86 0 90 0 163 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   576
             horizontalLayout: fit
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   577
             verticalLayout: spreadSpace
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   578
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   579
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   580
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   581
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   582
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   583
                (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   584
                   label: 'Hue:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   585
                   name: 'Label1'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   586
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   587
                   adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   588
                   useDefaultExtent: true
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   589
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   590
                (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   591
                   label: 'Light:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   592
                   name: 'Label2'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   593
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   594
                   adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   595
                   useDefaultExtent: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   596
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   597
                (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   598
                   label: 'Saturation:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   599
                   name: 'Label3'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   600
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   601
                   adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   602
                   useDefaultExtent: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   603
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   604
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   605
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   606
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   607
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   608
          (VerticalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   609
             name: 'HLSSliderPanel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   610
             layout: (LayoutFrame 90 0 86 0 -177 1 163 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   611
             horizontalLayout: fit
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   612
             verticalLayout: spreadSpace
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   613
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   614
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   615
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   616
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   617
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   618
                (SliderSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   619
                   name: 'HueSlider'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   620
                   tabable: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   621
                   model: hue
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   622
                   orientation: horizontal
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   623
                   stop: 359
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   624
                   step: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   625
                   keyboardStep: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   626
                   extent: (Point 173 16)
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   627
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   628
                (SliderSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   629
                   name: 'LightSlider'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   630
                   tabable: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   631
                   model: light
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   632
                   orientation: horizontal
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   633
                   step: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   634
                   backgroundColor: (Color 67.0 67.0 67.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   635
                   keyboardStep: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   636
                   extent: (Point 173 16)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   637
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   638
                (SliderSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   639
                   name: 'SaturationSlider'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   640
                   tabable: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   641
                   model: saturation
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   642
                   orientation: horizontal
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   643
                   step: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   644
                   backgroundColor: (Color 67.0 67.0 67.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   645
                   keyboardStep: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   646
                   extent: (Point 173 16)
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   647
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   648
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   649
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   650
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   651
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   652
          (VerticalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   653
             name: 'HLSFieldPanel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   654
             layout: (LayoutFrame -173 1 86 0 -130 1 163 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   655
             horizontalLayout: fit
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   656
             verticalLayout: spreadSpace
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   657
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   658
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   659
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   660
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   661
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   662
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   663
                   name: 'EntryField1'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   664
                   model: hue
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   665
                   type: numberInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   666
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   667
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   668
                   maxValue: 359
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   669
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   670
                   extent: (Point 41 20)
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   671
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   672
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   673
                   name: 'EntryField2'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   674
                   model: light
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   675
                   type: numberInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   676
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   677
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   678
                   maxValue: 100
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   679
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   680
                   extent: (Point 41 20)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   681
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   682
                (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   683
                   name: 'EntryField3'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   684
                   model: saturation
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   685
                   type: numberInRange
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   686
                   numChars: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   687
                   minValue: 0
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   688
                   maxValue: 100
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   689
                   acceptOnPointerLeave: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   690
                   extent: (Point 41 20)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   691
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   692
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   693
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   694
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   695
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   696
          (ViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   697
             name: 'PreviewBoxFrame'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   698
             layout: (LayoutFrame -100 1 4 0.0 -3 1.0 -39 1.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   699
             level: 1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   700
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   701
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   702
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   703
                (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   704
                   label: 'Preview'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   705
                   name: 'PreviewBox'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   706
                   layout: (LayoutFrame 2 0.0 2 0.0 -2 1.0 -2 1.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   707
                   level: -1
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   708
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   709
                   postBuildCallback: postBuildPreviewBox:
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   710
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   711
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   712
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   713
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   714
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   715
          (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   716
             label: 'Brightness:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   717
             name: 'Label5'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   718
             layout: (LayoutFrame 0 0 175 0 90 0 197 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   719
             activeHelpKey: brightness
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   720
             translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   721
             adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   722
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   723
          (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   724
             name: 'EntryField8'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   725
             layout: (LayoutFrame 90 0 175 0 -277 1 197 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   726
             activeHelpKey: brightness
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   727
             model: brightnessStringHolder
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   728
             isReadOnly: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   729
             immediateAccept: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   730
             acceptOnReturn: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   731
             acceptOnTab: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   732
             acceptOnLostFocus: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   733
             acceptOnPointerLeave: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   734
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   735
          (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   736
             label: 'Color Name:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   737
             name: 'ColorNameLabel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   738
             layout: (LayoutFrame 2 0 214 0 135 0 236 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   739
             activeHelpKey: colorName
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   740
             translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   741
             adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   742
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   743
          (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   744
             name: 'ColorNameField'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   745
             layout: (LayoutFrame 135 0 214 0 -122 1 236 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   746
             activeHelpKey: colorName
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   747
             model: colorNameHolder
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   748
             immediateAccept: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   749
             acceptOnReturn: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   750
             acceptOnTab: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   751
             acceptOnLostFocus: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   752
             acceptOnPointerLeave: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   753
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   754
          (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   755
             label: 'HTML Color Name:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   756
             name: 'HTMLColorNameLabel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   757
             layout: (LayoutFrame 2 0 240 0 135 0 262 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   758
             activeHelpKey: htmlColorName
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   759
             translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   760
             adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   761
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   762
          (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   763
             name: 'MLHTColorNameFieldField'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   764
             layout: (LayoutFrame 135 0 240 0 -122 1 262 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   765
             activeHelpKey: htmlColorName
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   766
             model: htmlColorNameHolder
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   767
             immediateAccept: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   768
             acceptOnReturn: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   769
             acceptOnTab: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   770
             acceptOnLostFocus: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   771
             acceptOnPointerLeave: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   772
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   773
          (LabelSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   774
             label: 'Color Definition:'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   775
             name: 'Label4'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   776
             layout: (LayoutFrame 2 0 266 0 135 0 288 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   777
             activeHelpKey: colorDefinitionString
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   778
             translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   779
             adjust: right
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   780
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   781
          (InputFieldSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   782
             name: 'EntryField7'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   783
             layout: (LayoutFrame 135 0 266 0 -122 1 288 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   784
             activeHelpKey: colorDefinitionString
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   785
             model: colorDefinitionStringHolder
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   786
             isReadOnly: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   787
             immediateAccept: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   788
             acceptOnReturn: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   789
             acceptOnTab: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   790
             acceptOnLostFocus: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   791
             acceptOnPointerLeave: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   792
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   793
          (ActionButtonSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   794
             label: 'Copy Color'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   795
             name: 'CopyColor'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   796
             layout: (LayoutFrame 12 0 298 0 100 0 320 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   797
             activeHelpKey: hlsMixer
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   798
             translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   799
             resizeForLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   800
             tabable: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   801
             model: copyColor
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   802
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   803
          (ActionButtonSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   804
             label: 'Paste Color'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   805
             name: 'PasteColor'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   806
             layout: (LayoutFrame 108 0 298 0 196 0 320 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   807
             translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   808
             resizeForLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   809
             tabable: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   810
             model: pasteColor
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   811
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   812
          (ActionButtonSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   813
             label: 'pickColorIcon'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   814
             name: 'Button1'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   815
             layout: (LayoutFrame 285 0 298 0 312 0 325 0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   816
             activeHelpKey: pickColor
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   817
             hasCharacterOrientedLabel: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   818
             translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   819
             resizeForLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   820
             tabable: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   821
             model: pickColor
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   822
           )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   823
          (HorizontalPanelViewSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   824
             name: 'HorizontalPanel1'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   825
             layout: (LayoutFrame 0 0.0 -32 1 -16 1.0 0 1.0)
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   826
             horizontalLayout: okCancelBox
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   827
             verticalLayout: centerMax
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   828
             horizontalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   829
             verticalSpace: 3
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   830
             reverseOrderIfOKAtLeft: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   831
             component: 
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   832
            (SpecCollection
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   833
               collection: (
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   834
                (ActionButtonSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   835
                   label: 'Cancel'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   836
                   name: 'CancelButton'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   837
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   838
                   resizeForLabel: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   839
                   tabable: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   840
                   model: cancel
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   841
                   useDefaultExtent: true
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   842
                 )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   843
                (ActionButtonSpec
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   844
                   label: 'OK'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   845
                   name: 'OKButton'
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   846
                   translateLabel: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   847
                   resizeForLabel: false
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   848
                   tabable: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   849
                   model: accept
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   850
                   isDefault: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   851
                   defaultable: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   852
                   useDefaultExtent: true
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   853
                 )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   854
                )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   855
              
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   856
             )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   857
             keepSpaceForOSXResizeHandleH: true
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   858
           )
3175
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   859
          )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   860
        
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   861
       )
c205d80403ef class: ColorEditDialog
Claus Gittinger <cg@exept.de>
parents: 2941
diff changeset
   862
     )
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   863
! !
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   864
2347
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   865
!ColorEditDialog class methodsFor:'startup'!
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   866
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   867
openOn:aColor
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   868
    ^ self new
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   869
        color:aColor;
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   870
        open;
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   871
        yourself
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   872
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   873
    "
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   874
     self openOn:Color red
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   875
    "
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   876
! !
c37fb02785bc +openOn:
Claus Gittinger <cg@exept.de>
parents: 2326
diff changeset
   877
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   878
!ColorEditDialog methodsFor:'accessing'!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   879
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   880
color
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   881
    |colorName|
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   882
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   883
    colorName := self colorName.
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   884
    colorName notEmptyOrNil ifTrue:[
2574
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   885
        ^ Color name:(colorName asSymbol)
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   886
    ].
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   887
    ^ Color redByte:(red value) greenByte:(green value) blueByte:(blue value)
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   888
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   889
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   890
color:aColor
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   891
    aColor isNil ifTrue:[
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   892
        ^ self
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   893
    ].
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   894
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   895
    aColor isSymbol ifTrue:[
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   896
        self colorNameHolder value:aColor
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   897
    ] ifFalse:[
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   898
        self red value:aColor redByte.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   899
        self green value:aColor greenByte.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   900
        self blue value:aColor blueByte.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   901
    ]
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   902
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   903
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   904
colorName
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   905
    ^ colorNameHolder value
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   906
!
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   907
2574
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   908
colorNameOrColor
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   909
    |colorName|
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   910
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   911
    colorName := self colorName.
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   912
    colorName notEmptyOrNil ifTrue:[
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   913
        "/ ^ Color name:(colorName asSymbol)
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   914
        ^ colorName asSymbol
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   915
    ].
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   916
    ^ Color redByte:(red value) greenByte:(green value) blueByte:(blue value)
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   917
!
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   918
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   919
htmlColorName
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   920
    ^ htmlColorNameHolder value
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   921
! !
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   922
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   923
!ColorEditDialog methodsFor:'actions'!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   924
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   925
colorChanged
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   926
    |clr nm|
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   927
2574
ae2448675efb deliver a color, when asked for one !
Claus Gittinger <cg@exept.de>
parents: 2521
diff changeset
   928
    clr := self colorNameOrColor.
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   929
    clr isColor ifTrue:[
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   930
        "not a symbol"
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   931
        self setPreview:clr.
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   932
        self htmlColorNameHolder value:(clr htmlPrintString) withoutNotifying:self.
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   933
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   934
        nm := #(white red green blue black) detect:[:nm | clr = (Color perform:nm)] ifNone:nil.
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   935
        nm notNil ifTrue:[
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   936
            self colorDefinitionStringHolder value:('Color ',nm).
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   937
        ] ifFalse:[
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   938
            self colorDefinitionStringHolder value:('Color rgbValue:16r',(clr rgbValue hexPrintString leftPaddedTo:6 with:$0)).
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   939
        ].
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   940
        self brightnessStringHolder value:((clr brightness asFixedPoint:3) printString).
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   941
    ].
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   942
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   943
    "Modified: / 27-01-2011 / 12:54:04 / cg"
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   944
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   945
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   946
colorChangedTo:clr
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   947
    "compute rgb and hls (if possible)"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   948
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   949
    |h|
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   950
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   951
    self red   value:clr redByte withoutNotifying:self.
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   952
    self green value:clr greenByte withoutNotifying:self.
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   953
    self blue  value:clr blueByte withoutNotifying:self.
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   954
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   955
    h := clr hue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   956
    h notNil ifTrue:[
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   957
        self hue        value:(h rounded) withoutNotifying:self.
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   958
    ].
2279
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   959
    self light      value:(clr light rounded) withoutNotifying:self.
f077161d5d57 symbolic colors
Stefan Vogel <sv@exept.de>
parents: 2274
diff changeset
   960
    self saturation value:(clr saturation rounded) withoutNotifying:self.
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   961
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   962
    self colorChanged
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   963
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
   964
    "Modified: / 27-01-2011 / 12:48:28 / cg"
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   965
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   966
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   967
colorNameChanged
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   968
    "compute rgb and hls (if possible)"
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   969
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   970
    |clr|
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   971
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   972
    clr := Color name:colorNameHolder value ifIllegal:nil.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   973
    clr isNil ifTrue:[
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   974
        ^ self
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   975
    ].
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   976
    self colorChangedTo:clr.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   977
!
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   978
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   979
copyColor
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   980
    self window setClipboardObject:self color
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   981
!
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   982
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   983
copyColorName
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   984
    self window setClipboardText:self htmlColorName
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   985
!
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
   986
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   987
hlsSliderChanged
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   988
    "compute rgb"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   989
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   990
    Color withRGBFromHue:hue value light:light value saturation:saturation value do:[:r :g :b |
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   991
        red    value:(r * 255 / 100) rounded withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   992
        green  value:(g * 255 / 100) rounded withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   993
        blue   value:(b * 255 / 100) rounded withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   994
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   995
    colorNameHolder value:'' withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   996
    self colorChanged
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   997
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   998
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   999
htmlColorNameChanged
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1000
    "compute rgb and hls (if possible)"
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1001
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1002
    |clr|
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1003
2417
cc89133cc041 changed #htmlColorNameChanged - ignore empty color names
Stefan Vogel <sv@exept.de>
parents: 2347
diff changeset
  1004
    htmlColorNameHolder value isEmptyOrNil ifTrue:[
cc89133cc041 changed #htmlColorNameChanged - ignore empty color names
Stefan Vogel <sv@exept.de>
parents: 2347
diff changeset
  1005
        ^ self.
cc89133cc041 changed #htmlColorNameChanged - ignore empty color names
Stefan Vogel <sv@exept.de>
parents: 2347
diff changeset
  1006
    ].
cc89133cc041 changed #htmlColorNameChanged - ignore empty color names
Stefan Vogel <sv@exept.de>
parents: 2347
diff changeset
  1007
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1008
    clr := Color rgbValue:(Integer 
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1009
                                readFrom:(htmlColorNameHolder value copyFrom:2)
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1010
                                radix:16
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1011
                                onError:nil).
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1012
    clr isNil ifTrue:[
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1013
        ^ self
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1014
    ].
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1015
    self colorNameHolder value:'' withoutNotifying:self.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1016
    self colorChangedTo:clr.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1017
!
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1018
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1019
pasteColor
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1020
    |copyBufferColor|
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1021
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1022
    copyBufferColor := self window getClipboardObject.
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1023
    copyBufferColor isColor ifFalse:[
2521
5cfd5fcd7bd3 beepInEditor flag
Claus Gittinger <cg@exept.de>
parents: 2417
diff changeset
  1024
        UserPreferences current beepInEditor ifTrue:[                
5cfd5fcd7bd3 beepInEditor flag
Claus Gittinger <cg@exept.de>
parents: 2417
diff changeset
  1025
            self window beep.
5cfd5fcd7bd3 beepInEditor flag
Claus Gittinger <cg@exept.de>
parents: 2417
diff changeset
  1026
        ].
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1027
        ^ self
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1028
    ].
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1029
    self color:copyBufferColor
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1030
!
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1031
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1032
pickColor
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1033
    |color|
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1034
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1035
    color := Color fromUserWithFeedBack:[:clr | self setPreview:clr].
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1036
    color notNil ifTrue:[
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1037
        self color:color.
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1038
    ]
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1039
!
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1040
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1041
rgbSliderChanged
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1042
    "compute hls"
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1043
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1044
    |r g b|
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1045
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1046
    r := self red value.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1047
    g := self green value.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1048
    b := self blue value.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1049
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1050
    Color withHLSFromRed:(r * 100 / 255) green:(g * 100 / 255) blue:(b * 100 / 255) do:[:h :l :s |
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1051
        h isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1052
            "/ achromatic
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1053
        ] ifFalse:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1054
            self hue    value:(h rounded) withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1055
        ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1056
        self light      value:(l rounded) withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1057
        self saturation value:(s rounded) withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1058
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1059
    self colorNameHolder value:'' withoutNotifying:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1060
    self colorChanged
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1061
!
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1062
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1063
setPreview:color
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1064
    previewBox isNil ifTrue:[^ self "called before setup"].
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1065
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1066
    previewBox backgroundColor:color.
2941
15df48eba1c4 class: Color
Stefan Vogel <sv@exept.de>
parents: 2904
diff changeset
  1067
    previewBox foregroundColor:color contrastingBlackOrWhite.
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1068
! !
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1069
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1070
!ColorEditDialog methodsFor:'aspects'!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1071
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1072
blue
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1073
    blue isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1074
        blue := 0 asValue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1075
        blue addDependent:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1076
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1077
    ^blue
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1078
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1079
2831
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1080
brightnessStringHolder
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1081
    brightnessStringHolder isNil ifTrue:[
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1082
        brightnessStringHolder := 0 asValue.
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1083
        "/ brightness addDependent:self.
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1084
    ].
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1085
    ^ brightnessStringHolder
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1086
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1087
    "Created: / 27-01-2011 / 12:48:00 / cg"
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1088
!
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1089
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1090
colorDefinitionStringHolder
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1091
    colorDefinitionStringHolder isNil ifTrue:[
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1092
        colorDefinitionStringHolder := '' asValue.
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1093
        "/ colorDefinitionStringHolder addDependent:self.
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1094
    ].
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1095
    ^colorDefinitionStringHolder
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1096
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1097
    "Created: / 27-01-2011 / 12:38:12 / cg"
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1098
!
3dbef5687ae6 class definition
Claus Gittinger <cg@exept.de>
parents: 2574
diff changeset
  1099
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1100
colorNameHolder
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1101
    colorNameHolder isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1102
        colorNameHolder := '' asValue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1103
        colorNameHolder addDependent:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1104
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1105
    ^colorNameHolder
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1106
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1107
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1108
green
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1109
    green isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1110
        green := 0 asValue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1111
        green addDependent:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1112
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1113
    ^green
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1114
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1115
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1116
htmlColorNameHolder
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1117
    htmlColorNameHolder isNil ifTrue:[
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1118
        htmlColorNameHolder := '' asValue.
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1119
        htmlColorNameHolder addDependent:self.
2224
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1120
    ].
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1121
    ^htmlColorNameHolder
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1122
!
6ec083adc6bf hex input; hex-name; copy & paste
Claus Gittinger <cg@exept.de>
parents: 1846
diff changeset
  1123
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1124
hue
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1125
    hue isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1126
        hue := 0 asValue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1127
        hue addDependent:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1128
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1129
    ^hue
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1130
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1131
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1132
light
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1133
    light isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1134
        light := 0 asValue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1135
        light addDependent:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1136
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1137
    ^light
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1138
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1139
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1140
red
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1141
    red isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1142
        red := 0 asValue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1143
        red addDependent:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1144
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1145
    ^red
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1146
!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1147
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1148
saturation
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1149
    saturation isNil ifTrue:[
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1150
        saturation := 0 asValue.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1151
        saturation addDependent:self.
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1152
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1153
    ^saturation
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1154
! !
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1155
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1156
!ColorEditDialog methodsFor:'change & update'!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1157
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1158
update:something with:aParameter from:changedObject
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1159
    (changedObject == red
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1160
    or:[changedObject == green
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1161
    or:[changedObject == blue]]) ifTrue:[
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1162
        self rgbSliderChanged.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1163
        ^ self
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1164
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1165
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1166
    (changedObject == hue
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1167
    or:[changedObject == light
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1168
    or:[changedObject == saturation]]) ifTrue:[
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1169
        self hlsSliderChanged.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1170
        ^ self
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1171
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1172
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1173
    (changedObject == colorNameHolder) ifTrue:[
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1174
        self colorNameChanged.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1175
        ^ self
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1176
    ].
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1177
    (changedObject == htmlColorNameHolder) ifTrue:[
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1178
        self htmlColorNameChanged.
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1179
        ^ self
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1180
    ].
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1181
2326
f23fac376621 allow hexcolor to be entered;
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
  1182
    super update:something with:aParameter from:changedObject
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1183
! !
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1184
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1185
!ColorEditDialog methodsFor:'startup & release'!
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
  1186
2266
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1187
postBuildPreviewBox:aView
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1188
    previewBox := aView
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1189
!
0234d226a06a added pick (pipette) and feedback
Claus Gittinger <cg@exept.de>
parents: 2228
diff changeset
  1190
1840
57c23d1beb53 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset<