Finding Line Length

[Karl@CP PISTONS]

Hello All, I am creating a program that I need to report the length of a series of lines. I am using the SelectionManagerExample as a test bed. I have  it working for line selection as evidenced by the output of this:

Dim line = UtilityService.AskForLineGeometry()
                DialogManager.OK(CType(IIf(Not line Is Nothing, ApplicationStrings.SelectedLine, ApplicationStrings.NothingSelected), String), ApplicationStrings.SelectALine)
                Dim Level As Integer
                Level = line.Level
                MsgBox("Level of the selected Line is " & Level, vbOKOnly) - Reports the correct level here proving I have a valid line

and the UtilityService.AskForLineGeometry is this:

Friend Function AskForLineGeometry() As LineGeometry
        ' Cast the return Geometry type to  an explicit LineGeometry, this is fine because we are masking on Line only
        Return TryCast(AskUser(ApplicationStrings.SelectALine, New GeometryMask(False, True, False, False, False, False, False, False)), LineGeometry)
    End Function

Looking at the Net-Hook API ref I see LineLength property in the index but it looks as if it is ONLY for the LeadInOutEntryExitParams. LineLength

Is there an easy way to report back the actual  length of the selected line? Seems that there is spline.length and not a line.length

 

[Guest]

Karl,

LineGeometry takes a Line3D or 2 3D Points as a constructor, try comparing the two 3d points.

Mastercam::Math::VectorManager::Distance(Mastercam::Math::Point3D, Mastercam::Math::Point3D)

[Karl@CP PISTONS]

Thanks that worked like a charm. Now reports back the line length just like I wanted.