Как найти главное окно отладчика?

[arthur2]

Как мне узнать хендл окна отладчика?

[tyomitch]

А что надо-то?

[arthur2]

Да уже ничего
Уже нашёл

Что-то типа этого:

Код: Выделить всё

Option Explicit

Public Sub InicMe()
   EnumThreadWindows GetCurrentThreadId, AddressOf EnumThreadWndProc, 0&
End Sub

Private Function EnumThreadWndProc(ByVal hwnd As Long, ByVal wParam As Long) As Long
    Dim s As String, i As Long
    s = String$(200, 0)
    GetClassName hwnd, s, 200
    If InStr(s, "IDEOwner") = 1 Then
       i = GetWindowText(hwnd, s, 200)
       s = Left$(s, i)
       form1.Caption = s
    Else
       EnumThreadWndProc = 1
    End If
End Function