just a question
why not
view := ROView new. el1 := ROElement dragable.
or
view := ROView new. el1 := ROElement new
el1 draggable
el1 + ROBox blue.
what is the advantage over
el1 color: #blue
? or
el1 := ROElement new el1 box green ; draggable
to me the + and @ looks complex and a bit ugly. Then I do not understand why we can give an extent: before saying that this is a box?
| view el1 el2 edge line | view := ROView new. el1 := ROElement new. el1 draggable ; box blue. el1 extent: 50@50.
el2 := ROElement new. el2 draggable; box green. el2 extent: 50@50.
looks better to me.
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@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev