Thema: Delphi array als xml speichern

Einzelnen Beitrag anzeigen

schwarzer_kaffee

Registriert seit: 2. Okt 2008
5 Beiträge
 
#8

Re: array als xml speichern

  Alt 6. Okt 2008, 12:48
----------update----------


ich kann immerhin schonmal die erste x variable aus der xml auslesen und ins array einfügen.
das sieht dann so aus:

Delphi-Quellcode:
procedure tform1.Button2Click(Sender: TObject);
var
  vbn:integer;
  xmldocument1: ixmldocument;
  getx: IXMLXType;
  array2xml,ein_punkt,id,koordinaten,linien,von,bis,xwerte, ywerte, element, element2, element3, punkte:ixmlnode;
  ladearray: IXMLArray2xmlType;
  blubbel: IXMLKoordinatenType;
    node: ixmlnode;

begin
  xmldocument1 := newXMLDocument;
   if opendialog1.execute then
   begin
  XMLdocument1.loadfromfile(openDialog1.FileName) ;
    xmldocument1.Active:=true;
    array2xml:=xmldocument1.DocumentElement;
 koordinaten:= array2xml.childnodes['Koordinaten'];
 ein_punkt:= koordinaten.ChildNodes['ein_punkt'] ;
 id:= ein_punkt.ChildNodes['id'];
 xwerte:=ein_punkt.ChildNodes['x'];
 koordinatenarray[1,1]:=strtoint(xwerte.text);
 showmessage(inttostr(koordinatenarray[1,1]));
   end;
end;
jetzt bräuchte ich nur noch 'ne schleife um das für die anderen werte auch machen zu können.
  Mit Zitat antworten Zitat