start implementation fo SimpleSorting

Pilz.Collections/SimpleSorting/SimpleSortingHostEventArgs.vb

@@ -0,0 +1,18 @@
+Imports Pilz.Cryptography
+
+Namespace SimpleSorting
+
+    Public Class SimpleSortingHostEventArgs
+        Inherits EventArgs
+
+        Public ReadOnly Property ElementID As UniquieID
+        Public ReadOnly Property ElementIndex As Integer
+
+        Public Sub New(elementID As UniquieID, elementIndex As Integer)
+            Me.ElementID = elementID
+            Me.ElementIndex = elementIndex
+        End Sub
+
+    End Class
+
+End Namespace