28 Jul
2013
28 Jul
'13
11:36 p.m.
It is interesting.
Even though, apparently you may want to use the classical nesting for this. The very first
thing I've tried to do is to drag and drop a node, but nodes do not stay grouped when
drag and dropping.
I do not understand how ROMixingLayout operates. Can you write some simple tests that are
not about visualizing compile methods?
For example, I've tried this:
view shape rectangle color: Color red; size: 20.
view nodes: (0 to: 21).
view edgesFrom: [ :v | v \\ 3 ].
view shape rectangle color: Color green; size: 20.
view nodes: (100 to: 121).
view layout: (ROMixingLayout withInner: (ROGridLayout new) outer: ROTreeLayout new
groupBy: [:v | v + 100 ]).
I get an error and I do not understand why.
Alexandre
On Jul 25, 2013, at 8:07 AM, mathieubmddehouck(a)mailoo.org wrote:
Ok maybe I have something.
Gofer it
smalltalkhubUser: 'MathieuDehouck' project: 'RoassalAlgorithm';
package: 'RoassalAlgorithm';
load.
Then try :
"Source code: ROMondrianExample>>treeLayoutOn:"
"Preambule. It includes the initialization. "
| view rawView |
rawView := ROView new.
view := ROMondrianViewBuilder view: rawView.
"-------------"
"-------------"
view shape rectangle size: 45 ; color: Color green.
view nodes: Magnitude withAllSubclasses.
view edgesFrom: #superclass.
view shape rectangle size: 20; color: Color blue.
view nodes: ( Magnitude withAllSubclasses flatCollect: [ :e | e methodDict values ] )
.
"view edgesFrom: [ :e | [e superclass] on: Exception do: [ e methodClass ]
]."
view layout: (ROMixingLayout withInner: (RORectanglePackingLayout new padding: 5)
outer: RORadialTreeLayout groupBy: [ :e | e methodClass ] ).
"view edges do: [ :e | e - ROLine ]."
"-------------"
"-------------"
"Below is the initiation of the menu and opening the visualization"
ROEaselMorphic new populateMenuOn: view.
view open
Must bring you something like that the picture.
Regards
Mathieu
<mixing RadialTree with
RectanglePacking.jpg>_______________________________________________
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
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.