Thanks Alex.
But I think arrowed line was a good tool to show relationship between two entities without specifying the position of arrow. So, it will be good if you can keep it.

On Tue, Jun 12, 2012 at 6:54 PM, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Hi!

I know this has been on the wished list of many of you. The following script produces:

-=-=-=-=-=-=-=-=-=-=-=-=
| view el1 el2 edge line  |
view := ROView new.
el1 := ROElement new.
el1 @RODraggable.
el1 extent: 50@50.
el1 + ROBox blue.

el2 := ROElement new.
el2 @RODraggable.
el2 extent: 50@50.
el2 + ROBox green.

el1 translateTo: 0 @ 100.
 
edge := ROEdge from: el1 to: el2.
line := ROLine new.
line add: ROArrow new offset: 0.1.
line add: ROArrow new offset: 0.5.
edge + line.

view add: el1; add: el2; add: edge.
view open 
-=-=-=-=-=-=-=-=-=-=-=-=

I will remove ROArrowedLine very soon then

Alexandre
-- 
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.




_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev