1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TSave_XML.XMLtoTwoDimArray(Uservars: TTwoDimArray; FName: String);
var
XMLRead : TXMLDocument;
groupiNode : IXMLNode;
groupiNode2 : IXMLNode;
test2 : String;
begin
XMLRead := TXMLDocument.Create(nil);
XMLRead.LoadFromFile(Fname);
XMLRead.Active:= true;

groupiNode := XMLRead.DocumentElement.ChildNodes.First; // FEHLER                    

1:
2:
3:
4:

- <uservars app="C:\Delphi\test.exe">
  <item text="Var" /> 
  <item text="Bool" /> 
  </uservars>