MS ParameterAttachments, SaveAdmin

2021-01-28 16:39:56 +01:00
parent 3ba2e62665
commit ea93c1cd05
7 changed files with 1721 additions and 2241 deletions
--- a/app/DD_PM_WINDREAM/ClassParamRefresh.vb
+++ b/app/DD_PM_WINDREAM/ClassParamRefresh.vb
@@ -145,6 +145,12 @@
                        LOGGER.Warn($"Could not read START_CW Param: {ex.Message}")
                        START_CW = False
                    End Try
+                ElseIf oMode.StartsWith("PM.RibbonPageCustTitle") Then
+                    Dim oAfterReplace = oMode.Replace("PM.RibbonPageCustTitle=", "")
+                    RibbonPageCustTitle = oAfterReplace
+                ElseIf oMode.StartsWith("PM.RibbonPageCustItm1") Then
+                    Dim oAfterReplace = oMode.Replace("PM.RibbonPageCustItm1=", "")
+                    RibbonPageCustItm1 = oAfterReplace
                Else
                    LOGGER.Info($"Wrong oMode: {oMode}")
                End If