29 Apr
2014
29 Apr
'14
10:36 a.m.
On Tue, Apr 29, 2014 at 2:24 AM, Alexandre Bergel
<alexandre.bergel(a)me.com>wrote;wrote:
view := RTView new.
el := (RTHorizontalCompositeShape new
shape1: (RTCompositeShape new shape1: RTBox new; shape2: RTLabel
new);
shape2: (RTEllipse new size: 10; color: Color blue))
elementOn: 'Element'.
view add: el.
view canvas addMenu: 'Color' callback: [ el trachelShape shape2 color:
Color red. view signalUpdate ].
view open
Ok cool I will do it like that
--
Cheers,
Leo Perard
University of Lille 1