Cool! Thanks a lot!
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@me.com> wrote:
> We will try to answer you today
>
> Cheers,
> Alexandre
>
>
>
> Le 7 juin 2012 à 17:37, Santiago Vidal <santiago.a.vidal@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@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
>
www.tudorgirba.com
"Every thing has its own flow"
_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev