Opacidad del formulario al mover en VB.NET

Responder
Avatar de Usuario
Richard
Aprendiz
Mensajes: 140
kuchnie na wymiar Ruda Śląska Rybnik Tychy
Registrado: Sab Abr 11, 2020 4:25 pm

Opacidad del formulario al mover en VB.NET

Mensaje por Richard »

Opacidad del formulario al mover por la barra de titulo

El ejemplo que estoy mostrando es muy simples y prático, la idea es trabajar con la opacidad del formulario, cada vez que se maximiza o cuando se mueve el formulario.

En este ejemplo vamos mostrar esta pantalla donde cada vez que clico en la barra de titulo el formulario tendra que quedar transparente.

Imagen

Este es el ejemplo que se muestra al evento click en la barra de titulos del formulario, en esta parte el formulario queda transparente y al soltar el formulario queda en su forma normal.

Imagen

Código: Seleccionar todo

Protected Overrides Sub DefWndProc(ByRef message As System.Windows.Forms.Message)

    ' -- Trap left mouse click down on titlebar

    If CLng(message.Msg) = &HA1 Then

        If Me.Opacity <> 0.5 Then Me.Opacity = 0.5

        ' -- Trap left mouse click up on titlebar

    ElseIf CLng(message.Msg) = &HA0 Then

        If Me.Opacity <> 1.0 Then Me.Opacity = 1.0

    End If

    MyBase.DefWndProc(message)

End Sub

Avatar de Usuario
zealot
Novato
Mensajes: 39
Registrado: Lun Abr 27, 2020 1:38 pm

Re: Opacidad del formulario al mover en VB.NET

Mensaje por zealot »

gracias muy cool el efecto :thumbup:

Responder