Object Model Reference : Classes : C : Connector : Properties : Connector.EndPoint |
Property EndPoint As SnapPoint
Member of Connector
The EndPoint property returns or specifies the ending point of the connector object. This ending point is a snap point. For example, EndPoint(5) begins the connector line at the fifth snap point of the object.
The following VBA example sets the reference point of the document to the lower-left corner and creates a new snap point with coordinates (1, 6), one inch above and six inches to the right of the reference point. A rectangle and ellipse are created, and a connector line is drawn between them, starting at the ninth snap point of the rectangle to the first snap point of the ellipse.
Sub PointStart() |
Dim sp As New SnapPoint |
Dim s1 As Shape, s2 As Shape, c As Shape |
ActiveDocument.ReferencePoint = cdrBottomLeft |
sp.PositionX = 1 |
sp.PositionY = 6 |
Set s1 = ActiveLayer.CreateRectangle(0, 0, 3, 3) |
Set s2 = ActiveLayer.CreateEllipse(4, 4, 6, 1) |
Set c = ActiveLayer.CreateConnector(s1.SnapPoints(2), s2.SnapPoints(1)) |
c.Connector.StartPoint = s1.SnapPoints(2) |
c.Connector.EndPoint = s2.SnapPoints(1) |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.