Great job!
Doru
On Fri, Jun 26, 2015 at 8:51 PM, Alexandre Bergel <alexandre.bergel(a)me.com>
wrote:
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
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel
http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.