Merge branch 'master' of http://dd-vmp07-com04:3000/AppStd/Monorepo

Controls.DocumentViewer/DocumentViewer.vb

@@ -66,7 +66,7 @@ Public Class DocumentViewer
     Private Sub DocumentViewer_Load(sender As Object, e As EventArgs) Handles Me.Load
         UpdateMainUi()
     End Sub
-
+    'hallo
     Public Class ToolbarSettings
         Public Property ShowPrintButton As Boolean = True
         Public Property ShowFitWidthButton As Boolean = True

Controls.LookupGrid/frmLookupGrid.vb

@@ -98,10 +98,16 @@ Public Class frmLookupGrid
         _View.BestFitColumns()
 
         ' Datenspalte zusätzlich in der Breite anpassen
-        If _View.Columns.Count = 0 Then
-            Dim oDataColumn As GridColumn = _View.Columns.Item(_DataColumn)
-            oDataColumn.BestFit()
-        End If
+        Try
+            If _View.Columns.Count = 0 Then
+                Dim oDataColumn As GridColumn = _View.Columns.Item(_DataColumn)
+                oDataColumn.BestFit()
+            End If
+        Catch ex As ArgumentOutOfRangeException
+
+        Catch ex As Exception
+
+        End Try
     End Sub
     Private Sub frmLookupGrid_Shown(sender As Object, e As EventArgs) Handles Me.Shown
         BringToFront()