How to make square element with filled circle inside:
1) Subclass BlElement -> BlCell 2) Override
drawOnSpartaCanvas: aCanvas super drawOnSpartaCanvas: aCanvas. aCanvas setShape: self localBounds; setStrokePaint: Color blue; stroke
3) Override initialize to have circle shape:
initialize super initialize. self shapeDo: [ :aShape | aShape path: BlCirclePath new; fillPaint: Color red ].
4) Open cell in word
Easy :)
Except that I do not understand it. I do not understand why I should do setShape: self localBounds; and why I should do shapeDo: in the initialize This is totally unclear to me. So this means that I cannot program anything I want with it. Imagine I could not find anything simpler than a box with a circle drawn on it and even with the solution I cannot understand it. You see in Morphic this is simple: you have a drawOn: aCanvas method and you know how to draw: aCanvas I do not get the interaction between the draw and the initialize. This is totally unclear. Now I tried and this code did not work in the build 26 so I tried with drawOnAthensCanvas: and it crashed. So I stop. No need to reply to this email and thread. Stef