Le 30/01/2014 19:04, Alexandre Bergel a écrit :
Well seen!
Thanks for the patch !
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”
Actually it's an image I drag & drop to Thunderbird. I can see it integrated in the mail received from the Moose List both in google than Thunderbird.
Vincent
Alexandre
On Jan 30, 2014, at 12:08 PM, Vincent Blondeau vincent.blondeau@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@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 openA 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@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
Moose-dev mailing list
Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev