Определить момент активации родительского окна

[ФАНТОМНЫЙ ЮЗЕР]

Подскажите, пожалуйста, как определить факт создания родительского окна при помощи сообщений WM_, чтобы определить, что :
1. все элементы UserControl.Parent.Controls активизированы;
2. получить список элементов UserControl.Parent.Controls;
3. и установить требуемое сообщение UDM_SETBUDDY.

События в UserControl получают при помощи установки оконнных ловушек командой SetWindowLong, которая затем обращается к подпрограмме WndProc:

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

SetWindowLong(hWndNew, GWL_WNDPROC, AddressOf WndCall)
...
Public Sub WndProc(ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long, ByRef Result As Long)
    Select Case Msg
        Case WM_ ... ????
               Call SendMessage(m_hWnd, UDM_SETBUDDY, m_BuddyhWnd, ByVal 0&)
    End Select
End Sub

[ANDLL]

Если честно, я ОЧЕНЬ не советую делать сабклассинг окна с помощью контрола, расположенного на этом окне.
Попомните мое слово...

[GSerg]

Чел, фигнёй не страдай...
Ты всё пытаешься updown сделать? Ну сделай его правильно...

[ФАНТОМНЫЙ ЮЗЕР]

А как правильно???

[GSerg]

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

Option Explicit

Private Sub UserControl_Show()
  Dim c As Control
 
  For Each c In Parent.Controls
    UserControl.Print c.Name
  Next
End Sub

[ФАНТОМНЫЙ ЮЗЕР]

Спасибо, работает.
Однако этот алгоритма срабатывает только для первого экземпляра UserControl на форме. Второй экземпляр вообще не инициализируется.

Подскажите, как же быть