Mega Code Archive

 

Categories / VB.Net Tutorial / WPF

 

Get Resource Names from Assembly

<Window x: Class="BinaryResources.Window1"     xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"     xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"     Title="BinaryResources" Height="300" Width="300">     <Grid>       <Image Source="c:\image.jpg" />     </Grid> </Window> //File:Window.xaml.vb Imports System Imports System.Collections.Generic Imports System.Text Imports System.Windows Imports System.Windows.Controls Imports System.Windows.Data Imports System.Windows.Documents Imports System.Windows.Input Imports System.Windows.Media Imports System.Windows.Media.Imaging Imports System.Windows.Shapes Imports System.IO Imports System.Reflection Imports System.Diagnostics Imports System.Threading Imports System.Resources Imports System.Collections Imports System.Windows.Resources Namespace BinaryResources   Public Partial Class Window1     Inherits System.Windows.Window     Public Sub New()       InitializeComponent()       For Each streamName As String In GetResourceNames(GetType(Window1).Assembly, Thread.CurrentThread.CurrentUICulture)         Debug.WriteLine(streamName)       Next     End Sub     Private Shared Function GetResourceNames(asm As Assembly, culture As System.Globalization.CultureInfo) As List(Of String)       Dim resourceName As String = asm.GetName().Name & ".g"       Dim rm As New ResourceManager(resourceName, asm)       Dim resourceSet As ResourceSet = rm.GetResourceSet(culture, True, True)       Dim resources As New List(Of String)()       For Each resource As DictionaryEntry In resourceSet         resources.Add(DirectCast(resource.Key, String))       Next       rm.ReleaseAllResources()       Return resources     End Function   End Class End Namespace