Foros del Web - Ver Mensaje Individual - MdiChild en tiempo de diseño, es posible?

boluart · #3 (**permalink**) 08/09/2008, 15:55

Efectivamente David, aqui el codigo:

Código:

 
Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Const GW_HWNDNEXT = 2
Dim mWnd As Long
Private Sub Form_Load()
    Form2.Show
    mWnd = Form2.hwnd
    SetParent mWnd, Me.hwnd
End Sub
Private Sub Form_Unload(Cancel As Integer)
    Unload Form2
End Sub

Pero ten cuidado q al monento de cambiar de tamaña a la ventana Padre se te puede presentar algunos problemas.