Roassal scroll bar builder

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
3 messages Options
Reply | Threaded
Open this post in threaded view
|

Roassal scroll bar builder

Pierre Chanson
Hi all,

RTScrollBarBuilder allows you to add a scalable scroll bar or scroll pad to your Roassal view.

see examples in RTScrollBarBuilderExamples, or try to execute this in a workspace:

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
b := RTMondrian new.
    b shape rectangle
                withBorder;
                width: [ :cls | cls numberOfVariables * 5];
                height: #numberOfMethods;
                linearFillColor: #numberOfLinesOfCode within: RTObject withAllSubclasses.
    b nodes: RTObject withAllSubclasses.
    b edges connectFrom: #superclass.
    b layout tree.
    b build.


b2 := RTScrollBarBuilder new.
b2 view: b view.
b2 objects: b view elements.
b2 build inspect
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

Feedbacks are welcome !

cheers,

Pierre





Reply | Threaded
Open this post in threaded view
|

Re: Roassal scroll bar builder

Offray
Hi,

Seems pretty interesting. I have an odd behaviour though. Besides the
lateral view in the playground, a new window called "Inspector on a
RTView" is created. When I move the scroller on that new window, the
view in the right part of the playgrond starts to move. Please test what
happens when you move the scroller in the new window to see it for yourself.

Hope it helps,

Offray

El 04/03/15 a las 09:21, Pierre CHANSON escribió:

> Hi all,
>
> RTScrollBarBuilder allows you to add a scalable scroll bar or scroll pad to your
> Roassal view.
>
> see examples in RTScrollBarBuilderExamples, or try to execute this in a workspace:
>
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> b := RTMondrian new.
>       b shape rectangle
>                   withBorder;
>                   width: [ :cls | cls numberOfVariables * 5];
>                   height: #numberOfMethods;
>                   linearFillColor: #numberOfLinesOfCode within: RTObject
> withAllSubclasses.
>       b nodes: RTObject withAllSubclasses.
>       b edges connectFrom: #superclass.
>       b layout tree.
>       b build.
>
>
> b2 := RTScrollBarBuilder new.
> b2 view: b view.
> b2 objects: b view elements.
> b2 build inspect
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>
> Feedbacks are welcome !
>
> cheers,
>
> Pierre
>
>
>
> ​
>


Reply | Threaded
Open this post in threaded view
|

Re: Roassal scroll bar builder

Pierre Chanson
Hi Ofrray, yes it is due to view inspect inspect.
Actually I already wrote a "b view inspect", so you just have to execute the code, but if you inspect it, you get inspector on inspector.

There is always this behavior, due to a <anRTView> signalUpdate, embedded with the events, that will affect the view on your last inspector. In the others, (if you do inspect inspec inspect...) the events will occur but you don't see them in real time. If you refresh the view you will see that these events happened.

Pierre 

2015-03-04 23:44 GMT-03:00 Offray Vladimir Luna Cárdenas <[hidden email]>:
Hi,

Seems pretty interesting. I have an odd behaviour though. Besides the lateral view in the playground, a new window called "Inspector on a RTView" is created. When I move the scroller on that new window, the view in the right part of the playgrond starts to move. Please test what happens when you move the scroller in the new window to see it for yourself.

Hope it helps,

Offray

El 04/03/15 a las 09:21, Pierre CHANSON escribió:

Hi all,

RTScrollBarBuilder allows you to add a scalable scroll bar or scroll pad to your
Roassal view.

see examples in RTScrollBarBuilderExamples, or try to execute this in a workspace:

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
b := RTMondrian new.
      b shape rectangle
                  withBorder;
                  width: [ :cls | cls numberOfVariables * 5];
                  height: #numberOfMethods;
                  linearFillColor: #numberOfLinesOfCode within: RTObject
withAllSubclasses.
      b nodes: RTObject withAllSubclasses.
      b edges connectFrom: #superclass.
      b layout tree.
      b build.


b2 := RTScrollBarBuilder new.
b2 view: b view.
b2 objects: b view elements.
b2 build inspect
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

Feedbacks are welcome !

cheers,

Pierre