You don't want to draw a shape, you configure it. Shape can not be drawn, it is not an AthensPath. cell shape: (BlShape new path: BlCirclePath new; strokePaint: (BlStrokePaint new paint: Color blue; width: 1)). cell extent: 50@50. On Apr 2, 2016 4:57 PM, "stepharo" <stepharo@free.fr> wrote:
Hi
I want a square morph with a circle or a line at 45 degree inside Now I do not get it.
I thought that I needed to specialize drawOnAthensCanvas: so I did
BlCell >> drawOnAthensCanvas: aCanvas
super drawOnAthensCanvas: aCanvas. aCanvas drawShape: (BlShape new strokePaint: (BlStrokePaint new paint: (BlColorPaint new color: (Color blue)); width: 15); path: BlCirclePath new).
Now I do not know how I can specify a shape size
So I will use another API than drawShape:
Stef