NewDocSearch
This commit is contained in:
@@ -56,14 +56,14 @@ Public Class clsWINDOWSApi
|
||||
Dim proc As Process = Process.GetProcessById(pid)
|
||||
If proc Is Nothing Then Exit Sub
|
||||
Dim msg = pid.ToString & vbNewLine
|
||||
PROC_PID = pid.ToString
|
||||
PROC_Name = proc.ProcessName
|
||||
CurrPROC_PID = pid.ToString
|
||||
CurrPROC_Name = proc.ProcessName
|
||||
msg &= vbNewLine & "Procname: " & proc.ProcessName
|
||||
|
||||
msg &= vbNewLine & "MainWindowTitle: " & proc.MainWindowTitle
|
||||
|
||||
msg &= vbNewLine & "WindowTitle: " & WindowTitle
|
||||
PROC_WindowTitle = WindowTitle
|
||||
CurrPROC_WindowTitle = WindowTitle
|
||||
|
||||
msg &= vbNewLine & TitleLength.ToString
|
||||
' MsgBox(msg)
|
||||
|
||||
Reference in New Issue
Block a user