Anonymous
07-25-2001, 06:26 PM
How does one get the activeX mappoint control to draw a line between pushpins which represent gps lat/lon points as a vehicle moves on the map?
How does one get the activeX mappoint control to d....Anonymous 07-25-2001, 06:26 PM How does one get the activeX mappoint control to draw a line between pushpins which represent gps lat/lon points as a vehicle moves on the map? Anonymous 07-25-2001, 06:26 PM You would use the AddLine method. This is a code snippet from the developer's reference in MapPoint Help (it can also be found on MSDN Library on the web): <form><textarea wrap="off" readonly="true" name="code" style="BORDER-BOTTOM: gray 1px inset; BORDER-LEFT: gray 1px inset; BORDER-RIGHT: gray 1px inset; BORDER-TOP: gray 1px inset; OVERFLOW: auto; WIDTH: 100%" rows="12" cols="40"> Sub AddLineToMap() Dim objApp As New MapPoint.Application Dim objMap As MapPoint.Map Dim objLoc1 As MapPoint.Location Dim objLoc2 As MapPoint.Location 'Set up the application Set objMap = objApp.ActiveMap objApp.Visible = True objApp.UserControl = True 'Get two locations and zoom to it Set objLoc1 = objMap.FindResults("Seattle, WA").Item(1) Set objLoc2 = objMap.FindResults("Redmond, WA").Item(1) Set objMap.Location = objLoc1 'Add a Line from one location to the other objMap.Shapes.AddLine objLoc1, objLoc2 End Sub </textarea></form> | ||