Add *.lyr file to ArcMap by extern application

ManfredBöhm1 — Thu, 30 Mar 2017 09:13:19 GMT

Developing an application in VB.NET some technical difficulties occurred.

Aim of the application is to add an existing *.lyr file to ArcMap using a VB.NET application and a DLL integrated in ArcMap.

Using the VB.NET application to initiate the DLL integrated in ArcMap an error occurred and ArcMap will shut down.

The source code used is listened below:

Public Sub AddLayerToActiveView(ByVal activeView As ESRI.ArcGIS.Carto.IActiveView, ByVal layerPathFile As System.String)

If activeView Is Nothing OrElse layerPathFile Is Nothing OrElse (Not layerPathFile.EndsWith(".lyr")) Then

Return

End If

' Create a new GxLayer

Dim gxLayer As ESRI.ArcGIS.Catalog.IGxLayer = New ESRI.ArcGIS.Catalog.GxLayerClass

Dim gxFile As ESRI.ArcGIS.Catalog.IGxFile = CType(gxLayer, ESRI.ArcGIS.Catalog.IGxFile) 'Explicit Cast

' Set the path for where the layerfile is located on disk

gxFile.Path = layerPathFile

' Test if we have a valid layer and add it to the map

If Not (gxLayer.Layer Is Nothing) Then

Dim map As ESRI.ArcGIS.Carto.IMap = activeView.FocusMap

gxLayer.Layer.Name = layerPathFile

map.AddLayer(gxLayer.Layer)

End If

End Sub

''' Aufruf AddLayerToActiveView mit Parametern

Dim myactiveView As IActiveView = GetActiveViewFromArcMap(My.ArcMap.Application)

Call AddLayerToActiveView(myactiveView, "M:\test\XY200.lyr")

''''

''' Funktion zur Rückgabe von ActiveView

Public Function GetActiveViewFromArcMap(ByVal application As ESRI.ArcGIS.Framework.IApplication) As ESRI.ArcGIS.Carto.IActiveView

If application Is Nothing Then

Return Nothing

End If

Dim mxDocument As ESRI.ArcGIS.ArcMapUI.IMxDocument = TryCast(application.Document, ESRI.ArcGIS.ArcMapUI.IMxDocument) ' Dynamic Cast

Dim activeView As ESRI.ArcGIS.Carto.IActiveView = mxDocument.ActiveView

Return activeView

End Function

Is it possible to initiate a DLL integrated in ArcMap by a standalone-application?

Any help would be appreciated.

Thank you

topic Add *.lyr file to ArcMap by extern application in ArcObjects SDK Questions