IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Gérer des valeurs par défauts sur les propriétés d'un objet


Sujet :

VB.NET

  1. #1
    Membre averti
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mars 2012
    Messages
    640
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Bâtiment

    Informations forums :
    Inscription : Mars 2012
    Messages : 640
    Points : 372
    Points
    372
    Par défaut Gérer des valeurs par défauts sur les propriétés d'un objet
    Bonjour à tous,
    Je bute sur un problème qui à l'air simple en apparence. J'ai une classe qui me sert à stocker divers paramètres et je voudrais pouvoir remettre une valeur par défaut pour chaque propriété sans faire appel à d'autres variables ou constantes que je devrais dupliquer pour chaque propriété (vous voyez l'idée ).
    Exemple :
    Ma classe Param est initialisé de sorte que Param.PROP1=12. Je peux bien sûre changer cette valeur mais comment la retrouver pour remettre cette valeur en dehors de la classe ?

    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
    Public NotInheritable Class Param
     
        Private Shared _PROP1 As Integer = 12
        Private Shared _PROP2 As String = "Value1"
        Private Shared _PROP3 As Boolean = True
     
        Public Shared Property PROP1() As Integer
            Get
                Return _PROP1
            End Get
            Set(value As Integer)
                _PROP1 = value
            End Set
        End Property
        Public Shared Property PROP2() As String
            Get
                Return _PROP2
            End Get
            Set(value As String)
                _PROP2 = value
            End Set
        End Property
        Public Shared Property PROP3() As Boolean
            Get
                Return _PROP3
            End Get
            Set(value As Boolean)
                _PROP3 = value
            End Set
        End Property
     
    End Class
    Merci beaucoup pour votre réponse.

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonsoir,

    Tu ne peux pas mettre en place une méthode Param.init qui replacerait les valeurs initiales?

    Mais je présume que c'est pas exactement ce à quoi tu pensais,sinon tu l'aurais implémenté!

  3. #3
    Membre averti
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mars 2012
    Messages
    640
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Bâtiment

    Informations forums :
    Inscription : Mars 2012
    Messages : 640
    Points : 372
    Points
    372
    Par défaut
    Bonjour et merci de votre réponse,
    Je pourrais faire une méthode Param.init mais je devrais réecrire toutes les valeurs comme ci-dessous et cette méthode ne pourrait pas s'exécuter lors de l'initalisation de la classe puisque elle n'a pas de constructeur
    Autre soucis avec cette méthode je suis obligé de réinitialisé TOUTE les valeurs.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private sub Init
    _PROP1=12
    _PROP2="Value1"
    _PROP3=True
    End Sub
    Donc réecrire toutes les valeurs et ça ne réponds pas à mes exigences citées...
    Je réfléchi à ce problème depuis un moment mais je crois que je vais être obligé d'utiliser le principe de Reflexion de code avec des attributs sur chaque propriété.

    Je veux pouvoir faire un truc dans ce style par exemple:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Param.PROP1= Param.PROP1.DefautValue
    ou
    Param.PROP1.ResetToDefautValue

  4. #4
    Expert confirmé
    Avatar de wallace1
    Homme Profil pro
    Administrateur systèmes
    Inscrit en
    Octobre 2008
    Messages
    1 966
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : Administrateur systèmes
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Octobre 2008
    Messages : 1 966
    Points : 4 005
    Points
    4 005
    Billets dans le blog
    7
    Par défaut
    Bonjour,

    Effectivement en utilisant System.Reflection ca pourrait donner un truc du genre à positionner dans ta classe :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
        Public Function GetDefaultValue(Of T)(propertyName As String) As T
            Dim prop = GetType(Param).GetProperty(propertyName)
     
            Dim att = prop.GetCustomAttributes(GetType(DefaultValueAttribute), True)
            If Not att Is Nothing Then
                Return CType(att.First.Value, T)
            End If
        End Function
    Du coup il faut décorer chaque propriété par l'attribut "DefaultValue" exemple :

    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
     
     <DefaultValue(12)>
        Public Shared Property PROP1() As Integer
            Get
                Return _PROP1
            End Get
            Set(value As Integer)
                _PROP1 = value
            End Set
        End Property
     
        <DefaultValue("Value1")>
        Public Shared Property PROP2() As String
            Get
                Return _PROP2
            End Get
            Set(value As String)
                _PROP2 = value
            End Set
        End Property
     
        <DefaultValue(True)>
        Public Shared Property PROP3() As Boolean
            Get
                Return _PROP3
            End Get
            Set(value As Boolean)
                _PROP3 = value
            End Set
        End Property
    PS :
    il y a certainement des ajustements à prévoir mais c'est le principe

    ++

  5. #5
    Membre averti
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mars 2012
    Messages
    640
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Bâtiment

    Informations forums :
    Inscription : Mars 2012
    Messages : 640
    Points : 372
    Points
    372
    Par défaut
    Merci Wallace1, c'est exactement ce qu'il me fallait.
    Je vais faire quelques test et compléter le code, j'ai déja quelques idées...

Discussions similaires

  1. Réponses: 0
    Dernier message: 08/05/2016, 11h17
  2. [AC-2007] Valeur par défaut sur les colonnes d'une liste déroulante.
    Par Gorane dans le forum IHM
    Réponses: 5
    Dernier message: 07/02/2012, 19h26
  3. Réponses: 1
    Dernier message: 10/04/2006, 09h53
  4. [MySQL] Valeur par défaut sur un SELECT
    Par hugo69 dans le forum PHP & Base de données
    Réponses: 8
    Dernier message: 16/01/2006, 17h21
  5. Réponses: 2
    Dernier message: 18/10/2003, 14h42

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo