'------------------------------------------------------------------------------
' <autogenerated>
'     This code was generated by CodeSmith.
'     Version: 3.1.6.594
'
'     Changes to this file may cause incorrect behavior and will be lost if
'     the code is regenerated.
' </autogenerated>
'------------------------------------------------------------------------------
Imports System.Xml.Serialization

Namespace Mbark

<Serializable(), XmlType("RegionMessagePairCollection")> Public Class SimpleRegionMessagePairCollection
	Inherits ArrayList

	<XmlArrayItem("RegionMessagePair")> Default Public Shadows Property Item(ByVal index As Integer) As RegionMessagePair
		Get
			Return DirectCast(MyBase.Item(index), RegionMessagePair)
		End Get
		Set(ByVal Value As RegionMessagePair)
			MyBase.Item(index) = Value
		End Set
	End Property
	
	Public Overloads Sub Add(ByVal value As RegionMessagePair)
		MyBase.Add(value)
	End Sub
	
	Public Overloads Sub Remove(ByVal value As RegionMessagePair)
		MyBase.Remove(value)
	End Sub
	
	Public Overloads Function Contains(ByVal value As RegionMessagePair) As Boolean
		Return MyBase.Contains(value)
	End Function
	
	Public Overloads Function IndexOf(ByVal value As RegionMessagePair) As Integer
		Return MyBase.IndexOf(	value)
	End Function
	
	Public Overloads Sub Insert(ByVal index As Integer, ByVal value As RegionMessagePair)
		MyBase.Insert(index, value)
	End Sub
	
	Public Overloads Sub CopyTo(ByVal collection As SimpleRegionMessagePairCollection)
		If collection Is Nothing Then Throw New ArgumentNullException("collection")
		MyBase.CopyTo(collection.ToArray)
	End Sub
	
	Public Overloads Sub CopyTo(ByVal collection As SimpleRegionMessagePairCollection, ByVal arrayIndex As Integer)
		If collection Is Nothing Then Throw New ArgumentNullException("collection")
		MyBase.CopyTo(collection.ToArray, arrayIndex)
	End Sub
	
	Public Overloads Sub CopyTo(ByVal index As Integer, ByVal collection As SimpleRegionMessagePairCollection, ByVal arrayIndex As Integer, ByVal count As Integer)
		If collection Is Nothing Then Throw New ArgumentNullException("collection")
		MyBase.CopyTo(index, collection.ToArray, arrayIndex, count)
	End Sub
				
End Class
End Namespace
