I am usings the code to produce the attached image. view shape: (MOArrowedOrthoVerticalLineShape new). view edges: inheritance from: #superclass to: #yourself.
How do I achieve that with Roassal?
And just to document something I got working... previously to hide lines while keeping the layout I was using... view shape: (MOStraightLineShape new color: Color white). view edgesFrom: [ :xx | xx - 1 ]. and now... (view edgesFrom: [ :xx | xx - 1 ] ) do: [ :edge | edge - ROEdge ] .
cheers -ben
I am working on it. I will commit in a couple of hours hopefully.
Cheers, Alexandre
On Jul 28, 2012, at 8:46 AM, Ben Coman btc@openInWorld.com wrote:
I am usings the code to produce the attached image. view shape: (MOArrowedOrthoVerticalLineShape new). view edges: inheritance from: #superclass to: #yourself.
How do I achieve that with Roassal?
And just to document something I got working... previously to hide lines while keeping the layout I was using... view shape: (MOStraightLineShape new color: Color white). view edgesFrom: [ :xx | xx - 1 ]. and now... (view edgesFrom: [ :xx | xx - 1 ] ) do: [ :edge | edge - ROEdge ] . cheers -ben
<MOArrowedOrthoVerticalLineShape.png>_______________________________________________ Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
I am usings the code to produce the attached image. view shape: (MOArrowedOrthoVerticalLineShape new). view edges: inheritance from: #superclass to: #yourself.
This one gave me a hard time. Update Roassal and try the following: -=-=-=-=-=-=-=-=-=-=-=-= view shape rectangle withText. view nodes: (ROShape withAllSubclasses). view shape: (ROOrthoVerticalLineShape new add: (ROVerticalArrow new offset: 1 )). view edgesFrom: #superclass. view treeLayout. -=-=-=-=-=-=-=-=-=-=-=-=
In the example I have added many examples about arrowed edges.
And just to document something I got working... previously to hide lines while keeping the layout I was using... view shape: (MOStraightLineShape new color: Color white). view edgesFrom: [ :xx | xx - 1 ]. and now... (view edgesFrom: [ :xx | xx - 1 ] ) do: [ :edge | edge - ROEdge ] .
Yep. An example was provided.
Cheers, Alexandre
Your code is now in Roassal 1.92 Thanks for it!
Cheers, Alexandre
On Aug 5, 2012, at 9:35 AM, Ben Coman btc@openInWorld.com wrote:
I have copied the "vertical" methods to operate in the horizontal. See attached...
Name: Roassal-BenComan.271 Time: 5 August 2012, 8:56:38.934 pm UUID: 8763287e-2314-be40-9bfb-5767d5729d9d Ancestors: Roassal-AlexandreBergel.270 Added ROOrthoHorizontalLineShape, ROHorizontalArrow, ROReversedHorizontalArrow. Modified examples to show a several combinations of attachPoint method and offset at once.
cheers -ben
Ben Coman wrote:
It works well. Thanks for you effort.
Alexandre Bergel wrote:
I am usings the code to produce the attached image. view shape: (MOArrowedOrthoVerticalLineShape new). view edges: inheritance from: #superclass to: #yourself.
This one gave me a hard time. Update Roassal and try the following:
view shape rectangle withText. view nodes: (ROShape withAllSubclasses). view shape: (ROOrthoVerticalLineShape new add: (ROVerticalArrow new offset: 1 )). view edgesFrom: #superclass. view treeLayout. -=-=-=-=-=-=-=-=-=-=-=-=
In the example I have added many examples about arrowed edges.
And just to document something I got working... previously to hide lines while keeping the layout I was using... view shape: (MOStraightLineShape new color: Color white). view edgesFrom: [ :xx | xx - 1 ]. and now... (view edgesFrom: [ :xx | xx - 1 ] ) do: [ :edge | edge - ROEdge ] .
Yep. An example was provided.
Cheers, Alexandre
Moose-dev mailing list
Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
<Roassal-BenComan.271.mcz>_______________________________________________ Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
-
Alexandre Bergel -
Ben Coman