Well... You will need to manually assign the color to the nodes. I've just made the following example: Alpha is interesting to make translucent colors. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-= view shape rectangle borderColor: Color veryVeryLightGray. view nodes: (T copyFrom: 1 to: 10) forEach: [ :aClass | view shape rectangle borderColor: Color white. view nodes: aClass methods. view shape line color: (Color blue alpha: 0.2). view edges: aClass methods from: #yourself toAll: [ :m | m queryAllOutgoingInvocations opposites asArray ]. view gridLayout. ]. view gridLayout. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-= -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.