none
Comment indicer une ressource ? RRS feed

  • Question

  • Bonjour,

    L'utilisation des ressource n'est pas très souple car il faut y mettre le nom en dur, alors, serait-il possible d'indicer ces ressources, soit globalement (toutes = My.Ressources(i)), et, ou, par type (My.Ressources.Icon(i)) ?

    Merci, cordialement.


    Joe ___ Romans et Logiciels ___ http://irolog.free.fr
    mardi 2 février 2010 16:06

Réponses

  • Bonjour Joe,

    Vous pouvez faire ainsi en utilisant la méthode GetResourceSet de ResourceManager :

            Dim rs As ResourceSet = My.Resources.ResourceManager.GetResourceSet(CultureInfo.InvariantCulture, _
                                                                                       True, _
                                                                                       False)
    
            'Méthode pour parcourir toutes les ressources :
            Dim dicos As IDictionaryEnumerator = rs.GetEnumerator()
    
            While dicos.MoveNext
                Console.WriteLine(dicos.Key.ToString() + " " + dicos.Value.ToString())
            End While
    
            'Ou vous pouvez faire ainsi en utilisant un indice comme vous le souhaitiez :
    
            Dim dico As DictionaryEntry = rs(1)
            Console.WriteLine(dico.Key.ToString() + " " + dico.Value.ToString())

    J'espère que cela vous aidera,

    Cordialement,

    Mathieu
    Mathieu Francesch Sharplog Engineering
    • Marqué comme réponse EhJoe mardi 2 février 2010 18:58
    mardi 2 février 2010 18:12
  • Bonjour Joe,

    Avez vous fait l'import de ces deux namespaces ? :

    Imports System.Resources
    Imports System.Globalization

    Cordialement,

    Mathieu
    Mathieu Francesch Sharplog Engineering
    • Marqué comme réponse EhJoe mercredi 3 février 2010 10:14
    mercredi 3 février 2010 08:23

Toutes les réponses

  • Bonjour Joe,

    Vous pouvez faire ainsi en utilisant la méthode GetResourceSet de ResourceManager :

            Dim rs As ResourceSet = My.Resources.ResourceManager.GetResourceSet(CultureInfo.InvariantCulture, _
                                                                                       True, _
                                                                                       False)
    
            'Méthode pour parcourir toutes les ressources :
            Dim dicos As IDictionaryEnumerator = rs.GetEnumerator()
    
            While dicos.MoveNext
                Console.WriteLine(dicos.Key.ToString() + " " + dicos.Value.ToString())
            End While
    
            'Ou vous pouvez faire ainsi en utilisant un indice comme vous le souhaitiez :
    
            Dim dico As DictionaryEntry = rs(1)
            Console.WriteLine(dico.Key.ToString() + " " + dico.Value.ToString())

    J'espère que cela vous aidera,

    Cordialement,

    Mathieu
    Mathieu Francesch Sharplog Engineering
    • Marqué comme réponse EhJoe mardi 2 février 2010 18:58
    mardi 2 février 2010 18:12
  • Bonjour Mathieu,

    Merci, mais ne marche pas, j'ai :

    Erreur 'ResourceSet' non défini.


    ResourceSet

     

     

     

    Dim rs As ResourceSet = My.Resources.ResourceManager.GetResourceSet(CultureInfo.InvariantCulture, True, False)
    



    ???

    Cordialement.


    Joe ___ Romans et Logiciels ___ http://irolog.free.fr
    • Modifié EhJoe mercredi 3 février 2010 07:42 1
    mercredi 3 février 2010 07:40
  • Bonjour Joe,

    Avez vous fait l'import de ces deux namespaces ? :

    Imports System.Resources
    Imports System.Globalization

    Cordialement,

    Mathieu
    Mathieu Francesch Sharplog Engineering
    • Marqué comme réponse EhJoe mercredi 3 février 2010 10:14
    mercredi 3 février 2010 08:23