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

Reply via email to