1
Automation Interface, Add-Ins and Tools / Vertical fork/join
« on: May 27, 2005, 08:38:27 am »
I have to create a vertical fork/join in a new diagram by using Vb6 automation interface...
I just can create it horizontally, this is my code example:
Dim Pack As EA.Package
Dim FJoin As DiagramObject
Dim JoinElem As Element
dim d as EA.Diagram
Set JoinElem = Pack.Elements.AddNew("", "Synchronization")
JoinElem.Update
Set FJoin = d.DiagramObjects.AddNew("l=20;r=50;t=100;b=130", "")
FJoin.ElementID = JoinElem.ElementID
FJoin.Update
Can anyone help me to make this fork/join synchronization in vertical way???
I just can create it horizontally, this is my code example:
Dim Pack As EA.Package
Dim FJoin As DiagramObject
Dim JoinElem As Element
dim d as EA.Diagram
Set JoinElem = Pack.Elements.AddNew("", "Synchronization")
JoinElem.Update
Set FJoin = d.DiagramObjects.AddNew("l=20;r=50;t=100;b=130", "")
FJoin.ElementID = JoinElem.ElementID
FJoin.Update
Can anyone help me to make this fork/join synchronization in vertical way???