Discussion :

[prologic]

Bonjour à tous,

Une fois de plus je viens solliciter votre aide car je suis confronté à un problème loin d'être inédit (je penses) mais google ne me donnant quasiment rien comme résultat je décide de m'adresser à ceux qui savent...

Je travailles actuellement sur un projet de class "Intervention". La class principale fonctionne très bien mais j'ai besoin de rajouter des informations et j'aimerais savoir s'il est possible de mettre des sous-attributs.

En gros, j'ai une classe Intervention avec diverses proprités comme Technicien.

Code :

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

1
2
'renvoi le nom du technicien
Intervention.Technicien

J'aimerais pouvoir rajouter une propriété.

Code :

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

1
2
'renvoi le telephone du technicien
Intervention.Technicien.Telephone

Avez vous une méthode pour cela ?

Sinon j'avais pensé à créer une fonction qui va chercher le résultat dans la base de données mais là un autre soucis se présente :

Code :

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

1
2
3
4
5
'renvoi le telephone du technicien
Intervention.Technicien.Info("tel")
 
'renvoi le telephone du chargé d'affaire
Intervention.ChargeAffaire.Info("tel")

Pour le code ci-dessus, je ne sais pas s'il y a une solution pour que la fonction récupère la valeur de la propriété qui l'appelle... (si je n'ai pas confondu propriété et attribut )

Merci d'avance.

Cordialement

[Pol63]

Code :

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

1
2
3
4
5
6
7
public class technicien
  public property tel as string
end class
 
public class intervention
  public property tech as technicien
end class

et après tu peux écrire

Code :

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

UneIntervention.Technicien.Tel

passer par des chaines de caractères en paramètre complique la chose, et n'a d'utilité que si les propriétés ne sont pas connues lors du codage

[_Ez3kiel]

Pour faire

Code :

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

Intervention.Technicien.Telephone

Il te faut une classe intervention, qui possède un property de Technicien, et cette property renvoit un objet de la classe Technicien. Et dans la classe technicien, tu auras une property téléphone.

Pour illustrer en code ta 1ére proposition :

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
Public Class InterventionData
 
    Private _technicien As TechnicienData
    Public Property technicien As TechnicienData
        Get
            Return _technicien
        End Get
        Set(value As TechnicienData)
            _technicien = value
        End Set
    End Property
 
End Class
 
Public Class TechnicienData
 
    Private _telephone As String
    Public Property telephone As String
        Get
            Return _telephone
        End Get
        Set(value As String)
            _telephone = value
        End Set
    End Property
 
End Class

Ainsi tu pourrais faire Intervention.Technicien.Telephone

Ta 2éme solution est aussi faisable, mais le codeur derrière ne pourra pas savoir que pour récupérer le téléphone c'est .Info("tel") il essayera peut-être .Info("telephone") ou plein d'autres solutions. Donc on fera un Enum pour le forcer à choisir parmi plusieurs choix définis.

Pour illustrer :

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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
Public Class InterventionData
 
    Private _technicien As TechnicienData
    Public Property technicien As TechnicienData
        Get
            Return _technicien
        End Get
        Set(value As TechnicienData)
            _technicien = value
        End Set
    End Property
 
    Public Function AfficherTelephone() As String
 
        Return technicien.getInfo(TechnicienData.typeInfo.TELEPHONE).ToString
 
    End Function
 
End Class
 
Public Class TechnicienData
 
    Private _telephone As String
    Private _nom As String
    Private _prenom As String
    Private _niveauQualification As Integer
 
    Public Enum typeInfo
 
        TELEPHONE = 0
        NOM = 1
        PRENOM = 2
        NIVEAU_QUALIFICATION = 3
 
    End Enum
 
    Public Function getInfo(type As typeInfo) As Object
 
        Select Case type
            Case typeInfo.NOM
                Return _nom
 
            Case typeInfo.PRENOM
                Return _prenom
 
            Case typeInfo.TELEPHONE
                Return _telephone
 
            Case typeInfo.NIVEAU_QUALIFICATION
                Return _niveauQualification
 
            Case Else
                Throw New System.Exception("TypeInfo inconnu")
                Return Nothing
        End Select
 
    End Function
 
 
End Class

[prologic]

Code :

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

1
2
3
4
5
6
7
public class technicien
  public property tel as string
end class
 
public class intervention
  public property tech as technicien
end class

Tellement simple, tellement évident.... pourquoi aucun tuto ne montre ça...

Au passage la plupart des tuto trouvés sur internet ont des exemples complètement tordu et irréalistes.

Merci à vous deux.

++

[Pol63]

c'est le problème de la plupart des tutos où on te présente une classe voiture avec une propriété couleur et une méthode avancer
ca embrouille plus qu'autre chose ^^