Well seen!
Update Roassal and you can do:
-=-=-=-=-=-=-=-=-=-=-=-=
| v e1 e2 l lbl |
v := ROView new.
"Change here"
e1 := (ROBox new size: 30; width:200 ) element.
e2 := (ROBox new size: 30; width:200) element.
l := ROLine elementFrom: e1 to: e2.
lbl := (ROLabel text: 'hello world') element.
ROConstraint stick: lbl onEdge: l. "locate the label between 2 nodes"
e1 @ RODraggable.
e2 @ RODraggable.
v add: e1; add: e2; add: l; add: lbl.
v open
-=-=-=-=-=-=-=-=-=-=-=-=
By the way, I cannot see your attachment? Can some other seen it? It appears as "Mail
Attachment.txt”
Alexandre
On Jan 30, 2014, at 12:08 PM, Vincent Blondeau <vincent.blondeau(a)polytech-lille.net>
wrote:
Thanks for the code !
But there still the issue :
<Mail Attachment.txt>
The text is not on the edge and for an UML diagram, is not readable...
I use your code (with some modifications - See below) to do these visualizations on the
Roassal latest image.
Cheers,
Vincent
Le 30/01/2014 15:15, Alexandre Bergel a écrit :
The problem here is that you are mixing Mondrian
code and Roassal code. It is like putting some C or Assembly code in your Java code. You
can do it, but you need to know exactly what’s going on.
Without Mondrian, you can have:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
| v e1 e2 l lbl |
v := ROView new.
"Change here"
e1 := (ROBox new size: 30; width:200 ) element.
e2 := (ROBox new size: 30; width:200) element.
l := ROLine elementFrom: e1 to: e2.
lbl := (ROLabel text: 'hello world') element.
ROConstraint stick: lbl between: e1 and: e2. "locate the label between 2
nodes"
e1 @ RODraggable.
e2 @ RODraggable.
v add: e1; add: e2; add: l; add: lbl.
v open
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
<Mail Attachment.png>
If you really wish to stick to Mondrian, you can do:
-=-=-=-=-=-=-=-=
| b |
b:= ROMondrianViewBuilder new.
b shape circle size: 30.
"And here"
b nodes: #('Hello world. I use some Mondrian code' 'Hello world. I use some
Mondrian code too').
b edgeFromAssociation: 'Hello world. I use some Mondrian code' -> 'Hello
world. I use some Mondrian code too'.
b open.
b view edges do: [ :edge |
| lbl |
lbl := (ROLabel text: 'hello world') element.
b view add: lbl.
ROConstraint stick: lbl between: edge from and: edge to.
].
-=-=-=-=-=-=-=-=
<Mail Attachment.png>
Cheers,
Alexandre
On Jan 30, 2014, at 6:51 AM, Vincent Blondeau <vincent.blondeau(a)polytech-lille.net>
wrote:
Le 29/01/2014 11:49, Alexandre Bergel a écrit :
Vincent, did it work?
Not really...
The code I use is :
//Node and edges creation
...
view shape label centeredLabel.
labelNode := view node: 'Hello'. "create the label I want between
(it's for the example)"
ROConstraint stick: labelNode between: view edges first from and: view edges first
to. "locate the label between 2 nodes"
view treeLayout.
view open
A text "hello" is displayed but at the begining, the text is misplaced :
<Mail Attachment.txt>
If I move one of the nodes linked to the edge, the text moves to the right location (the
picture at the bottom, shows what I want to do :) )
<Mail Attachment.txt>
But the text doesn't stay on the edge but it's between the left sides of the
nodes...
<Mail Attachment.txt>
Do I use the right method and the right arguments ?
Thanks for helping !
Vincent
Alexandre
_______________________________________________
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
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
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