Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#2

Re: Pointer auf IXMLDOMElement

  Alt 23. Jan 2007, 15:57
Geht auch nicht direkt. Aber nutze einen Wrapper, das ist relativ einfach.
Delphi-Quellcode:
type
  TNodeData = class
  private
    FXMLNode: IXMLDOMNode;
  public
    constructor Create(aXMLNode:IXMLDOMNode);
    property XMLNode: IXMLDOMNode read FXMLNode;
  end;

....

var
TreeNode: TTreeNode;
xmlNode: IXMLDOMElement;

   {  Einlesen in TreeView  } 

for I := 0 to xmlNode.childNodes.length-1 do begin
        TreeNode := Tree.Items.AddChild(NIL, (xmlNode.childNodes[I] as IXMLDOMElement).getAttribute(AttrName));
        TreeNode.Data := TNodeData.Create(xmlNode.childNodes[I]);

   {  Auslesen aus TreeView  } 

xmlNode := TNodeData(Node.Data).XMLNode;
Aber nicht vergessen die Klasse später wieder freizugeben

......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat