This commit is contained in:
SchreiberM 2021-03-24 15:00:07 +01:00
parent bba05e7ba9
commit 7c5dd5f745
3 changed files with 13 additions and 1 deletions

View File

@ -227,6 +227,7 @@ Public Class ClassInit
ElseIf oMode.StartsWith("NOMATCH_INFO") Then ElseIf oMode.StartsWith("NOMATCH_INFO") Then
Try Try
Dim oResult = oMode.Replace("NOMATCH_INFO=", "") Dim oResult = oMode.Replace("NOMATCH_INFO=", "")
Logger.Info($"NOMATCH_INFO: {oResult}")
NOMATCH_INFO = CBool(oResult) NOMATCH_INFO = CBool(oResult)
Catch ex As Exception Catch ex As Exception
NOMATCH_INFO = False NOMATCH_INFO = False
@ -234,11 +235,21 @@ Public Class ClassInit
ElseIf oMode.StartsWith("HotkeySearchKey") Then ElseIf oMode.StartsWith("HotkeySearchKey") Then
Try Try
Dim oResult = oMode.Replace("HotkeySearchKey=", "") Dim oResult = oMode.Replace("HotkeySearchKey=", "")
Logger.Info($"HotkeySearchKey: {oResult}")
HotkeySearchKey = oResult HotkeySearchKey = oResult
HotkeySearchKey_via_Server = True HotkeySearchKey_via_Server = True
Catch ex As Exception Catch ex As Exception
HotkeySearchKey = "d" HotkeySearchKey = "d"
End Try End Try
ElseIf oMode.StartsWith("NotifyMode") Then
Try
Dim oResult = oMode.Replace("NotifyMode=", "")
Logger.Info($"NotifyMode: {oResult}")
NOTIFY_MODE = oResult
Catch ex As Exception
End Try
Else Else
Logger.Info($"Wrong oMode: {oMode}") Logger.Info($"Wrong oMode: {oMode}")
End If End If

View File

@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.2.4.0")> <Assembly: AssemblyVersion("2.3.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>

View File

@ -85,4 +85,5 @@ Module modCurrent
Public WORKING_MODE As String = "" Public WORKING_MODE As String = ""
Public BASIC_CONF_VISIBLE As Boolean = True Public BASIC_CONF_VISIBLE As Boolean = True
Public NOMATCH_INFO As Boolean = False Public NOMATCH_INFO As Boolean = False
Public NOTIFY_MODE As String = "NotifyIcon"
End Module End Module