changeset 1846 | 65558eb9f4d3 |
parent 1840 | 57c23d1beb53 |
child 2224 | 6ec083adc6bf |
1845:d6d62913c2cc | 1846:65558eb9f4d3 |
---|---|
44 examples |
44 examples |
45 " |
45 " |
46 [exBegin] |
46 [exBegin] |
47 |editor color| |
47 |editor color| |
48 |
48 |
49 editor := ColorEditor new. |
49 editor := ColorEditDialog new. |
50 editor color:(Color green). |
50 editor color:(Color green). |
51 editor open. |
51 editor open. |
52 editor accepted ifTrue:[ |
52 editor accepted ifTrue:[ |
53 editor color inspect. |
53 editor color inspect. |
54 ] |
54 ] |