MapForums

tontaegu · #1 (**permalink**) 08-19-2005

I should make a program in Delphi to show a route with a list of destinations.
I need an example to begin.
Thanks

Mohamed · #2 (**permalink**) 08-19-2005

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

**Wilfried** · #3 (**permalink**) 08-19-2005

Hi Mohamed,

Quote:

Is Delphi easy to use ?

Yes very easy, very type structured, but you can typecast everyting what you wants. It is very high level, but you can go to low level programming if needed without problem, and it support inline assembler.

tontaegu · #4 (**permalink**) 08-23-2005

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.

**Wilfried** · #5 (**permalink**) 08-23-2005

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;

**Wilfried** · #6 (**permalink**) 08-23-2005

Hi,

Quote:

It works!
Do you know how to set parameters of speed, starting time, cost x litres and preference route?

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

You find some other membersin the Route and Driverprofile objects to set.

Dexter · #7 (**permalink**) 09-20-2005

I have tried your code in delphi and it comes up with the error : EoleSysError with message 'Class not registered'

**Wilfried** · #8 (**permalink**) 09-20-2005

Hi,

What is the offending line of code ?

Dexter · #9 (**permalink**) 09-20-2005

I get a Invalid Class String from this line of code :

Code:

OleContainer.CreateObject('MapPoint.Map.EU.11', False);

Any ideas ow to fix it, i have copied the example from http://www.mp2kmag.com/a65--delphi.e....mappoint.html

**Wilfried** · #10 (**permalink**) 09-21-2005

Hi,

did you include Mappoint_TLB in the uses clause ?

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
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

MapForums

Help for a delphi program

Help for a delphi program

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)

Similar Threads