Discussion :

[MatP]

Salut,

Voici la situation:

Supposons les deux classes suivantes (limitées à l'essentiel):

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
 
Public Class CollectionDeBidules
private _arrList as New ArrayList
private _Prop as Integer
 
Public Function AddBidule(ByVal monBidule as Bidule) As Integer
   Return _arrList.Add(monBidule)
End Function
 
Default Public Property Bidule(ByVal Index as Integer) As Bidule
      Get
            Return _arrList.Item(index)
        End Get
        Set(ByVal Value As Bidule)
            _arrList.Item(index) = Value
        End Set
End Property
 
Public Property ProprieteCommune() as Integer
  Get/Set _Prop
End Property
 
End Class
 
Public Class Bidule
Private _PropOfBidule as Integer
 
Public Property PropOfBidule() As Integer
   Get/Set _PropOfBidule
End Property
 
Public ReadOnly Property ChoseMachin() As Integer
    Get
      Return PropOfBidule * CollectionDeBidules.ProprieteCommune
    End Get
End Property
End Class

Bon, je sais pas si c'est clair, mais la propriété ChoseMachin de ma classe Bidule, je voudrais qu'elle utilise la propriétés "ProprieteCommune" de la collection dans laquelle l'objet Bidule fait parti...
Est-ce que ça se fait? Pouvoir utiliser des propriétés qui serait commune à tous les éléments de la collection, mais dans la classe de l'objet qui fait parti de la collection...

Merci!

[DrQ]

Si tous tes objet de ta collection sont du même type il n'y aura pas de souci.
Dans VB.NET avec le framework 2.0, je présume qu'il y a aussi les generics. Tu peux utiliser ça pour que ta collection ne puisse contenir qu'un type spécifique.

[neguib]

Plusieurs petites remarques :

• 1. Tu peux en effet exploiter la nouveautés des Générics puisque tu es sous 2.0
  

  Code :

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

  1
  2
  3
  4
  5
  6
  7
  8
   
  Imports System
  Imports System.Collections
  Imports System.Collections.Generics
   
  Public Class CollectionDeBidules
  Inherits List(Of Bidules)
  '...

  2. Si tu souhaites rester type 1.1 alors préferes l'héritage direct de CollectionBase, tu feras ainsi l'économie de l'ArrayList dans ton implémentation
  
  3. Si tu utilises une propriété partagée alors n'oublies pas le mot clé Shared
  

  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 Class CollectionDeBidules
     '...
     Private Shared _Prop As Integer = '?...valeur par défaut
   
     Public Shared Property ProprieteCommune() As Integer 
        Get
           Return _Prop 
        End Get
        Set(ByVal Value As Integer)
           _Prop = Value
        End Set
     End Property 
     '...

  Ainsi utilisable comme tu l'a écrit
  

  Code :

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

  ...CollectionDeBidules.ProprieteCommune ...

Je n'ai pas réfléchi précisement maintenant sur la pertinence d'un accesseur Set sur ce type de propriété qui , il me semble, sont la plupart du temps sous-tendue par une variable ReadOnly modifiable de façon interne par exemple avec un constructeur Shared qui l'initialise en fonction de certains paramètres :

[MatP]

Merci pour les réponses et conseils supplémentaires, surtout pour le Inherits List(Of type), c'est génial ça.

Mais j'ai encore deux questions:

En déclarant ma variable Shared, ne sera-t-elle pas partagée à toutes les instances de "CollectionDeBidules" ? Je voudrais qu'elle puisse être différente à toutes les CollectionDeBidules que j'initialise, mais que les "Bidules" faisant partie des collection aie accès à la propriété de la collection dans laquelle elle fait partie.

Je sais pas si je suis clair dans ce que j'explique?


Et deuxièmement, j'ai aussi 4 classes suivantes:

Sections (qui est une collection des objets suivants
Section
WallSection (Inherits Section)
TeeSection (Inherits Section)
RectangleSection (Inherits Section)

Dans ce cas, je suis mieux, pour ma collection Sections, d'hériter de CollectionBase j'imagine, puisque j'ai 4 types d'objet dans ma collection? Sauf que Dans collectionBase, l'index initial, est-ce 0, comme dans le arraylist? me semble avoir lu quelque part que c'était 1, est-ce possible? D'ailleurs, pour le inherits List(Of Type), j'espère que c'est bien 0 aussi l'index initial?

merci encore!

[neguib]

Je voudrais qu'elle puisse être différente à toutes les CollectionDeBidules que j'initialise, mais que les "Bidules" faisant partie des collection aie accès à la propriété de la collection dans laquelle elle fait partie.

Est-ce que celà veux dire que Bidule ne peut exister en dehors d'une collection parent ? car là l'implémentation se fait effectivement différemment puisque c'esdt la collection elle même qui créera ses bidules en exposant par exemple une Méthode AddNewBidule() comme DataTable avec AddNewRow()

[MatP]

En effet, Bidule ne devrait pas exister en dehors de la collection. Si ce n'est que pour déclarer l'objet afin de faire des boucles For Each / Next dans la collection.

De même, est-ce que y'aurait moyen d'avoir une propriété "Number" à Bidule qui en fait retournerait l'IndexOf(Bidule) (+1 si index initial à 0) de sa collection parente?

Code :

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

1
2
3
4
5
Public ReadOnly Property Number() As Integer
Get
   Return CollectionBidules.IndexOf(Me) + 1
End Get
End Property

[neguib]

En effet, Bidule ne devrait pas exister en dehors de la collection. Si ce n'est que pour déclarer l'objet afin de faire des boucles For Each / Next dans la collection.

Donc en effet celà te fait une classe Bidule et une collection de Bidule de ce genre:

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
 
Imports System 
Imports System.Collections 
Imports System.Collections.Generic 
 
 
Public Class Bidule
   Private _Parent As CollectionDeBidules
   Private _PropOfBidule As Integer
 
   Protected Friend Sub New(ByRef parent As CollectionDeBidules)
      Me._Parent = parent
   End Sub
 
   Public Property PropOfBidule() As Integer 
     Get 
         Return _PropOfBidule 
     End Get 
     Set(ByVal Value As Integer) 
         _PropOfBidule = Value 
     End Set
   End Property
 
   Public Function GetChoseMachin() As Integer 
     Return (Me._PropOfBidule * Me._Parent.ProprieteCommune)
   End Function
End Class
 
 
Public Class CollectionDeBidules 
   Inherits List(Of Bidule)
 
   Public Sub New(ByVal commonProperty As Integer)
      MyBase.New()
      Me._Prop = commonProperty
   End Sub
   Public ReadOnly Property ProprieteCommune() As Integer 
      Get 
         Return Me._Prop 
      End Get
   End Property
 
   Public Function NewBidule() As Bidule
      Return Me.AddNewBidule()
   End Function
 
   Private _Prop As Integer
   Private Function AddNewBidule() As Bidule
      Dim b As Bidule = New Bidule(Me)
      Me.Add(b)
      Return b
   End Function
 
End Class

De même, est-ce que y'aurait moyen d'avoir une propriété "Number" à Bidule qui en fait retournerait l'IndexOf(Bidule) (+1 si index initial à 0) de sa collection parente?

sans intérêt réel puisque normalement Bidule n'existe pas en dehors de sa collection donc autant directement l'atteindre par sa collection(fonction IndexOf +1 non : )

[MatP]

De même, est-ce que y'aurait moyen d'avoir une propriété "Number" à Bidule qui en fait retournerait l'IndexOf(Bidule) (+1 si index initial à 0) de sa collection parente?

sans intérêt réel puisque normalement Bidule n'existe pas en dehors de sa collection donc autant directement l'atteindre par sa collection(fonction IndexOf +1 non : )

En fait, c'est pour certaines fonctions qui recoivent un objet bidule en paramètre, non pas la collection complète, et dont j'ai besoin de sa position dans la collection. Mais je vois comment faire maintenant, avec le code que tu m'as donné, merci beaucoup pour le coup de main et les précisions!