Alex, can we have a RTDirectedLine variant that ends with an arrow shape? Because if I use directed lines sometimes it’s not understandable. For example:
Versus RTArrowedLine
On Jul 3, 2015, at 06:36, Alexandre Bergel alexandre.bergel@me.com wrote:
We also have directed line. Here is an example:
<Screen Shot 2015-07-03 at 11.35.18 AM.png>
| v elements1 elements2 objects1 objects2 shape1 shape2 assocs | objects1 := 1 to: 5. objects2 := 6 to: 10. assocs := Array with: 1 -> 5 with: 2 -> 6 with: 6 -> 10 with: 10 -> 2.
v := RTView new. v @ RTDraggableView.
shape1 := RTEllipse new size: 10; color: (Color gray alpha: 0.3). shape2 := RTEllipse new size: 10; color: (Color pink alpha: 0.3). elements1 := shape1 elementsOn: objects1. elements2 := shape2 elementsOn: objects2.
elements1 @ RTPopup. elements2 @ RTPopup.
v addAll: elements1. v addAll: elements2.
RTEdge buildEdgesFromObjects: assocs from: #key to: #value using: (RTDirectedLine new color: (Color blue alpha: 0.5)) inView: v. RTHorizontalLineLayout new gapSize: 1;on: elements1, elements2. v open -=-=-=-=-=
Larger examples with: #exampleDependenciesWithCurve
<Screen Shot 2015-07-03 at 11.33.45 AM.png> <Screen Shot 2015-07-03 at 11.33.11 AM.png>
Cheers, Alexandre
---> Save our in-boxes! http://emailcharter.org <---
Johan Fabry - http://pleiad.cl/~jfabry PLEIAD lab - Computer Science Department (DCC) - University of Chile