[Moose-dev] Roassal2 with RTShowLabel interaction

Hi,

Roassal2 has new interaction RTShowLabel witch dynamically shows labels the same way RTShowEdge shows edges. It uses RTLabelled for placing labels.

Example: -=-=-=- RTExample new dynamicLabels -=-=-=- | view elements | view := RTView new. elements := RTEllipse new size: 30; elementsOn: (1 to: 20). view addAll: elements. RTCircleLayout new initialRadius: 150; on: elements. elements @ (RTShowLabel new highlight: [ :value | value - 5 to: value + 5]; center; yourself). elements @ (RTShowEdge new connectTo: [ :value | value - 5 to: value + 5]; shape: (RTLine new color: (Color blue alpha: 0.4))). view open -=-=-=-

Picture:

Cheers, Juraj