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.
> 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 <
[hidden email]> 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 <
[hidden email]> 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>