Index: trunk/Include/Classes/System/Collections/Generic/List.ab
===================================================================
--- trunk/Include/Classes/System/Collections/Generic/List.ab	(revision 344)
+++ trunk/Include/Classes/System/Collections/Generic/List.ab	(revision 352)
@@ -109,9 +109,20 @@
 			Return False
 		End If
+
+		RemoveAt( index )
+		Return True
+	End Function
+
+	/*!
+	@brief	List内の指定したインデックスの要素を削除する
+	@author	Daisuke Yamamoto
+	@date	2007/10/03
+	@return	値が削除されたときはTrue、されなかったときはFlaseが返る
+	*/
+	Sub RemoveAt( index As Long )
 		memmove( items + index*SizeOf(VoidPtr), items + (index+1)*SizeOf(VoidPtr), (size-(index+1))*SizeOf(VoidPtr) )
 		Realloc( size - 1 )
 		size--
-		Return True
-	End Function
+	End Sub
 End Class