This commit is contained in:
SchreiberM
2017-02-08 13:58:09 +01:00
parent 747ec9ce14
commit 82e417bad0
49 changed files with 7213 additions and 59 deletions

View File

@@ -22,9 +22,12 @@ Public Class ClipboardWatcher : Inherits NativeWindow : Implements IDisposable
Const WM_DRAWCLIPBOARD As Integer = &H308
Select Case m.Msg
Case WM_DRAWCLIPBOARD
Dim CapTxt As String = clsWINDOWSApi.GetCaption()
Console.WriteLine("Window-Title: " & CapTxt)
If CapTxt.ToUpper.StartsWith("DD") Then Exit Sub
clsWINDOWSApi.Get_ForegroundWindow_Info()
'Dim CapTxt As String = clsWINDOWSApi.GetCaption()
If IsNothing(PROC_Name) Then Exit Sub
If PROC_Name.StartsWith("DD_Clipboard_Searcher") Then Exit Sub
Console.WriteLine("PROCESS_NAME: " & PROC_Name)
' If CapTxt.ToUpper.StartsWith("DD") Then Exit Sub
RaiseEvent Changed(Me, EventArgs.Empty)
End Select
MyBase.WndProc(m)