diff --git a/app/DD_PM_WINDREAM/ClassConfig.vb b/app/DD_PM_WINDREAM/ClassConfig.vb index 366b4e9..8e389c4 100644 --- a/app/DD_PM_WINDREAM/ClassConfig.vb +++ b/app/DD_PM_WINDREAM/ClassConfig.vb @@ -35,5 +35,6 @@ Public Class ClassConfig Public Property LastExportPath As String = "" Public Property ADDITIONAL_SEARCHES_LOAD_ONCLICK As Boolean = True + Public Property GridFontSizeDelta As Integer = 0 End Class diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 2909966..4ba45b0 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -11,6 +11,7 @@ Imports System.IO Imports DevExpress.XtraPrinting Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback Imports DigitalData.Modules.EDMI.API.Constants +Imports DigitalData.GUIs.Common Imports DevExpress.XtraGrid.Views.BandedGrid Imports DevExpress.XtraBars.Ribbon @@ -36,6 +37,7 @@ Public Class frmMain Private FormShown As Boolean = False Private GridIsLoaded As Boolean = False Private OverviewOrDEtail As String = "OVERVIEW" + Private GridBuilder As GridBuilder Private allgFunk As New ClassAllgemeineFunktionen Private _Init As New ClassInit @@ -138,6 +140,10 @@ Public Class frmMain FormOpenClose = True LOGGER.Debug("Initializing MainForm....") + GridBuilder = New GridBuilder(GridViewWFItems) + GridBuilder.WithFontSizeDelta(CONFIG.Config.GridFontSizeDelta) + + ' Create helper to save/load expanded GroupColumns at runtime RefreshHelper = New RefreshHelper(LOGCONFIG, GridViewWFItems, "GUID") Dim oVErsion = String.Format("{0}.{1}.{2}", My.Application.Info.Version.Major, My.Application.Info.Version.Minor, My.Application.Info.Version.Build) @@ -923,6 +929,7 @@ Public Class frmMain RestoreLayout() + GridViewWFItems.Columns.Item("PROFILE_ID").Visible = False GridViewWFItems.Columns.Item("GUID").Visible = False Try