Discussion :

[Wam31]

Bonjour,

Voici mon problème,

Comme étant impossible de gérer l'opacité d'un UserControl, j'ai décidé d'inclure une Windows Form dans une autre Windows Form, afin d'en gérer son opacité.
Je procède comme suit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Form2 fAInclure = new Form2();
            fAInclure .Size = new Size(100, 100);
            fAInclure .FormBorderStyle =                 System.Windows.Forms.FormBorderStyle.None;
            fAInclure .BringToFront();
            fAInclure .TopLevel = false;
            fAInclure .Visible = true;
fAInclure.Opacity = .75;
            fAInclure .Location = new Point(0, 0);
            this.Controls.Add(fAInclure );

Le problème est que l'opacité n'est pas gérée dans ma fenêtre inclue, alors que l'opacité générale (opérée sur la form qui contient l'autre form) fonctionne ... Est-il possible de gérer l'opacité de la fenêtre inclue ?

[AlexDpars]

Bonjour, la property opaticity fonctionne seulement avec les forms qui sont top level donc aussitôt que tu declare ton top level = False tu ne peux plus jouer avec ton opaticity. Voir community content http://msdn.microsoft.com/en-us/libr...ty(VS.90).aspx

Sinon si tu veux il y a un moyen de controler l'opacity d'un UserControl. (l'opacity se calcule de 0 à 255 , 255 = 100%)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 Protected Overrides ReadOnly Property CreateParams() As System.Windows.Forms.CreateParams
        Get
            Dim cp As CreateParams = MyBase.CreateParams
            cp.ExStyle = cp.ExStyle Or &H20
            Return cp
        End Get
    End Property
 
    Protected Overrides Sub OnPaintBackground(ByVal e As System.Windows.Forms.PaintEventArgs)
        Dim Color As Color = Color.FromArgb(Opacity, Me.BackColor)
        e.Graphics.FillRectangle(New SolidBrush(Color), e.ClipRectangle)
    End Sub
 
    Private m_Opacity As Integer
    Public Property Opacity() As Integer
        Get
            Return m_Opacity
        End Get
        Set(ByVal value As Integer)
 
            m_Opacity = value
            InvalidateEx()
        End Set
    End Property
 
    Private Sub InvalidateEx()
        Try
            If (Parent Is Nothing) Then
                Return
            End If
            Dim rc As Rectangle = New Rectangle(Me.Location, Me.Size)
            Parent.Invalidate(rc, True)
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

Source C# http://social.msdn.microsoft.com/For...9-b8411c5bbffb

[Wam31]

Bonjour, et merci d'avoir pris le temps de me répondre.
Mon user control avec votre méthode est bel et bien translucide maintenant!
Mais voilà, je me trouve confronté à un nouveau problème :
je voudrais gérer l'opacité des boutons, et eux aussi ne possèdent pas la propriété d'opacité ... je suis entrain d'essayer de porter cette méthode pour faire de même sur un bouton mais sans grand résultat ...

[AlexDpars]

Voilà un moyen : http://www.codeproject.com/KB/button...parentBut.aspx