Problem beim Auslesen einer XML Datei

[Der schöne Günther]

Cool, gut zu wissen.

[Wishmaster]

Hey

entschuldigung dass ich mich nicht deutlich gemacht hatte!

ich benutze die NativeXML-Library schon seit einiger zeit,
dennoch ist es für mich das erste mal das ich die Library in einem loop verwende.
in dem demo code hat er eine funktion die in der NativeXML so nicht existiert oder wird anders benutzt!?
und zwar vor dem loop wird die funktionNode.ChildNodes.First; aufgerufen.

anyways das ist mein versuch den code anzupassen.
Ps. wie schon gesagt wenn jemand eine bessere lösung hat....

Delphi-Quellcode:

function TMain_Form.Load_File(FileName : String) : Boolean;
var
  pNode : PVirtualNode;
  Data : PNodeData;
  XML  : TNativeXml;
  iNode : TXmlNode;

procedure ProcessNode(pNode : PVirtualNode; iNode : TXmlNode);
var cNode : TXmlNode;
begin
  if iNode = nil then
   exit;

  with iNode do
   begin
    Data:= VT.GetNodeData(pNode);
    pNode:= VT.AddChild(pNode);
    // Data^.Title:= iNode
   end;

 (* Original cNode := Node.ChildNodes.First; *)

   cNode:= iNode.; // <------------------- problem?
  while cNode <> nil do
   begin
    ProcessNode(pNode, cNode);
    cNode:= cNode.NextSibling(cNode)
   end;
end;

begin
  VT.Clear;

 try
   XML:= TNativeXml.CreateName('password manager');
   XML.LoadFromFile(Filename);
 except
   on E: Exception do
    begin
     if (Assigned(XML)) then
      FreeAndNil(XML);
      Exit;
    end;
 end;


 try

   (* Original iNode := XMLDoc.DocumentElement.ChildNodes.First; *)

   iNode:= XML.RootNodes.FindFirst;
  while iNode<>nil do
   begin
    ProcessNode(nil, iNode);
    iNode:= iNode.NextSibling(iNode);
   end;

   if (Assigned(XML)) then
   FreeAndNil(XML);
   Result:= True;
 except on E: Exception do
  begin
   if (Assigned(XML)) then
    FreeAndNil(XML);
  end;
 end;
end;

[Dejan Vu]

Wie wäre es, wenn Du das nimmst, was (fast) alle anderen verwenden, also einen Standard? Nur mal so nebenbei. Dann würden nämlich die Beispiele im Netz auch funktionieren.

So, und bei deiner Library ist ein PDF dabei, und Beispiele. Irgendwo wird da wohl stehen, wie man durch eine Node-Collection iteriert.