10 Aug
2010
10 Aug
'10
7:04 a.m.
Hi,
Indeed, it starts to look good :).
Now, the problem is that the two shapes are drawn on top of each other.
We need to translate the canvas when drawing the children shape.
Cheers,
Doru
On 10 Aug 2010, at 02:23, Alexandre Bergel wrote:
Hi!
I may have fixed up the thing.
Could you try:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
| builder childrenShape titleShape umlClassShape |
childrenShape := MOChildrenShape new.
titleShape := MORectangleShape new text: 'Title'.
builder := MOFormsBuilder new.
builder column; center; fill; pref; grow.
builder row; center; pref; fill; grow; row; center; fill; pref; grow.
builder x: 1 y: 1 add: titleShape.
builder x: 1 y: 2 add: childrenShape.
umlClassShape := builder asShape.
view nodeShape: umlClassShape.
view nodes: (1 to: 3) forEach: [:each |
view nodes: (1 to: 10) ]
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
This is the same code, except that I removed the transparent color.
Cheers,
Alexandre
On 9 Aug 2010, at 08:22, Tudor Girba wrote:
--
www.tudorgirba.com
"We cannot reach the flow of things unless we let go."
Hi Alex,
I would need your help in introducing the ChildrenShape. Without
this, the FormsBuilder is highly underutilized.
The problem I have is that currently the drawing of the nested
graphs is handled on the Figure side, while it should be handled by
the Shape. So, I would need your help to move this behavior while
still preserving the caching logic.
The ChildrenShape should then override the display:on: to display
these elements.
Would you have time to look into this?
For example, the following code should define a umlClassShape:
| builder childrenShape titleShape umlClassShape |
childrenShape := MOChildrenShape new.
titleShape := MORectangleShape new text: 'Title'; fillColor: Color
transparent.
builder := MOFormsBuilder new.
builder column; center; fill; pref; grow.
builder row; center; pref; fill; grow; row; center; fill; pref; grow.
builder x: 1 y: 1 add: titleShape.
builder x: 1 y: 2 add: childrenShape.
umlClassShape := builder asShape.
view nodeShape: umlClassShape.
view nodes: (1 to: 3) forEach: [:each |
view nodes: (1 to: 10) ]
Cheers,
Doru
--
www.tudorgirba.com
"Not knowing how to do something is not an argument for how it
cannot be done."
_______________________________________________
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