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@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 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@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

--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.




_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev