Here is a possible example:
| browser |
browser := GLMTabulator withStatusbar.
browser column: #one; column: #two.
browser transmit to: #one; andShow: [ :a |
a list
display: [:x | 1 to: x ];
selectionAct: [:list |
| value |
value := list selection * 10. "simulate some custom setup"
(list pane port: #customSelection) value: value ]
entitled: 'Multiply by 10 and then send outside'
].
browser transmit to: #two; from: #one port: #customSelection; andShow: [ :a |
a roassal
title: 'Numbers in Roassal';
painting: [:view :number |
view shape label.
view nodes: (1 to: number).
view gridLayout ]].
browser openOn: 42
Cheers,
Doru
On Fri, Jun 8, 2012 at 11:20 AM, Alexandre Bergel
<alexandre.bergel(a)me.com> wrote:
We will try to answer you today
Cheers,
Alexandre
Le 7 juin 2012 à 17:37, Santiago Vidal <santiago.a.vidal(a)gmail.com> a
écrit :
Hi,
I'm trying to open a Roassal visualization in glamour. I have the following
script:
| browser action|
browser := GLMTabulator new.
browser
row: [ :r | r column: #columnA; column: #columnB ];
row: #seconRow.
browser transmit to: #columnA; andShow: [ :a |
a list display: [#('Value 1' 'Value 2' 'Value 3') ];
dynamicActionsOnSelection: [:list | self actionsFor: list ]
].
browser transmit from: #columnA; to: #columnB; andShow: [ :a |
a list titleIcon: GLMUIThemeExtraIcons glamorousBrowse
;title:'Data'; display:#('data A' 'data B' 'data C').
].
browser openOn: MooseModel root allModels anyOne.
actionsFor: aPresentation
|actions|
actions:=OrderedCollection new.
actions add: ((GLMGenericAction new)
action: [:each |AMerlinWizard openWizard(each selection)];
title: 'Open visualization';
yourself).
^actions.
Specifically, when I click in the option "Open visualization" of the popup
menu (see dynamicActionsOnSelection) a Merlin Wizard is opened (there are
some options that the user has to select) to create a Roassal (or Mondrian)
visualization. Currently, I'm creating the visualization in a new view.
However, I would like to open it in the #seconRow pane. Someone please could
tell me how I can accomplish this? Thanks
Cheers
Santiago
--
Santiago Vidal
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--
www.tudorgirba.com
"Every thing has its own flow"