Feedback

VB - ImageList dynamisch aus dem ResourceManager erstellen

Veröffentlicht von am 15.12.2011
(0 Bewertungen)
Ich brauchte eine ImageList und alle Bilder waren in den Resources vorhanden. Demnach wäre es doch sinnvoll alle Images per Reflection der Resource zu entlocken und sie in die IamgeList einzufügen.
Snippet in C# übersetzen
    Private Function buildImageListFromResources() As ImageList
        Dim liResourceImages As ImageList = New ImageList()

        Dim dicEnumerator As IDictionaryEnumerator
        Dim rReader As ResourceReader

        With Assembly.GetExecutingAssembly
            rReader = New ResourceReader(.GetManifestResourceStream(My.Resources.Resources.ResourceManager.BaseName & ".resources"))
        End With

        dicEnumerator = rReader.GetEnumerator

        While dicEnumerator.MoveNext
            If dicEnumerator.Value.GetType() = GetType(System.Drawing.Bitmap) Then
                liResourceImages.Images.Add(dicEnumerator.Key, dicEnumerator.Value)
            End If
        End While

        rReader.Close()

        Return liResourceImages
    End Function
Abgelegt unter ResourceManager, Resource, ImageList.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!