himXML (gesprochen himix ML)

[Ghostwalker]

Moinmoin,

erstmal, super Lib, im Großen und Ganzen bin ich sehr zufrieden damit.

Bei meinem neusten Projekt bekomm ich aber ein Problem.

Schnippsel der Daten

Code:

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
<Label1 Display="Label1" Kind="tkClass" Value="" Typename="Vcl.StdCtrls.TLabel" Parentname="" Qualified="Vcl.StdCtrls.TLabel">
  <Align Display="Align" Kind="tkEnumeration" Value="alBottom" Typename="TAlign" Parentname="TLabel" Qualified="Vcl.Controls.TAlign"/>
  <Alignment Display="Alignment" Kind="tkEnumeration" Value="taCenter" Typename="TAlignment" Parentname="TLabel" Qualified="System.Classes.TAlignment"/>
  <Anchors Display="Anchors" Kind="tkSet" Value="[akLeft,akRight,akBottom]" Typename="TAnchors" Parentname="TLabel" Qualified="System.UITypes.TAnchors">

Beim Zugriff auf die einzelnen Nodes (nach dem Laden) bekomme ich zwar den Node, aber nicht seine Attribute:

Delphi-Quellcode:

  xml := TXMLFile.Create(NIL,true);
  xml.LoadFromFile(filename);
  node := ftree.GetFirst();
  ndata := Ftree.GetNodeData(node);
  path := ndata^.Display;
  xnode := xml[path];
  if (xnode <> NIL) then
  begin
    :

Hab einen Haltepunkt beim if gesetzt, und mir xnode.Attributes.count anzeigen lassen....ist 0.
Ich hab das ganze nicht nur mit dem Rootnode sonder auch mit Subnodes auspropiert. Den Node bekomm ich,
die Attribute nicht.

Wo liegt das Problem ?

[himitsu]

"path" stimmt auch?
siehe xnode.NodeType , xnode.Name , xnode.FullPath

Standardmäßig ist xoNodeAutoCreate in den Options aktiv.

Entweder deaktivieren oder erst prüfen, vorm Zugreifen.
xml.Options := xml.Options - [xoNodeAutoCreate];

Delphi-Quellcode:

if xml.Nodes.Exists(path) then begin
  xnode := xml[path];

[Ghostwalker]

Ja path stimmt, ich bekomme ja auch den Knoten an und für sich. Nur eben mit einer leeren Attributliste.

Beispiel:

Delphi-Quellcode:

path := 'Label1';
xnode := xml[path]
if (xnode <> NIL) then
  writeln(IntToStr(xnode.attributes.count));

Ergibt 0

Delphi-Quellcode:

path := 'Label1\Anchors';
xnode := xml[path]
if (xnode <> NIL) then
  writeln(IntToStr(xnode.attributes.count));

Ergibt 0

Während

  writeln(IntToStr(xml.rootnode.attributes.count)); Ergibt 6

[himitsu]

Zitat:

ich bekomme ja auch den Knoten

Den Knoten, oder einen Knoten?
Wie gesagt, schalte mal die Option aus oder prüfe vorher.

Label1 ist dein Root-Node.
Da es immer nur einen Root-Node gibt, wird er quaso übersprungen, da er zu gefühlt 99,99% auch keine Attribute enthält.
xml[...] entspricht xml.RootNode.Nodes[...], also nur dem Inhalt des RootNodes.

Delphi-Quellcode:

path := 'Anchors';  // path := '../Label1/Anchors';
xnode := xml[path]
if (xnode <> NIL) then
  writeln(IntToStr(xnode.attributes.count));

Oder versuche mal xml.Nodes[...]

[Ghostwalker]

Ich bekomme DEN Knoten, da der Name übereinstimmt

Hab das ganze jetzt mal in ein extra Testprojekt verfrachtet.

Wenn ich die Option rausnehme, findet er garnix mehr.

Interresanterweise funktionierts mit .Nodes[].

Anbei ( auch für dich zum Testen) mal das Testprojekt.

Ich hatte eigentlich gedacht das XML[path] das gleiche ist wie xml.nodes[path]...scheinbar aber nicht.

[himitsu]

Zitat von Ghostwalker:

Ich hatte eigentlich gedacht das XML[path] das gleiche ist wie xml.nodes[path]...scheinbar aber nicht.

XML[path] Kurz für XML.Node[path] ist XML.RootNode.Node[path] bzw. ganz genau XML.RootNode.Nodes.Node[path]

Zitat:

Ich bekomme DEN Knoten, da der Name übereinstimmt

Selber falsch nachgedacht.
Der Name muß ja stimmen, da der "fehlende" Knoten ja mit diesem Namen angelegt wird, nach welchem gesucht wurde.

Delphi-Quellcode:

xml := TXMLFile.Create;
//xml.Options := xml.Options - [xoNodeAutoCreate];
if xml['blubb'] = nil then 
  ShowMessage('mähhh');
ShowMessage(xml.asXML);
xml.Free;

xml := TXMLFile.Create;
if xml['blubb'].Text = 'blubber' then 
  ;
xml['abc/def'].Text := 'xyz';
xml['abc/hij'].Attribute['uvw'] := 666;
ShowMessage(xml.asXML);
xml.Free;

[Ghostwalker]

So..hab ein bischen weiter experimentiert.

Mit der Option, wird quasi der Knoten "Label1" doppelt angelegt, einmal ohne Attribute durchs Autocreate und danach einmal mit durchs Dok. Soweit klar.

Was mich jetzt noch ein wenig irretiert, ist die Pfadangabe (mit Autocreate Off).

'..\Label1\Anchors' gibt mir den Knoten zurück. Aber Label1 hat keinen Parentknoten (is ja lt. Dokument der Root).

Der Pfad '\Label1\Anchors' dagegen gibt mir NIL zurück, obwohl das doch eigentlich soviel heißt wie "Selektiere ausgehend vom Rootnode ('\') den Childnode "Anchors" vom Node "Label1" ?

Zumindest lese ich das Hier so.

Danke schon mal