Thank you, the example now works. However as I've mentioned in
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
classes. The same would go for the other shapes. What are your
> 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 <
[hidden email]> 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 <
[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>
>
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel
http://www.bergel.eu> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>