/Common/Shared/FileDetails.vb

 1Imports ProtoXML
 2
 3
 4Public Class FileInfo
 5    Inherits ProtoPropertyGroup
 6
 7    Public Property StreamDetails As New StreamDetails(Me, "streamdetails")
 8    Public Sub New()
 9        MyBase.New(Nothing, Nothing)
10        'Throw New NotImplementedException()
11    End Sub
12
13    Public Sub New(ByRef Parent As IProtoXBase, ByVal NodeName As String)
14        MyBase.New(Parent, NodeName)
15    End Sub
16
17    Public Overrides Function CreateNew() As ProtoXML.IProtoXChild
18        Return New FileInfo
19    End Function
20End Class