PageRenderTime 11ms CodeModel.GetById 1ms app.highlight 5ms RepoModel.GetById 1ms app.codeStats 0ms

/Common/Shared/SubtitleList.vb

#
Visual Basic | 32 lines | 21 code | 11 blank | 0 comment | 0 complexity | f0315885a4a5f6ca852ca765e5de9900 MD5 | raw file
 1Imports ProtoXML
 2
 3Public Class SubtitleList
 4    Inherits ProtoFlatList(Of SubtitleDetails)
 5
 6    Private _node_TvShow As XElement
 7
 8
 9    Private Sub New()
10        MyBase.New(Nothing, Nothing)
11        Throw New NotImplementedException()
12    End Sub
13
14    Public Sub New(ByRef Parent As IProtoXBase, ByVal NodeName As String)
15        MyBase.New(Parent, NodeName)
16    End Sub
17
18
19    Public Overrides Sub ProcessNode(ByRef Element As System.Xml.Linq.XElement)
20
21        Dim NewSubtitle As New SubtitleDetails()
22        NewSubtitle.ParentClass = Me.ParentClass
23        NewSubtitle.ProcessNode(Element)
24
25        Me.Add(NewSubtitle)
26
27    End Sub
28
29    Public Overrides Function CreateNew() As ProtoXML.IProtoXChild
30        Return New SubtitleList()
31    End Function
32End Class