Thanks Nicolai!

I should've tried all the paint modes before asking. -_-

Peter

On Fri, May 1, 2015 at 8:32 PM, Nicolai Hess <[email protected]> wrote:

>
>
> 2015-05-01 17:50 GMT+02:00 Werner Kassens <[email protected]>:
>
>> Hi Peter,
>> at the morphic level you might eventually look at ColorMappingCanvas and
>> make a subclass.
>> werner
>>
>>
>>
>
> Inverting the color of a form:
>
> Display reverse:(0@0 extent:600@300).
>
> Inverting colors of an athens drawing: Paint a white rectangle with paint
> mode "difference"
>
> |view paint |
> view := AthensSceneView new.
> paint := nil.
> view scene:[:canvas |
>     paint ifNil:[paint := (Form fromDisplay:(0@0 extent:600@300)
> )asAthensPaintOn: canvas].
>     canvas surface clear:Color white.
>     canvas setPaint: paint.
>     canvas drawShape:(0@0 extent:600@300).
>     canvas paintMode restoreAfter:[
>         canvas setPaint: Color white.
>         canvas paintMode difference.
>         canvas drawShape:(0@0 extent:600@300).
>         ].
>     ].
> view openInWindow.
>
>
>
>
>
>

Reply via email to