Thanks Nicolai! I should've tried all the paint modes before asking. -_- Peter On Fri, May 1, 2015 at 8:32 PM, Nicolai Hess <nicolaihess@web.de> wrote:
2015-05-01 17:50 GMT+02:00 Werner Kassens <wkassens@libello.com>:
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.