spacer1
spacer2 1_1 1_2
2_1
 Subscribe
 The MP2K Update!
 
 
 
 Magazine
Front Cover
What's New
Articles
News
Sample Data
Gallery
Advertise
About
 Features
MapPoint 2013
Press Releases
MapPoint Forums
Companies
Link to MP2Kmag
Wish List
MapPoint Trial
Authors
 Earlier Content
Past News Items
Past What's New Announcements
 Sponsors
 Order

MapPoint 2013

Programming MapPoint in .NET

MapPoint Book

  Spatial Community
SVG Tutorials
MapPoint

Map Visitors

  ARTICLES  


Using MapPoint In Delphi

Jack Melgers explains how developers can go about using MapPoint within Delphi and provides several code snippets

From the many postings, it's now commonly known that you can not use the MapPoint 2002 ActiveX-control in Delphi, youŽll end up with the message: 'No such interface supported'. Nevertheless, there are other ways for using MapPoint 2002 in Delphi and below IŽll give some comments.

1) Importing MapPoint_TLB

Start by importing the Type Library (TLB) in Delphi. Choose 'Import Type Library', select 'Microsoft MapPoint 9.0 Object Library', tick 'Generate Component Wrapper' and then click 'Install'. This will compile and build a Delphi package and as a result three MapPoint components will appear on the ActiveX-tab of the Component Palette: TApplication, TMap and TMapPointUtilities.

2) Using MapPoint TApplication as a component on the form

Create a new Delphi application and drop the MapPoint component TApplication on the Delphi-form. Make it visible in the Activate-event of the form. This will execute MapPoint in a separate window:

Doing so, you can access the MapPoint Object Model and start developing. For instance, get the ActiveMap and zoom to a location:

3) Creating a MapPoint.Map in an OleContainer

If you donŽt want MapPoint to execute as a separate application you can use TOleContainer in Delphi. Create a new Delphi application and drop an OleContainer component on the form, add MapPoint_TLB in the 'uses' section and add the following code to Activate-event of the form:

('MapPoint.Map.EU.9' is the OleClassName for the European edition of Mappoint and 'FMap' is a global variable of type _Map).

Note in general: If you can not properly access the MapPoint Application in Delphi, the cause maybe a conflict with the Delphi Application. Therefore, open the 'Mappoint_TLB.pas' and find the declaration of CoClasses and rename 'Application = _Application' to, for instance, 'Application1 = _Application'.

4) Accessing MapPoint Add-ins

If you have developed an Add-in (the MapPoint-Help gives a step-to-step explanation how to create an Add-in with Visual Basic) you can access it from Delphi.

Create a new Delphi application and drop a MapPoint TApplication on the form.

Declare the global variables:
- FAddIns : AddIns;
- FMyAddIn : OleVariant;

Connect to the add-in in the Activate-event of the form:

And disconnect in the Close-event of the form:

Now in the Delphi-application you can access methods in the Add-in. For instance:

You can also pass parameters to the Add-in. See the following example for passing two parameters of type integer:

Discuss this story in the forum.

Author: Jack Melgers
Email: jackmelgers@yahoo.es
URL: http://es.linkedin.com/in/jackmelgers
Jack Melgers is freelance consultant in Spain and he is involved with GIS development projects and training services.



Google
 
MP2Kmag Internet


 Recent Discussion
-Are you hyped for adidas NMD R1 Thunder?
-ASA OILMAP v6.4
-Concept SpiceVision v6.8.12
-Aveva.ERM v13.0.1
-ArtWork.NetexG.V1.52
-Aveva everything3D v2.1
-Concept RTLvision v6.8.12
-ArtCAM.v2018
-Auton.v7.24
-Concept GateVision v6.8.12
-ARM DS5 Development Studio v5.27
-AutoSPRINK VR12
-Compucon EOS3 v3.0.1.5
-ARKAOS Mediamaster pro v5.2.3
-AutoSPRINK VR11
-Compass.RamSeries.V11.0.5
-AristoCAT.2016.build.14.04.2017
-AutoPol.v2010
-ColorGate v10
-AQWA
-AWR Design Environment With Analyst v13.0 x64
-CodeV 11.1
-APS v7.6
-AVEVA.Review v12.2.x64
-Cloudworx v4.3
 Resources
Browse GIS books and periodicals
Find a MapPoint Partner or Consultant
Real Estate Columbia, MO Real Estate


Want Your Site To Appear Here?

   © 1999-2012 MP2K. Questions and comments to: website@mp2kmag.com
  Microsoft and MapPoint 2002/2004/2006/2009/2010/2011/2013 are either trademarks or registered trademarks of Microsoft.