Discussion :

[Yannick038]

Lorsque j'appelle une procédure d'évènement par exemple gotFocus (appellé sur plusieurs types de controles WinForms sur l'évènement GotFocus), je dois pour modifier certaines propriétés à condition que le sender soit d'un type précis

(hors de question de faire un ((Control)Sender).BackColor pour coloriser les labels ect....

Je procède donc de la manière suivante, je me demandais si il y avait une manière plus élégante de procéder. Par exemple je pourrais tester toutes les conditions typeOf() puis faire soit un return; direct soir utiliser alors la classe mère Control.

Je vous soumets le problèmes pour vos retours d'expérience. Merci bien d'avance !

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
   public static void gotFocus(object sender, System.EventArgs args)
        {
            // on récupère le type de l'objet ayant déclenché l'évènement
            // on le cast puis on modifie la propriété de fond
 
            if (sender.GetType() == typeof (TextBox))
            {
                ((TextBox)sender).propriété = valeur;
                (....)  
                return;
            }
            (....)
        }

[leSeb]

hors de question de faire un ((Control)Sender).BackColor pour coloriser les labels

Pourquoi cela ???????

Le principe objet est tel que tu appelles toujours la méthode la plus spécialisée possible (et non pas la méthode du type déclaré).
Donc si tu fais ca, ca marche bien, c'est propre et ton code sera plus optimisé ...

Code :

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

1
2
If (TypeOf sender Is Control)
   ((Control)sender).BackColor = taCouleur;

[Mose]

Encore plus propre :

Code :

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

1
2
3
Control ctrl = (sender as Control);
if(ctrl != null)
  ctrl.BackColor = ...

[Kelpan]

Bonjour,

Si tu veux vraiment ne gérer que des controls bien précis, il te faut créer tes propres controls en héritant des controls que tu desires en implémentant une interface.

Exemple

1. Tu crées une interface :

Code :

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

1
2
3
4
5
 
Public Interface IControlDesign
    ' Couleur de fond
    Property CouleurFond() As Drawing.Color
End Interface

2. Tu créés une classe pour chaque control que tu veux gérer avec cette interface :

Exemple avec un TextBox

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
37
38
39
40
41
42
43
44
45
 
Public Class AXTextBox
            Inherits System.Windows.Forms.TextBox
            Implements IControlDesign
#Region " Code généré par le Concepteur Windows Form "
    Public Sub New()
        MyBase.New()
 
        'Cet appel est requis par le Concepteur Windows Form.
        InitializeComponent()
 
        'Ajoutez une initialisation quelconque après l'appel InitializeComponent()
    End Sub
 
    'La méthode substituée Dispose du UserControl pour nettoyer la liste des composants.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub
 
    'Requis par le Concepteur Windows Form
    Private components As System.ComponentModel.IContainer
 
    'REMARQUE : la procédure suivante est requise par le Concepteur Windows Form
    'Elle peut être modifiée en utilisant le Concepteur Windows Form. 
    'Ne la modifiez pas en utilisant l'éditeur de code.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        components = New System.ComponentModel.Container
    End Sub
#End Region
 
    '*** Implémentation couleur de fond.
    Public Property CouleurFond() As Drawing.Color Implements IControlDesign.CouleurFond
        Get
            Return Me.BackColor
        End Get
        Set(ByVal Value As Drawing.Color)
            Me.BackColor = Value
        End Set
    End Property
End Class

3. Il ne te reste plus qu'à tester la présence de l'interface :

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
 
Private Sub MonForm_GotFocus( _
                        ByVal sender As Object, _
                        ByVal e As System.EventArgs _
                        ) Handles MyBase.GotFocus
    Try
        ' Si l'interface IControlDesign est présent,
        ' on affecte la propriété CouleurFond
        If TypeOf sender Is IControlDesign Then _
                CType(sender, IControlDesign).CouleurFond = Couleur
 
    Catch ex As Exception
        ' Gestion des exceptions
        MsgBox(ex.ToString)
    End Try
End Sub

C'est sur que cela necessite de ne plus utiliser les composants Windows.forms dans tes forms, mais les composants que tu as créés.

Par ailleurs, j'aimerais signaler que d'avoir fait hériter les composants basiques tes que (TextBox, Label, RadioButton, CheckBox, etc...) nous as vraiment rendu service pour faire communiquer les composants avec des formulaires de base, grâce aux interfaces.

[nashouille]

pour ma part perso

je viens de tester en utilisant la class control et le seul probleme est mon Control reste toujour Null malgré le cast de l'object sender.

cela rejoint le debut de discution que j'ai ecrit hier (Propriete d'object).

a plus

[Mose]

Est ce que sender est nul ?
Si non : quel est son type (le débugger de dira tout ça)
(son VRAI type, que tu choppes avece GetType(), pas son type déclaré 'object')