Thank you, the example now works. However as I've mentioned in previous post I'm not sure about the rest of the shapes posted in the attachment. E.g. I haven't seen any notion of "box with rounded corners". I could compose it from four RTArc nad four RTLine but it seems to me overly complex compared to creating new Trachert/Roassal classes. The same would go for the other shapes. What are your thoughts/recommendations on that?
Peter On Sun, Jul 13, 2014 at 3:25 PM, Alexandre Bergel <alexandre.ber...@me.com> wrote: > Sorry, the version was not properly saved in SmalltalkHub. If you update > Roassal2 and Trachel, you should be able to execute the code snippet I’ve > sent you. Maybe you want to add “v open” at the end. If you are using > GTInspector, this is not necessary. > > As far as I understand your description of the problem, you do not need to > create your own shape. > > Let me know how it goes. > > Cheers, > Alexandre > > > On Jul 13, 2014, at 10:38 AM, Peter Uhnák <i.uh...@gmail.com> wrote: > >> Thank you both for suggestions. >> >> According to Monticello I have latest Roassal2 and yet I don't see >> RTMultiCompositeShape, but I would assume it should be what I was looking >> for originally. >> >> In the meantime I chose to do it manually - creating a custom shape in both >> Roassal and Trachert: >> I've done it in a single path because it seems that having multiple separate >> paths just creates more trouble. >> ======== >> computePath >> canvas ifNil: [ ^ self ]. >> path := self athensCanvas >> createPath: [ :builder | >> builder absolute. >> self ccwCirclePath: builder radius: 0.5. "building >> circular path with specified radius" >> self cwCirclePath: builder radius: 0.48. >> self ccwCirclePath: builder radius: 0.4 ] >> ======== >> >> But even if I could manage to do this with MultiCompositeShape I'm not sure >> about the rest of the shapes (see attachment). >> >> Peter >> >> >> >> >> On Sun, Jul 13, 2014 at 1:18 AM, Alexandre Bergel <alexandre.ber...@me.com> >> wrote: >> Hi Peter, >> >> I am not sure what you try to do. Having two ellipses with the same center? >> But different radius? >> >> Something like that maybe: >> -=-=-=-=-=-=-=-=-= >> | v | >> v := RTView new. >> v @ RTDraggableView. >> >> shape := RTMultiCompositeShape new. >> shape add: (RTEllipse new color: (Color yellow alpha: 0.3); size: [:c | c >> numberOfMethods sqrt * 10 ]). >> shape add: (RTEllipse new color: (Color green alpha: 0.3); size: [:c | c >> numberOfLinesOfCode sqrt * 10 ]). >> >> v addAll: (shape elementsOn: RTShape withAllSubclasses). >> RTFlowLayout on: v elements. >> >> v >> -=-=-=-=-=-=-=-=-= >> >> <Screen Shot 2014-07-13 at 1.18.36 AM.png> >> >> Alexandre >> >> >> On Jul 11, 2014, at 11:05 PM, Peter Uhnák <i.uh...@gmail.com> wrote: >> >>> Hi >>> >>> I'm trying to draw an ellipse inside another ellipse but to no avail. I've >>> tried using RTCompositeShape but that just expands the size of the smaller >>> shape. Is there something else I'm missing (like fixing dimensions so they >>> won't get updated) or should I subclass RTAbstractCompositeShape and try to >>> make something on my own? >>> >>> Thanks, >>> Peter >> >> -- >> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: >> Alexandre Bergel http://www.bergel.eu >> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. >> >> >> >> >> <shapes.png> > > -- > _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: > Alexandre Bergel http://www.bergel.eu > ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. > > > >
