Hi Paul,Is there a way to hide all the edges pointing to a node unless the node is Yes! A couple of weeks ago we introduced this functionality. Consider: -=-=-=-=-=-=-=-=-=-=-=-=-=-=-= associations := OrderedCollection new. associations add: 1 -> 2; add: 1 -> 3; add: 2 -> 3; add: 1 -> 4. view interaction dynamicEdge: [ :model | associations select: [ :as | as key = model ] thenCollect: #value ] using: (ROLine arrowed color: Color red). view shape rectangle size: 20. view nodes: (1 to: 4). view circleLayout. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-= What it looks like: Or the following script: -=-=-=-=-=-=-=-=-=-=-=-=-=-=-= dep := Dictionary new. dep at: #Layer1 put: #(Layer2 Layer3 Layer5). dep at: #Layer2 put: #(Layer1 Layer3 Layer4 Layer5). dep at: #Layer3 put: #(Layer1 Layer2 Layer4 Layer5). view interaction dynamicEdge: [ :model | dep at: model ifAbsent: [ #() ] ] using: (ROLine arrowed color: Color red). view shape rectangle withText. allNodes := Set new. allNodes addAll: dep keys. dep values do: [ :v | allNodes addAll: v ]. view nodes: allNodes. view circleLayout. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Here what it looks like: Edges disappear when the mouse leaves a node. Few other related examples: ROMondrianExample new highlightUsingBezier. ROMondrianExample new dynamicEdge3WithOffset. Cheers, Alexandre
-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. |
- [Pharo-project] Any wishes for Roassal? Alexandre Bergel
- Re: [Pharo-project] Any wishes for Roassal? Serge Stinckwich
- Re: [Pharo-project] Any wishes for Roassal? Paul DeBruicker
- Re: [Pharo-project] Any wishes for Roassal? Alexandre Bergel
- Re: [Pharo-project] Any wishes for Roassal? stephane ducasse
- Re: [Pharo-project] Any wishes for Roassal? Camillo Bruni