Hello,
I find something really strange. In my original code the method GetPointOnALine in some cases returns a wrong point. I make a code test for document this issue but the result is diferent in the test code??? The result in both cases is wrong.
Here is the test code:
Imports ThinkGeo.MapSuite.Core
Imports ThinkGeo.MapSuite.DesktopEdition
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim omsmlsMLine As MultilineShape
Dim omspsPoint As PointShape
omsmlsMLine = New MultilineShape("MULTILINESTRING((660081.58593899 2178301.72641268,660081.598276218 2178308.96236724))")
omspsPoint = omsmlsMLine.GetPointOnALine(StartingPoint.FirstPoint, 50)
' In my original code returns "POINT(660081.58593899 2178301.72641265)" a diferent result from this test code but
' both incorrect ????
MsgBox("Incorrect middle point calculated: " + omspsPoint.GetWellKnownText() + vbCrLf + _
"The correct point is: POINT(660081.5921 2178305.344)", MsgBoxStyle.Critical, "Error")
End Sub
End Class
It is a bug? Am I doing something wrong?