17 Apr
2015
17 Apr
'15
1:25 a.m.
Hi Jan!
Is the problem you described below still an issue?
(I am going through marked emails)
Cheers,
Alexandre
On Apr 8, 2015, at 2:58 PM, Jan B.
<bliznjan(a)fit.cvut.cz> wrote:
Hi
This method does what I want and it works just fine. Only problem is that we
add callbacks to all shapes in one place the same way, but this requires
exception for composite shapes.
It seems composite shapes need different behavior with different usage of
them. I thought about using replacable blocks for composite shapes actions
like adding callbacks, resizing or moving composite shape, reaction to
moving or resizing sub-shapes etc.
I will try to unify discussion about composite shapes into "Roassal
TRCompositeShape regression" thread started by Peter.
Jan
abergel wrote
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
Hi Jan,
I have a solution for your problem (you need to update Roassal). Let’s see
whether it works for you.
Here is an updated version of your script:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
s := RTCompositeShape new.
s add: (RTBox new color: Color blue; size: 50).
s add: (RTEllipse new color: Color green; size: 100).
s horizontal.
s setAutomaticRelayout.
e := s element.
view := RTView new.
view add: e.
e @ RTDraggable.
encompass := RTBox new color: Color transparent; borderColor: Color red;
element.
view add: encompass.
block := [ encompass extent: e encompassingRectangle extent; translateTo:
e
position. view signalUpdate. ].
“I have introduced #addCallbackToAllShapes:"
e trachelShape addCallbackToAllShapes: (TRExtentCallback block: block).
e trachelShape addCallbackToAllShapes: (TRTranslationCallback block:
block).
block value.
e when: TRMouseClick do: [ :ev |
e trachelShape shapes second extent: 20@20.
view signalUpdate.
].
view open
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Let us know about your progresses!
Alexandre
--
View this message in context:
http://forum.world.st/Roassal-TRCompositeShape-not-sending-callbacks-tp4814…
Sent from the Moose mailing list archive at Nabble.com.
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev