4.6 PM.Variables

This commit is contained in:
2020-05-25 13:38:07 +02:00
parent 9eb6b594ba
commit e112487f66
6 changed files with 163 additions and 183 deletions

View File

@@ -39,6 +39,8 @@
LOGCONFIG.Debug = True
ElseIf oMode = "PM.IDBWITHWMFS" Then
IDB_USES_WMFILESTORE = True
ElseIf oMode = "PM.NO_BASICCONF" Then
BASIC_CONF_VISIBLE = False
ElseIf oMode.StartsWith("PM.IDB_CONID!") Then
Dim CON_ID = oMode.Replace("PM.IDB_CONID!", "")
Dim oConString = ClassDatabase.Get_ConnectionString(CON_ID)
@@ -59,6 +61,8 @@
ElseIf oMode.StartsWith("PM.COLORSCHEME") Then
Dim oColorScheme = oMode.Replace("PM.COLORSCHEME=", "")
RIBBON_COLOR_SCHEME = oColorScheme.ToUpper
ElseIf oMode.StartsWith("PM.NO_DETAIL_PROFILES") Then
NO_DETAIL_PROFILES = True
Else
LOGGER.Info($"Wrong oMode: {oMode}")
End If