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.



��