/NfoLibrary/Shared/SubtitleList.vb

 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
28End Class