I personally do not often face the need. Actually, I seldom use arrow. I gave a try, but I need your feedback.

-=-=-=-=-=-=-=-=-=-=-=-=

| v e1 e2 line |
v := RTView new.
e1 := (RTEllipse new color: (Color blue alpha: 0.4); size: 20) element.
e2 := (RTEllipse new color: (Color red alpha: 0.4); size: 20) element.
e1 @ RTDraggable.
e2 @ RTDraggable.

v add: e1; add: e2.

line := RTArrow new color: Color red.
line withOffsetIfMultiple.
v add: (line  edgeFrom: e1 to: e2).
v add: (line  edgeFrom: e2 to: e1).

RTCircleLayout on: { e1 . e2 }.
v

-=-=-=-=-=-=-=-=-=-=-=-=

-=-=-=-=-=-=-=-=-=-=-=-=

| v e1 e2 e3 e4 line |
v := RTView new.
e1 := (RTEllipse new color: (Color blue alpha: 0.4); size: 20) element.
e2 := (RTEllipse new color: (Color red alpha: 0.4); size: 20) element.
e3 := (RTEllipse new color: (Color yellow alpha: 0.4); size: 20) element.
e4 := (RTEllipse new color: (Color green alpha: 0.4); size: 20) element.
e1 @ RTDraggable.
e2 @ RTDraggable.
e3 @ RTDraggable.
e4 @ RTDraggable.

v add: e1; add: e2; add: e3; add: e4.

line := RTArrow new color: Color red.
line withOffsetIfMultiple.
v add: (line  edgeFrom: e1 to: e2).
v add: (line  edgeFrom: e2 to: e1).
v add: (line  edgeFrom: e1 to: e2).

v add: (line  edgeFrom: e2 to: e2).

v add: (line  edgeFrom: e3 to: e4).

RTCircleLayout on: { e1 . e2 . e3 . e4 }.
v

-=-=-=-=-=-=-=-=-=-=-=-=

Example have been added

Cheers,

Alexandre

On Jun 7, 2014, at 4:51 PM, Tudor Girba <tudor@tudorgirba.com> wrote:

Nice.

Did you consider implementing the arrows implemented in Softwarenaut and Quicksilver? The idea is to have them from center to center and a bit shifted to have edges in both directions visible. They also start being drawn not quite from the edge of the shape but with a little gap. They are pretty nice and scale well.

Cheers,
Doru




On Fri, Jun 6, 2014 at 3:52 PM, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Hi!

We worked on the arrow support in Roassal. Here is a screenshot:

<Screen Shot 2014-06-06 at 3.50.31 PM.png>

Cheers,
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




-- 
www.tudorgirba.com

"Every thing has its own flow"
_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev