Hi!
I fixed a bug uncovered by Doru. Not easy to get this formsshape properly working.
If you fix any bugs, let me know.
Does anyone needs to nest a formsshape into another formsshape ? The following script does not work.
-=-=-=-=-=-=-=-=-=-=-=-=
| builder1 builder2 |
builder1 := MOFormsBuilder new.
builder1 row; fill; pref; grow; row; pref.
builder1 column; pref.
builder1 x: 1 y: 1 add: (MORectangleShape new text: [:each | each printString]).
builder1 x: 1 y: 2 add: (MOChildrenShape new).
builder2 := MOFormsBuilder new.
builder2 row; fill; pref; grow; row; pref; row; pref.
builder2 column; pref.
builder2 x: 1 y: 1 add: (MORectangleShape new text: [:each | each printString]).
builder2 x: 1 y: 2 add: (MOChildrenShape new).
builder2 x: 1 y: 3 add: (builder1 asShape).
view shape: builder2 asShape.
view nodes: #(10 20 30 ) forEach: [:each | view nodes: (1 to: each )]
-=-=-=-=-=-=-=-=-=-=-=-=
But I first want to concentrate on the situation we need now.
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel
http://www.bergel.eu^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
Locked
