Hi Usman,
The ArrowedLine is a particular case that does not deserve its own class. Composition is
much better here because we can construct the shapes the way we want (and we can control
each .
The arrow at the end of the line can be added as a convenience method. Perhaps something
like this:
edge + ROLine + ROArrow.
This does not yet work because some convenience methods are missing, but other than that
it should work out of the box. As soon as I get some rights, I can even commit :).
Cheers,
Doru
On 12 Jun 2012, at 21:15, Usman Bhatti wrote:
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(a)me.com> wrote:
Hi!
I know this has been on the wished list of many of you. The following script produces:
<Screen Shot 2012-06-13 at 12.54.05 AM.png>
-=-=-=-=-=-=-=-=-=-=-=-=
| 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(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--
www.tudorgirba.com
"Beauty is where we see it."