Hi!Pierre did an excellent work on having gradient lines.-=-=-=-=-=-=-=-=-=-=| v elem1 elem2 edge |
v := RTView new.
elem1 := (RTEllipse new color: (Color blue alpha:0.3); size:20) elementOn: 1.
elem2 := (RTEllipse new color: (Color red alpha:0.9); size:20) elementOn: 2.
elem2 translateBy: 300@0.
v add: elem1.
v add: elem2.
edge := RTEdge from:elem1 to:elem2.
v add: (edge + (RTGradientColoredLine new colors: (Array with: (elem1 color) with: (elem2 color)); precision: 100; gradientColorShape)).
v open-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=| v elem1 elem2 edge |
v := RTView new.
elem1 := (RTEllipse new color: (Color red alpha:0.3); size:20) elementOn: 1.
elem2 := (RTEllipse new color: (Color red alpha:0.9); size:20) elementOn: 2.
elem2 translateBy: 300@0.
v add: elem1.
v add: elem2.
edge := RTEdge from:elem1 to:elem2.
v add: (edge + (RTGradientColoredLine new colors: (Array with: (elem1 color) with: (elem2 color)); precision: 100; gradientColorShape)).
v open-=-=-=-=-=-=-=-=-=-=Feedback are welcomed!Pierre & Alexandre--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev