Establecer un formulario base en un UserControl

[aaronduran2]

Hola. Quisiera saber como crear una propiedad en un UserControl en la que se establezca un form. Me explico: estoy haciendo un UserControl que simula una barra de título, y lo que quiero es que al hacer click en el icono de cerrar, se cierre el formulario en el que está el UserControl. Para ello necesito una propiedad en la que se establezca cuál es el form en el que está el UserControl y lo cierre. Lo he intentado pero no soy capaz. ¿Alguien puede ayudarme?

Gracias de antemano.

[cobein]

Asi podes obtener el handle de la ventana

Debug.Print GetAncestor(UserControl.ContainerHwnd, GA_ROOTOWNER)

de ahi en mas podes usar apis

[seba123neo]

Hola, se me ocurre algo asi:

Código (vb) [Seleccionar] Expandir

Option Explicit

Private WithEvents f As Form

Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
If Ambient.UserMode Then
Set f = UserControl.Parent
End If
End Sub

Private Sub UserControl_Terminate()
If Not f Is Nothing Then
Set f = Nothing
End If
End Sub

Private Sub UserControl_Click()
Unload f
End Sub

saludos.

[thejuanker]

Property Get frm() As Form
    Set frm = Extender.Parent
End Property

[cobein]

JIJI simple y al pie seba! =)

[aaronduran2]

Gracias, me funcionaron los tres métodos.

Saludos.