You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
101 lines
3.4 KiB
101 lines
3.4 KiB
'**************************************************
|
|
' FILE : BBCodeNode.vb
|
|
' AUTHOR : Paulo Santos
|
|
' CREATION : 4/29/2009 11:30:13 AM
|
|
' COPYRIGHT : Copyright © 2009
|
|
' PJ on Development
|
|
' All Rights Reserved.
|
|
'
|
|
' Description:
|
|
' Represents the basic node of an BBCode document
|
|
'
|
|
' Change log:
|
|
' 0.1 4/29/2009 11:30:13 AM
|
|
' Paulo Santos
|
|
' Created.
|
|
'***************************************************
|
|
|
|
''' <summary>
|
|
''' Represents the basic node of an BBCode document.
|
|
''' </summary>
|
|
Public MustInherit Class BBCodeNode(Of TContext As Class)
|
|
|
|
Private __Parent As BBCodeNode(Of TContext)
|
|
Private __Parser As BBCodeParser(Of TContext)
|
|
|
|
''' <summary>Initializes an instance of the <see cref="BBCodeNode" /> class.
|
|
''' This is the default constructor for this class.</summary>
|
|
Protected Sub New()
|
|
End Sub
|
|
|
|
''' <summary>Initializes an instance of the <see cref="BBCodeNode" /> class.</summary>
|
|
''' <param name="parser">The parser used to create this element.</param>
|
|
Protected Sub New(ByVal parser As BBCodeParser(Of TContext))
|
|
__Parser = parser
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Gets the parent node.
|
|
''' </summary>
|
|
Public ReadOnly Property Parent() As BBCodeNode(Of TContext)
|
|
Get
|
|
Return __Parent
|
|
End Get
|
|
End Property
|
|
|
|
''' <summary>
|
|
''' Gets the <see cref="BBCodeParser"/> that create this instance of the <see cref="BBCodeNode"/>.
|
|
''' </summary>
|
|
Protected Friend ReadOnly Property Parser() As BBCodeParser(Of TContext)
|
|
Get
|
|
Return __Parser
|
|
End Get
|
|
End Property
|
|
|
|
''' <summary>
|
|
''' When implemented in a derived class, transforms this instance of <see cref="BBCodeNode"/> into its desired text representation.
|
|
''' </summary>
|
|
''' <param name="formatter">An object that implements the <see cref="ITextFormatter"/> interface.</param>
|
|
''' <returns>The text formatted by the <see cref="ITextFormatter"/>.</returns>
|
|
Public MustOverride Function Format(ByVal context As TContext, ByVal formatter As ITextFormatter) As String
|
|
|
|
''' <summary>
|
|
''' When implemented in a derived class, gets or sets the inner BBCode.
|
|
''' </summary>
|
|
''' <value>The BBCode between the start and end tags.</value>
|
|
Public MustOverride Property InnerBBCode() As String
|
|
|
|
''' <summary>
|
|
''' When implemented in a derived class, gets the outer BBCode.
|
|
''' </summary>
|
|
''' <value>The BBCode of this instance of the <see cref="BBCodeNode"/>.</value>
|
|
Public MustOverride ReadOnly Property OuterBBCode() As String
|
|
|
|
''' <summary>
|
|
''' When implemented in a derived class, gets or sets the plain text of the node.
|
|
''' </summary>
|
|
''' <value>The plain text between the start and end tags.</value>
|
|
Public MustOverride Property InnerText() As String
|
|
|
|
''' <summary>
|
|
''' Sets the <see cref="BBCodeParser"/> of this instance.
|
|
''' </summary>
|
|
''' <param name="parser">The new parser of this instance.</param>
|
|
Friend Sub SetParser(ByVal parser As BBCodeParser(Of TContext))
|
|
__Parser = parser
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' The the parent node of this instance of the <see cref="BBCodeNode"/>.
|
|
''' </summary>
|
|
''' <param name="parentNode">The parent node.</param>
|
|
Protected Friend Sub SetParent(ByVal parentNode As BBCodeNode(Of TContext))
|
|
Dim element = TryCast(parentNode, BBCodeElement(Of TContext))
|
|
If (element Is Nothing) OrElse (String.IsNullOrEmpty(element.Name)) Then
|
|
__Parent = Nothing
|
|
Else
|
|
__Parent = element
|
|
End If
|
|
End Sub
|
|
|
|
End Class
|
|
|