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
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=