ColorEditDialog.st
changeset 2347 c37fb02785bc
parent 2326 f23fac376621
child 2417 cc89133cc041
equal deleted inserted replaced
2346:d6fdeda319de 2347:c37fb02785bc
   558          
   558          
   559         )
   559         )
   560       )
   560       )
   561 ! !
   561 ! !
   562 
   562 
       
   563 !ColorEditDialog class methodsFor:'startup'!
       
   564 
       
   565 openOn:aColor
       
   566     ^ self new
       
   567         color:aColor;
       
   568         open;
       
   569         yourself
       
   570 
       
   571     "
       
   572      self openOn:Color red
       
   573     "
       
   574 ! !
       
   575 
   563 !ColorEditDialog methodsFor:'accessing'!
   576 !ColorEditDialog methodsFor:'accessing'!
   564 
   577 
   565 color
   578 color
   566     |colorName|
   579     |colorName|
   567 
   580