[Jcframework-commits] dotnet CPersistentCollection.vb,1.21,1.22

[Richard B. <rb...@us...>]

Update of /cvsroot/jcframework/dotnet
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12359

Modified Files:
	CPersistentCollection.vb 
Log Message:
Documentation update

Index: CPersistentCollection.vb
===================================================================
RCS file: /cvsroot/jcframework/dotnet/CPersistentCollection.vb,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -d -r1.21 -r1.22
--- CPersistentCollection.vb	20 May 2005 06:03:41 -0000	1.21
+++ CPersistentCollection.vb	24 May 2005 10:35:34 -0000	1.22
@@ -53,6 +53,17 @@
 		End Set
 	End Property
 
+	''' -----------------------------------------------------------------------------
+	''' <summary>
+	''' Count of the objects in the collection
+	''' </summary>
+	''' <returns> </returns>
+	''' <remarks>
+	''' </remarks>
+	''' <history>
+	''' 	[Richard Banks]	24/05/2005	Created
+	''' </history>
+	''' -----------------------------------------------------------------------------
 	<Browsable(False)> Public Shadows ReadOnly Property Count() As Integer
 		Get
 			Return MyBase.Count
@@ -128,10 +139,34 @@
 		End Get
 	End Property
 
+	''' -----------------------------------------------------------------------------
+	''' <summary>
+	''' Copies the contents of the collection to an array
+	''' </summary>
+	''' <param name="array">The array to copy to</param>
+	''' <param name="index">The starting point in the array</param>
+	''' <remarks>
+	''' </remarks>
+	''' <history>
+	''' 	[Richard Banks]	24/05/2005	Created
+	''' </history>
+	''' -----------------------------------------------------------------------------
 	Public Sub CopyTo(ByVal array As PersistentObject(), ByVal index As Integer)
 		list.CopyTo(array, index)
 	End Sub
 
+	''' -----------------------------------------------------------------------------
+	''' <summary>
+	''' 
+	''' </summary>
+	''' <param name="index"></param>
+	''' <param name="value"></param>
+	''' <remarks>
+	''' </remarks>
+	''' <history>
+	''' 	[Richard Banks]	24/05/2005	Created
+	''' </history>
+	''' -----------------------------------------------------------------------------
 	Public Sub Insert(ByVal index As Integer, ByVal value As PersistentObject)
 		list.Insert(index, value)
 	End Sub
@@ -167,7 +202,7 @@
 					End If
 				End If
 			Catch ex As Exception
-				pb.RollBack()
+				pb.Rollback()
 				Throw New SaveException(ex.Message, ex)
 			End Try
 		Next
@@ -196,7 +231,7 @@
 			Try
 				cp.Delete()
 			Catch ex As Exception
-				pb.RollBack()
+				pb.Rollback()
 				Throw New DeleteException(ex.Message, ex)
 			End Try
 		Next
@@ -221,6 +256,17 @@
 
 	End Function
 
+	''' -----------------------------------------------------------------------------
+	''' <summary>
+	''' Implementation of IBindingList.AllowEdit
+	''' </summary>
+	''' <returns>False</returns>
+	''' <remarks>Override for specific collections if you wish to enable editing in your strongly typed collections
+	''' </remarks>
+	''' <history>
+	''' 	[Richard Banks]	24/05/2005	Created
+	''' </history>
+	''' -----------------------------------------------------------------------------
 	<Browsable(False)> Public Overridable ReadOnly Property AllowEdit() As Boolean Implements System.ComponentModel.IBindingList.AllowEdit
 		Get
 			Return False