RTCompositeShape - Bugs found

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 <[hidden email]> 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
> [hidden email]
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev

--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.



_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.iam.unibe.ch/mailman/listinfo/moose-dev