So I've almost nailed down every feature I need with my gps app but
this one. I've noticed that mappoint just chooses a location for its
directions when you calc a route. Like most of the time it places the
results in the middle of the road. I need it at the actually
intersection or the exit.
This example will get the directions ok but then it will place
pushpins in like the middle of the streets a user would turn at.
Here is an example.. the redboxes should be where the arrows showCode:Dim objMap As MapPointctl.Map Dim objRoute As MapPointctl.Route Private Sub Command1_Click() Dim i As Long, j As Long For i = 1 To objRoute.Waypoints.Count For j = 1 To objRoute.Waypoints(i).SegmentDirections.Count Set objPushpin = objMap.AddPushpin(objRoute.Waypoints(i).SegmentDirections(j).Location, "Seg=" & i & " leg=" & j) objPushpin.Symbol = 40 + i ' 41=red square, 42=yellow square Next j Next i End Sub Private Sub Form_Load() MappointControl1.NewMap 1 Set objMap = MappointControl1.ActiveMap Set objRoute = objMap.ActiveRoute objRoute.Waypoints.Add objMap.FindResults("Albany, NY")(1) objRoute.Waypoints.Add objMap.FindResults("Troy, NY")(1) objRoute.Calculate End Sub