Feedback

Objekt mit dem BinaryFormatter serialisieren

Sprache: VB

Diese Funktion kann ein Objekt Binär serialisieren und dieses als ByteArray zurückgeben. Der Vorteil des BinaryFormatters ist das man auch Objekte serialisieren kann die das IDictionary Interface implementiert haben.
''' <summary>
''' Mit dieser Funktion kann man ein Objekt Serialisieren und als Byte Array zurückgeben
''' </summary>
''' <param name="What">Das zu serialisierende Objekt</param>
Public Function SerializeObject(ByVal What As Object) As Byte()
    Dim MemStream As New MemoryStream
    Dim BinWriter As New BinaryWriter(MemStream)
    Dim BinFormatter As New BinaryFormatter
    BinFormatter.Serialize(BinWriter.BaseStream, What)
    BinWriter.Close()
    Return MemStream.ToArray
End Function
''' <summary>
''' Mit dieser Funktion kann man ein Objekt Serialisieren und als Byte Array zurückgeben
''' </summary>
''' <param name="What">Das zu serialisierende Objekt</param>
Public Function SerializeObject(ByVal What As Object) As Byte()
    Dim MemStream As New MemoryStream
    Dim BinWriter As New BinaryWriter(MemStream)
    Dim BinFormatter As New BinaryFormatter
    BinFormatter.Serialize(BinWriter.BaseStream, What)
    BinWriter.Close()
    Return MemStream.ToArray
End Function