The attach point are great.
The nest is now working for the callback but is it normal that the
container is not below the box ?
I mean try to put the label in shape1 and the box in shape2 you don't see
the label anymore.
And the lag on layout is still present for me.
On Thu, May 1, 2014 at 10:07 PM, Alexandre Bergel
<alexandre.bergel(a)me.com>wrote;wrote:
Try the last version of Roassal. I think I have fixed
all the issues.
Cheers,
Alexandre
On Apr 30, 2014, at 5:41 AM, Leo Perard <leo.perard(a)gmail.com> wrote:
Hi,
here somes bugs I have found on the RTCompositeShape
- RTNest does not work with the RTCompositeShape
| view shape element els |
view := RTView new.
shape := (RTVerticalCompositeShape new
shape1: RTBox new;
shape2: RTLabel new;
yourself).
element := shape elementOn: 'Container'.
els := (RTEllipse new size: 10; color: (Color blue alpha: 0.5))
elementsOn: (1 to:
16).
view add: element; addAll: els.
element @ RTDraggable.
RTNest new layout: RTGridLayout; on: element nest: els.
view open
- on some layouts there is a "lag" when you re-apply a layout
| view shape elements |
view := RTView new.
shape := (RTHorizontalCompositeShape new
shape1: (RTBox new width: 40; height: 30);
shape2: (RTEllipse new size: 15; color: Color red);
yourself).
elements := shape elementsOn: (1 to: 30).
view addAll: elements.
RTEdge
buildEdgesFromObjects: (1 to: 30)
from: [ :v | v // 2 ]
to: #yourself
inView: view.
RTHorizontalTreeLayout on: elements.
view canvas addMenu: 'Layout' callback: [ RTHorizontalTreeLayout new
translator: RTSmoothLayoutTranslator new; on: elements ].
view open
This example does not have any sense but in my project the graph is
generate
dynamicly so I have to apply a layout anytime there is a new
element ans this "lag" is strange
- RTHorizontalAttachPoint does not work
| view shape elements |
view := RTView new.
shape := (RTHorizontalCompositeShape new
shape1: (RTBox new width: 40; height: 30);
shape2: (RTEllipse new size: 15; color: Color red);
yourself).
elements := shape elementsOn: (1 to: 30).
view addAll: elements.
RTEdge
buildEdgesFromObjects: (1 to: 30)
from: [ :v | v // 2 ]
to: #yourself
using: (RTLine new attachPoint: RTHorizontalAttachPoint new;
color: Color
blue)
inView: view.
RTHorizontalTreeLayout on: elements.
view canvas addMenu: 'Layout' callback: [ RTHorizontalTreeLayout new
translator: RTSmoothLayoutTranslator new; on: elements ].
view open
For now I have found this bugs. If I find more, I will report them here
;-)
--
Cheers,
Leo Perard
University of Lille 1
_______________________________________________
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
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev