18 Mar
2008
18 Mar
'08
9:14 p.m.
There are two ways in which you can compose shapes:
1. decoration provides a very simple composition. In your case it
would be:
view newShape rectangle; withBorder; withLabel; text: #name.
view nodes: mooseModel allClasses.
view edgesFrom: #superclass.
view treeLayout.
2. using the FormsBuilder. This more complex, but it is very flexible.
In your case, it would be:
| builder |
builder := Mondrian.FormsBuilder new.
builder
row; fill; pref; grow;
row; size: 3;
row; fill; pref; grow.
builder column; fill; pref; grow.
builder x: 1 y: 1 add: (Mondrian.RectangleShape withBorder).
builder x: 1 y: 3 add: (Mondrian.LabelShape new label: #name).
view shape: builder shape.
view nodes: classGroup.
You can see examples in ViewRendeder>>umlClassShapeWithLabel: or in
ViewRenderer>>umlPackageShapeWithLabel:
Cheers,
Doru
On Mar 18, 2008, at 8:56 PM, Alexandre Bergel wrote:
Excellent!
And if I want to have the name below a box ?
Typically, I would like to have
http://moose.unibe.ch/tools/mondrian/easel?
_s=JksTBcIBfSanPmPz&_k=qJyPhpHC&_n&44
with the name of the entity below. I find that using the mouse to
know a name of a class a bit cumbersome.
how can I attach a label to a class box :-)
Alexandre
On 18 Mar 2008, at 15:42, Tudor Girba wrote:
--
www.tudorgirba.com
www.tudorgirba.com/blog
"Problem solving efficiency grows with the abstractness level of
problem understanding."
Hi,
You should use "view newShape" before the "view nodes:" or
"view
edges:". nodes:forEach: is used for specifying the graphs inside the
node.
Try something like this:
view newShape label text: #name.
view nodes: mooseModel allClasses.
view edgesFrom: #superclass.
view treeLayout.
Cheers,
Doru
On Mar 18, 2008, at 8:38 PM, Alexandre Bergel wrote:
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
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 Dear list,
Mondrian is a great tool :-)
I have a question, how can I add a label under a box. I tried the
following script:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
view nodes: mooseModel allClasses forEach: [:each |
view newShape label text: #name.
view verticalLineLayout.
].
view edgesFrom: #superclass.
view treeLayout.
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
But I still have unlabeled boxes...
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
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
--
www.tudorgirba.com
www.tudorgirba.com/blog
"Some battles are better lost than fought."
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev