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