LinkBack URL
About LinkBacksHow 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?
 | Register, sign in, or use Facebook Connect above to join in and participate in the forum. When you are signed in, this message, the ads in this row, and the red-underlined link ads all go away. | | | |
This is a discussion on How does one get the activeX mappoint control to d.... within the MapPoint Desktop Discussion forums, part of the Map Forums category; How does one get the activeX mappoint control to draw a line between pushpins which represent gps lat/lon points as ...
Senior Member
Black Belt 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?
Senior Member
Black Belt 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>
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
Reply With Quote