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

MS Renaming

Browse Source
This commit is contained in:
Developer01
2024-09-05 17:09:00 +02:00
parent ca01ff32ac
commit 550a9cd3ea
35 changed files with 10253 additions and 10061 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
app/DD_Clipboard_Searcher/frmMain.vb
View File

@@ -1,8 +1,8 @@
Imports System.Threading
Imports System.IO
Imports System.Globalization
Imports DD_Clipboard_Watcher.ClassConstants
Imports DD_Clipboard_Watcher.ClassWindowAPI
Imports easyFLOW.ClassConstants
Imports easyFLOW.ClassWindowAPI
Imports DigitalData.Modules.ZooFlow
Imports DigitalData.Modules.Windows
Imports DigitalData.Modules.Base
@@ -144,7 +144,7 @@ Public Class frmMain
Exit Sub
End If
Try
Dim sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND UPPER(MODULE) = UPPER('Clipboard-Watcher')"
Dim sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND (MODULE = 'easyFLOW' OR MODULE = 'Clipboard-Watcher')"
Database.ExecuteNonQuery(sql)
ClassWindowLocation.SaveFormLocationSize(Me, "")
My.Settings.Save()
@@ -176,8 +176,8 @@ Public Class frmMain
Private Sub WatcherChanged_New(ByVal sender As Object, ByVal e As String) Handles _Watcher.Changed
If MONITORING_ACTIVE = False Then
Logger.Info("Search Flow is inactive!")
'NotifyIconMain.ShowBalloonTip(20000, "Search Flow", "Clipboard-watcher is inactive.", ToolTipIcon.Info)
Logger.Info("easyFLOW is inactive!")
'NotifyIconMain.ShowBalloonTip(20000, "easyFLOW", "Clipboard-watcher is inactive.", ToolTipIcon.Info)
Exit Sub
End If
@@ -273,7 +273,7 @@ Public Class frmMain
Dim oMessageTitle As String
Dim oMessageText As String
oMessageTitle = "Search Flow"
oMessageTitle = "easyFLOW"
oMessageText = String.Format(S.Es_wurden_keine_passenden_Profile_gefunden_für_die_Suche_nach___0___, CURRENT_CLIPBOARD_CONTENTS)
@@ -299,7 +299,7 @@ Public Class frmMain
Dim oMessageTitle As String
Dim oMessageText As String
oMessageTitle = "Search Flow"
oMessageTitle = "easyFLOW"
oMessageText = String.Format(S.Es_wurden_weder_Dokumente_noch_Daten_gefunden_für_die_Suche_nach___0___, CURRENT_CLIPBOARD_CONTENTS)
If NOTIFY_MODE.ToUpper = "MSGBOX" Then
@@ -385,10 +385,10 @@ Public Class frmMain
Sub Change_Monitoring_State()
If MONITORING_ACTIVE = True Then
MONITORING_ACTIVE = False
NotifyIconMain.ShowBalloonTip(30000, "Search Flow", S.Clipboard_Watcher_wurde_deaktiviert_, ToolTipIcon.Info)
NotifyIconMain.ShowBalloonTip(30000, "easyFLOW", S.Clipboard_Watcher_wurde_deaktiviert_, ToolTipIcon.Info)
Else
MONITORING_ACTIVE = True
NotifyIconMain.ShowBalloonTip(30000, "Search Flow", S.Clipboard_Watcher_wurde_wieder_aktiviert_, ToolTipIcon.Info)
NotifyIconMain.ShowBalloonTip(30000, "easyFLOW", S.Clipboard_Watcher_wurde_wieder_aktiviert_, ToolTipIcon.Info)
End If
End Sub
Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles Me.Shown