Public Declare Auto Function GetWindowThreadProcessId Lib "user32" Alias "GetWindowThreadProcessId" (ByVal hwnd As UInteger, ByRef lpdwProcessId As UInteger) As UInteger Public Declare Auto Function GetForegroundWindow Lib "user32" Alias "GetForegroundWindow"() As UInteger
Public Function WindowText(hwnd as Integer) As String Implements _WindowScriptingObject.WindowTextĭim b As New (ChrW(0), 512)ĭim ret = GetWindowText(hWnd, b, b.Capacity)įunction WindowText(ByVal hWnd As UInteger) As Stringįunction WindowPID(ByVal hWnd As UInteger) As UInteger Public Function ActiveWindow() As Integer Implements _WindowScriptingObject.ActiveWindow Public Declare Auto Function GetWindowText Lib "user32.dll" (ByVal hwnd As Int32, īyVal lpString As, ByVal cch As Int32) As Int32 Public Declare Auto Function GetForegroundWindow Lib "user32" Alias "GetForegroundWindow"() As Integer
Imports System Imports Imports Microsoft.Win32 Namespace WindowScriptingObjectįunction WindowText(ByVal hWnd As Integer) As String
0 kommentar(er)
