thanks yuri Now I would like the shape not to be influenced by the text.
view shape withoutBorder. view nodes: packageGroup forEach: [ :pak | view shape label text: [:p | (MalKontractor toSize: 4) reduce: p name ] . view interaction forward. view node: pak. view shape rectangle size: pak numberOfClasses. view interaction forward. view node: pak. view verticalLineLayout. ]. view gridLayout.
Alexandre
So far I have the impression that I should spend a month or two to build my own tools and this depressed me so much….
Stef
On Dec 7, 2013, at 7:23 PM, Yuriy Tymchuk yuriy.tymchuk@me.com wrote:
On 07 Dec 2013, at 19:06, Stéphane Ducasse stephane.ducasse@inria.fr wrote:
Ok but my script (which does not work is
view shape rectangle size: [:each | each classes size * 5 ]. view shape withCenteredText: [:each | (MalKontractor reduce: each name upTo: 8) ]. view nodes: packageGroup. view gridLayout
how do I turn that in roassal.
Where can I find an example? Is there a roassal easel? or is the roassal easel bot for mondrian and roassal?
Oh, ok.
rawView := view raw. rawView addAll: (ROElement forCollection: packageGroup).
rawView elements do: [ :el | el size: el model classes size * 5. el + ROBorder. el + (ROCenteredLabel text: [ MalKontractor reduce: el model name upTo: 8 ]) ].
ROGridLayout on: rawView elements.
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
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev