AppStd/ClipboardWatcher
AppStd/ClipboardWatcher
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS

Browse Source
This commit is contained in:
SchreiberM 2020-12-30 14:11:48 +01:00
parent 01db5a2bcf
commit 525ea7e221
2 changed files with 15 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
app/DD_Clipboard_Searcher/ClassInit.vb
View File

@ -134,7 +134,7 @@ Public Class ClassInit
If ConfigManager.Config.AppServerConfig <> String.Empty Then
Try
Dim oSplit() As String = ConfigManager.Config.AppServerConfig.ToString.Split(";")
Dim oSplit() As String = ConfigManager.Config.AppServerConfig.ToString.Split(":")
Dim oAppServerAddress As String = oSplit(0)
Dim oAppServerPort As Integer = 9000
If oSplit.Length = 2 Then

19
app/DD_Clipboard_Searcher/frmMain.vb
View File

@ -19,11 +19,16 @@ Public Class frmMain
Dim splash As New frmSplash()
splash.ShowDialog()
If ERROR_INIT <> "INVALID USER" Then
Dim cultureInfo As New CultureInfo(USER_LANGUAGE)
Thread.CurrentThread.CurrentCulture = cultureInfo
Thread.CurrentThread.CurrentUICulture = cultureInfo
CultureInfo.DefaultThreadCurrentCulture = cultureInfo
CultureInfo.DefaultThreadCurrentUICulture = cultureInfo
Dim Culture = CultureInfo.CreateSpecificCulture(USER_LANGUAGE)
' The following line provides localization for the application's user interface.
Thread.CurrentThread.CurrentUICulture = Culture
' The following line provides localization for data formats.
Thread.CurrentThread.CurrentCulture = Culture
' Set this culture as the default culture for all threads in this application.
' Note: The following properties are supported in the .NET Framework 4.5+
CultureInfo.DefaultThreadCurrentCulture = Culture
CultureInfo.DefaultThreadCurrentUICulture = Culture
Culture.DateTimeFormat.ShortDatePattern = USER_DATE_FORMAT
End If
_DataASorDB = New ClassDataASorDB(modCurrent.LogConfig)
End Sub
@ -34,6 +39,8 @@ Public Class frmMain
frmConfig_Basic.ShowDialog()
End If
lblUser.Caption = USER_USERNAME
If Database.DBInitialized = True Then
If ERROR_INIT <> "" Then
If ERROR_INIT = "NO CLIENT" Then
@ -216,6 +223,7 @@ Public Class frmMain
If CURRENT_CLIPBOARD_CONTENTS IsNot Nothing Then
If MONITORING_ACTIVE = True Then
If CURRENT_MATCHING_PROFILES.Count = 0 Then
Logger.Info("ReceiveHotKey - No profiles matched the Clipboard-Content!")
If NOMATCH_INFO = False Then
NotifyIconMain.BalloonTipTitle = "Clipboard Watcher"
NotifyIconMain.BalloonTipText = "Es wurden keine passenden Profile gefunden."
@ -224,6 +232,7 @@ Public Class frmMain
End If
ElseIf CURRENT_PROFILES_WITH_RESULTS.Count = 0 Then
Logger.Info("ReceiveHotKey - No documents or data found for Clipboard-Content!")
If NOMATCH_INFO = False Then
NotifyIconMain.BalloonTipTitle = "Clipboard Watcher"
NotifyIconMain.BalloonTipText = "Es wurden weder Dokumente noch Daten gefunden!"