How to use TailEnd property of an arrow in CATVBA?

[mandarparab18]

Hi,

I have instantiated 2D component in drawing sheet. I want to attach an Arrow (Drawing Arrow) to it using CATVBA so that 2D component will be associative with arrow.
I tried to use TailEnd property of Arrow, but it did not work.

Dim o2DComponents As DrawingComponents
Set o2DComponents = dvView.Components

Dim o2DComponent As DrawingComponent
Set o2DComponent = o2DComponents.Add(Ditto1, DittoCoordinates(0), DittoCoordinates(1))

Dim drArrow As DrawingArrow
Set drArrow = dvView.Arrows.Add(Arrow(x), Arrow, o2DComponent.X, o2DComponent.Y)

drArrow.TailTarget = o2DComponent

Please suggest how to make arrow(DrawingArrow) associative with 2DComponent(DrawingComponent).

Regards,
Mandar

 

[mandarparab18]

Hi,

I tried adding arrow with reference to 2DComponent instance in drawing sheet and found that the arrow remains associative with 2DComponent.
If i do it using catvba, arrow and 2DComponent remains non-associative. Is there any way to make these two objects associative?

Regards,
Mandar