Mini Kabibi Habibi

Imports Microsoft.VisualBasic
Imports System
Imports System.Collections.Generic
Imports System.Linq
Imports System.Text
Imports System.Collections
Imports System.Xml.Serialization
Imports DevExpress.Xpf.DemoBase
Imports System.ComponentModel
Imports DevExpress.Xpf.DemoBase.Helpers
Imports System.Reflection

Namespace GridDemo
	<XmlRoot("Countries")> _
	Public Class CountriesData
		Inherits List(Of Country)
		Private Shared dataSource_Renamed As IList = Nothing
		Public Shared ReadOnly Property DataSource() As IList
			Get
				If DesignerProperties.IsInDesignTool Then
					Return Nothing
				End If
				If dataSource_Renamed IsNot Nothing Then
					Return dataSource_Renamed
				End If
				Dim s As New XmlSerializer(GetType(CountriesData))
				Dim [assembly] As System.Reflection.Assembly = GetType(MultiView).Assembly
				dataSource_Renamed = CType(s.Deserialize([assembly].GetManifestResourceStream(DemoHelper.GetPath("GridDemo.Data.", [assembly]) & "Countries.xml")), IList)
				Return dataSource_Renamed
			End Get
		End Property
	End Class

	Public Class Country
		Private privateName As String
		Public Property Name() As String
			Get
				Return privateName
			End Get
			Set(ByVal value As String)
				privateName = value
			End Set
		End Property
		Private privateFlag As Byte()
		Public Property Flag() As Byte()
			Get
				Return privateFlag
			End Get
			Set(ByVal value As Byte())
				privateFlag = value
			End Set
		End Property
	End Class
End Namespace