many bvuttons
This commit is contained in:
21
app/DD_Clipboard_Searcher/frmProcessCapture.vb
Normal file
21
app/DD_Clipboard_Searcher/frmProcessCapture.vb
Normal file
@@ -0,0 +1,21 @@
|
||||
Public Class frmProcessCapture
|
||||
Public ProcessId As Integer
|
||||
Public ProcessName As String
|
||||
Public WindowTitle As String
|
||||
|
||||
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
|
||||
clsWINDOWSApi.Get_ForegroundWindow_Info()
|
||||
If CurrPROC_Name <> "DD_Clipboard_Watcher" Then
|
||||
txtPID.Text = CurrPROC_PID
|
||||
txtName.Text = CurrPROC_Name
|
||||
txtWindowTitle.Text = CurrPROC_WindowTitle
|
||||
ProcessId = CurrPROC_PID
|
||||
ProcessName = CurrPROC_Name
|
||||
WindowTitle = CurrPROC_WindowTitle
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmProcessCapture_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Timer1.Enabled = True
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user