Dear All,
Here is a preview of what we will demonstrate at ESUG.
Best is to see it live try this:
-=-=-=-=-=-=-=-=-=-=-=-= b := RTBundleBuilder new. b from: {TRObject. TRTest} using: #subclasses. b edges shape line color: Color black. b bezier color: (Color blue alpha: 0.5). b useBezierlineWith: #dependentClasses. b build. lb := RTLegendBuilder new. lb view: b view; right. lb addText: 'RTBundleBuilder: TRObject and TRTest subclasses'. lb addColor: Color black text: 'Hierarchy'. lb addColor: (Color r: 0 g: 120 b: 0 range: 255) text: 'Dependent classes'. lb addColor: Color red text: 'Senders'. lb build. b view -=-=-=-=-=-=-=-=-=-=-=-=
A very short video is available on: https://vimeo.com/131891902 https://vimeo.com/131891902
Cheers, Alexandre