Re: MOFormsBuilder asLayout
by Alexandre Bergel
Personally, I also find MOFormsBuilder>>asLayout a bit mysterious.
A table can be created using two different ways. Open an MOEasel and
doit:
This uses FormsBuilder.
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
| builder |
builder := MOFormsBuilder new.
builder column; column; row; row; row.
builder x: 1 y: 1 add: (MOLabelShape new text: 'hello').
builder x: 2 y: 1 add: (MOLabelShape new text: 'world').
builder x: 1 y: 2 add: (MOLabelShape new text: 'hello').
builder x: 2 y: 2 add: (MOLabelShape new text: 'world').
builder x: 1 y: 3 add: (MOLabelShape new text: 'hello').
builder x: 2 y: 3 add: (MOLabelShape new text: 'world').
view shape: builder asShape.
view nodes: (1 to: 5).
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
view nodes: (1 to: 5) forEach: [:each|
view nodes: (1 to: 3) forEach: [:each2 |
view shape label.
view nodes: #('hello' 'world').
view horizontalLineLayout.
].
view verticalLineLayout.
]
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
or a more elaborated version:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
view shape rectangle withoutBorder.
view nodes: (1 to: 5) forEach: [:each|
view shape rectangle withoutBorder.
view interaction forwarder.
view nodes: (1 to: 3) forEach: [:each2 |
view shape label.
view interaction forwarder.
view nodes: #('hello' 'world').
view horizontalLineLayout gapSize: 0.
].
view verticalLineLayout gapSize: 0.
]
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
A similar version with asLayout could be:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
| builder |
builder := MOFormsBuilder new.
builder column; column; row; row; row.
builder x: 1 y: 1 add: (view node: #notUsed forIt: [view shape label.
view node: 'hello']).
builder x: 2 y: 1 add: (view node: #notUsed forIt: [view shape label.
view node: 'hello']).
builder x: 1 y: 2 add: (view node: #notUsed forIt: [view shape label.
view node: 'hello']).
builder x: 2 y: 2 add: (view node: #notUsed forIt: [view shape label.
view node: 'hello']).
builder x: 1 y: 3 add: (view node: #notUsed forIt: [view shape label.
view node: 'hello']).
builder x: 2 y: 3 add: (view node: #notUsed forIt: [view shape label.
view node: 'hello']).
view layout: builder asLayout.
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Note that these pieces of code are meant to be run in PhaMondrian
Cheers,
Alexandre
On 2 Jul 2009, at 20:21, Simon Denier wrote:
> Tu pourrais m'expliquer succinctement le principe du MOFormsBuilder
> asLayout
>
> J'essaie de construire une table avec mais je tatonne a partir des
> exemples, c'est chiant.
>
> --
> Simon
>
>
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
14 years, 2 months
Improving moose task list
by stephane ducasse
Hi all
wednesday we will do a meeting to come up with a list of concrete
tasks of different length
to improve moose. We are looking for your input.
If you have bug, a wish, an idea, a scenario please let us know.
Cyrille Delaunay will start in October to code on Moose to really
improve.
I will also start to program regularly on Moose to push it further.
We will make our list of taks publicly available and start to really
use the bugtracker and
infrastructure.
The goal is to make Moose much more usable.
Doru what is the status of Glamour on Pharo?
Stef
14 years, 2 months
exportMSE in PharoMoose
by Laval Jannik
Hi all,
I would like to export a MooseModel in MSE.
I use method "MooseModel>>exportMSEToFile".
But there is an error.
So, I have replaced the line
stream := filename asFilename writeStream.
by:
stream := (FileStream newFileNamed: filename).
Now, I have a doesnotunderstand exception on Text>>fm3PrintOn:
Can anyone help me ?
Cheers
---
Jannik Laval
PhD Student - Rmod Team - INRIA
Certified Project Management Associate (IPMA)
http://www.jannik-laval.eu
http://rmod.lille.inria.fr
---
14 years, 2 months
back :)
by Tudor Girba
Hi,
I am back from holidays and I will invest the rest of this month into
making a Moose release based on Pharo. If you are willing to help,
please let me know.
I will follow up with more details.
Cheers,
Doru
--
www.tudorgirba.com
"Yesterday is a fact.
Tomorrow is a possibility.
Today is a challenge."
14 years, 2 months
Quote from Guy Steele
by Alexandre Bergel
"So I think the sole way to win is to plan for growth with help from
users"
Keynote Speech, OOPSLA'98
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
14 years, 2 months
