BlCell>>initialize
������ super initialize.
������ self
������ ������ shape:
������ ������ ������ (BlShape new
������ ������ ������ ������ fillPaint: (BlColorPaint new color: (Color yellow));
������ ������ ������ ������ path: BlRectanglePath new);
������ ������ extent: self extent


Igor I could understand that if I want a clickable rectangle I have to initialise it with such shape.
Now what I could not achieve was to get a circle drawn on it.
Sadly :)

Stef