2015-11-27 46 views
0

有沒有辦法在這個方法?:選擇「銷」連接到另一個連接器的引腳

Application.ActiveWindow.Page.Shapes.ItemFromID(1).AutoConnect 

我想連接兩個形狀,然後我想連接第三個到創建的連接,但不是在開始時,我需要將它連接到第四個引腳。這是我有: enter image description here
這是我想擁有的一切: enter image description here

任何想法?

回答

0

要獲得形狀的中心,我們必須使用這條線。

Set object = AppVisio.ActiveWindow.Page.Shapes.ItemFromID(objectId) 
connectingXfrom = object .CellsU("PinX").Result("in") 
connectingYfrom = object .CellsU("PinY").Result("in") 

形狀的中心對象是在點C [connectingXfrom,connectingYfrom]

接下來兩行移動連接器到P點的第一個點[connectingXfrom,connectingYfrom]

Application.ActiveWindow.Page.Shapes.ItemFromID(connectorShapeId).CellsSRC(1, 4, 0).FormulaU = connectingXfrom 
Application.ActiveWindow.Page.Shapes.ItemFromID(connectorShapeId).CellsSRC(1, 4, 1).FormulaU = connectingYfrom 

如果我們要開始連接連接1但接近對象2,我們需要做的:

connectingXfrom = connectingXfrom - someDistanceValue 
  • someDistanceValue可以是例如1.5
  • 的ObjectID是對象2的形狀的標識
  • connectorShapeId是連接2形狀中的ID。