Roassal forms+edges

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|

Roassal forms+edges

rosariosm
Hi,

I'm trying to do a visualization that shows a group of twitter users connected to each other. It shows the images from the users but when i add the edges, the images dissapear.

Here's the code:

view := RTView new.
e1 := RTElement on: user1.
e2 := RTElement on: user2.

elements := OrderedCollection newFrom: {e1. e2}.

elements do: [ :e |
        | label shape form edge |
        label := RTLabel new text: e1 model name.
         form := Form fromFileNamed: 'aFilename'.
        shape := RTBitmap new form: form.
        e + (RTVerticalCompositeShape new shape1: shape; shape2: label) ].

       
line := RTArrow new color: Color red.
view add: (line edgeFrom: e1 to: e2 ).

view addAll: elements.
view open.



View without edges
View with edges




Anyone know how to fix this (show both images and edges)??

Thanks,
Rosario


 
 
Reply | Threaded
Open this post in threaded view
|

Re: Roassal forms+edges

rosariosm
Now the second image (view with edges) shows little triangles with the form i added. When i move this triangles, i can see parts of the picture. What are this triangles and how could i resize them?



Cheers,
Rosario