[Moose-dev] Re: [Roassal]Text on edges ?

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 &lt;vincent.blondeau(a)polytech-lille.net&gt; 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 &lt;vincent.blondeau(a)polytech-lille.net&gt; 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