Community of MapPoint and Virtual Earth Users and Developers
This is a discussion on Help for a delphi program within the MapPoint 2006/2009 Discussion forums, part of the Map Forums category; I should make a program in Delphi to show a route with a list of destinations. I need an example ...
| |||||||
| Today's Posts | Twitter Feed | Register | Blogs | FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read |
| |||
|
Hi, You should use "Search" engine here ! You will find a lot of topics concerning Delphi. as http://www.mp2kmag.com/a65--delphi.e....mappoint.html ( Is Delphi easy to use ? ) Rgds |
| |||
|
Hi Mohamed, Quote:
__________________ rgds, Wilfried Mestdagh www.mestdagh.biz MapPoint coding demo Order MapPoint 2009 with Routing and User Tools Spreadsheet |
| |||
| Example in delphi
I already read the example nr 65 and other examples in the forum, but they are not sufficient for my use. I'm searching for an example to design a route with a list of 10-20 address and to know the cost,price and distance. |
| |||
|
Hi, Thisi is how to calc a route from an address in Delphi: Code: var
RT: Route;
Loc: Location;
Results: FindResults;
i: OleVariant;
begin
RT := FMap.ActiveRoute;
RT.Clear;
i := 1;
Results := FMap.FindAddressResults(Street1, Place1, '', '', PostC1, GeoCountryBelgium);
if Results.ResultsQuality = geoNoResults then
Exit;
Loc := Location(Results.Item[i]);
RT.Waypoints.Add(Loc, '');
Results := FMap.FindAddressResults(Street2, Place2, '', '', PostC2, GeoCountryBelgium);
if Results.ResultsQuality = geoNoResults then
Exit;
Loc := Location(Results.Item[i]);
RT.Waypoints.Add(Loc, '');
RT.Calculate;
__________________ rgds, Wilfried Mestdagh www.mestdagh.biz MapPoint coding demo Order MapPoint 2009 with Routing and User Tools Spreadsheet |
| |||
|
Hi, Quote:
Code: RT.DriverProfile.PreferredRoads[geoRoadInterstate] := 0.8; RT.DriverProfile.PreferredRoads[geoRoadStreet] := 0.5; // etc RT.DriverProfile.Speed[geoRoadInterstate] := 160; RT.DriverProfile.Speed[geoRoadStreet] := 50; // etc
__________________ rgds, Wilfried Mestdagh www.mestdagh.biz MapPoint coding demo Order MapPoint 2009 with Routing and User Tools Spreadsheet |
| |||
|
Hi, What is the offending line of code ?
__________________ rgds, Wilfried Mestdagh www.mestdagh.biz MapPoint coding demo Order MapPoint 2009 with Routing and User Tools Spreadsheet |
| |||
|
I get a Invalid Class String from this line of code : Code: OleContainer.CreateObject('MapPoint.Map.EU.11', False);
|
| |||
|
Hi, did you include Mappoint_TLB in the uses clause ?
__________________ rgds, Wilfried Mestdagh www.mestdagh.biz MapPoint coding demo Order MapPoint 2009 with Routing and User Tools Spreadsheet |
![]() |
| Tags |
| delphi, program |
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) | |
| Thread Tools | |
| Display Modes | |
| |
| ||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Problems depoying a program | Anonymous | MapPoint 2006/2009 Discussion | 0 | 03-04-2005 02:24 PM |
| Sync display and program? | Anonymous | MapPoint 2006/2009 Discussion | 1 | 01-29-2005 03:37 AM |
| My boss is looking for a softwear program into whi.... | Anonymous | MapPoint 2006/2009 Discussion | 1 | 11-29-2001 11:18 AM |
| Looking for a program where I can plug in zip code.... | Anonymous | MapPoint 2006/2009 Discussion | 1 | 11-09-2001 07:05 AM |
| Where can I get information or program upgrades to.... | Anonymous | MapPoint 2006/2009 Discussion | 1 | 09-11-2001 03:00 PM |
Hurghada Holiday
Enjoy sunny Egypt when you book a Hurghada holiday through UlookUbook at a good price!