Hi Alex,
I have some problems with displaying edges.
I have difficulties to reproduce things outside my application. But I am
trying to add arrows. So when I do:
(RTLine new color: Color red) + (RTSimpleArrowHead new color: Color red),
the text that follow the + brake my visualization: the arrow is wrongly
placed.
If I remove the + (RTSimpleArrowHead new color: Color red), it works fine.
When I tried to reproduce it, I created an example that does not work, I do
not understand why:
===
b := RTGraphBuilder new.
shape := RTShapeBuilder new.
shape shape: (RTEllipse new color: Color gray; size: 40).
el := (RTElement on: 1).
el + shape.
b view add: el.
el2 := (RTElement on: 2).
el2 + shape.
b view add: el2.
l := RTEdge from: el to: el2.
b view add: l.
RTCellLayout on: b view elements.
b build.
b open
===
--
~~Jannik Laval~~
École des Mines de Douai
Enseignant-chercheur
http://www.jannik-laval.eu
http://www.phratch.com
http://www.approchealpes.info
http://car.mines-douai.fr/