TDOMNode

type TDOMNode = class

protected

  FPool: TObject;

  FFlags: TNodeFlags;

  FParentNode: TDOMNode;

  FPreviousSibling: TDOMNode;

  FNextSibling: TDOMNode;

  FOwnerDocument: TDOMDocument;

  function GetNodeName; virtual; abstract;

  function GetNodeValue; virtual;

  function GetParentNode; virtual;

  procedure SetNodeValue(); virtual;

  function GetFirstChild; virtual;

  function GetLastChild; virtual;

  function GetPreviousSibling; virtual;

  function GetAttributes; virtual;

  function GetRevision;

  function GetNodeType; virtual; abstract;

  function GetTextContent; virtual;

  procedure SetTextContent(); virtual;

  function GetLocalName; virtual;

  function GetNamespaceURI; virtual;

  function GetPrefix; virtual;

  procedure SetPrefix(); virtual;

  function GetOwnerDocument; virtual;

  function GetBaseURI;

  procedure Changing;

public

  constructor Create();

  destructor Destroy; override;

  procedure FreeInstance; override;

  function GetChildNodes;

  property NodeName: DOMString; [r]

  property NodeValue: DOMString; [rw]

  property NodeType: Integer; [r]

  property ParentNode: TDOMNode; [r]

  property FirstChild: TDOMNode; [r]

  property LastChild: TDOMNode; [r]

  property ChildNodes: TDOMNodeList; [r]

  property PreviousSibling: TDOMNode; [r]

  property NextSibling: TDOMNode; [r]

  property Attributes: TDOMNamedNodeMap; [r]

  property OwnerDocument: TDOMDocument; [r]

  function InsertBefore(); virtual;

  function ReplaceChild(); virtual;

  function DetachChild(); virtual;

  function RemoveChild();

  function AppendChild();

  function HasChildNodes; virtual;

  function CloneNode();

  function IsSupported();

  function HasAttributes; virtual;

  procedure Normalize; virtual;

  property NamespaceURI: DOMString; [r]

  property LocalName: DOMString; [r]

  property Prefix: DOMString; [rw]

  property TextContent: DOMString; [rw]

  function LookupPrefix();

  function LookupNamespaceURI();

  function IsDefaultNamespace();

  property baseURI: DOMString; [r]

  function FindNode(); virtual;

  function CompareName(); virtual;

  procedure SetReadOnly();

  property Flags: TNodeFlags; [r]

end;

TDOMNode

TObject