Version 2.3.0.3

app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb

@@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyCompany("Digital Data")> 
 <Assembly: AssemblyProduct("Process Manager")>
 <Assembly: AssemblyCopyright("Copyright © Digital Data 2021")>
-<Assembly: AssemblyTrademark("2302")>
+<Assembly: AssemblyTrademark("2303")>
 
 <Assembly: ComVisible(False)>
 
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.3.0.2")>
+<Assembly: AssemblyVersion("2.3.0.3")>
 <Assembly: AssemblyFileVersion("1.0.0.0")> 

app/DD_PM_WINDREAM/frmInvDashboard.vb

@@ -2,11 +2,18 @@
 Imports System.IO
 Imports DevExpress.XtraCharts
 Imports DevExpress.XtraGrid.Views.Tile
+Imports DigitalData.GUIs.Common
 
 Public Class frmInvDashboard
     Private _selectedChart As ChartControl
     Private Sub frmInvDashboard_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         Try
+            Dim oGridBuilder As New GridBuilder(GridView1)
+            oGridBuilder.
+                WithDefaults().
+                WithReadOnlyOptions().
+                WithClipboardHandler()
+
             Try
                 VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter.Connection.ConnectionString = CONNECTION_STRING_ECM
                 Me.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter.Fill(Me.DD_DMSLiteDataSet.VWPM_CHART_INVOICE_MONITOR_SERIES)

app/DD_PM_WINDREAM/frmMonitor.vb

@@ -2,7 +2,9 @@
 Imports System.IO
 Imports DevExpress.Utils
 Imports DevExpress.XtraGrid
+Imports DevExpress.XtraGrid.Views.Grid
 Imports DevExpress.XtraPrinting
+Imports DigitalData.GUIs.Common
 
 Public Class frmMonitor
     Dim DT_MONITOR_KONFIG As DataTable
@@ -13,6 +15,8 @@ Public Class frmMonitor
     Dim GRID3_SQL As String
     Dim GRID4_TITLE As String
     Dim GRID4_SQL As String
+
+    Private _GridBuilder As GridBuilder
     Private _ActiveGrid As GridControl = Nothing
     ' Private _frmDocView As frmDocView 'You need a reference to Form1
     Dim FormShown As Boolean = False
@@ -152,6 +156,16 @@ Public Class frmMonitor
     Private Async Sub frmMonitor_Load(sender As Object, e As EventArgs) Handles Me.Load
         SplitContainerControlMain.Collapsed = True
 
+        Dim _GridList As New List(Of GridView) From {
+            GridView1,
+            GridView2,
+            GridView3,
+            GridView4
+        }
+        _GridBuilder = New GridBuilder(_GridList).
+            WithReadOnlyOptions().
+            WithClipboardHandler()
+
         GridView1.ShowLoadingPanel()
         Await Load_Grid_Data()
         GridView1.HideLoadingPanel()