frmDownload.vb -- small change for compatibility with DotSpatial Grids

respec · Sep 6, 2024 · ec06fd5 · ec06fd5
1 parent 2e5b937
commit ec06fd5
Showing 1 changed file with 6 additions and 2 deletions.
diff --git a/D4EMDownloadData/frmDownload.vb b/D4EMDownloadData/frmDownload.vb
@@ -629,8 +629,12 @@ Public Class frmDownload
             Dim lFilename As String = ""
             Dim lSelectedCount As Integer = 0
             If lLayer IsNot Nothing Then
-                lFilename = IO.Path.GetFileNameWithoutExtension(lLayer.DataSet.Filename).ToLower
-                lSelectedCount = CType(lLayer, IMapFeatureLayer).Selection().Count
+                If lLayer.GetType.Name = "MapRasterLayer" Then
+                    lFilename = ""
+                Else
+                    lFilename = IO.Path.GetFileNameWithoutExtension(lLayer.DataSet.Filename).ToLower
+                    lSelectedCount = CType(lLayer, IMapFeatureLayer).Selection().Count
+                End If
             Else
                 lFilename = ""
             End If