Xml

[cookie22]

das kommt wohl ganz auf die xml compo/unit an.

[value is NULL]

danke für die antworten...

hab das mit SimpleXML probiert ich habe aber keine function mit selectsinglenode. habe es deshalb mal mit XML versucht:

Delphi-Quellcode:

program test;

{$APPTYPE CONSOLE}

uses
  SysUtils,
  xml;

var
  a : TXmlDocument;

begin
  try
        a.LoadFromFile('C:\config.xml');
        Writeln(a.GetTag('config\param').CData);
  except
       on e : exception do begin
                            writeln(e.message);
                            halt(1);
                        end;
  end;

end.

bekomme aber immer eine exception

[stahli]

Schau mal hier im Beitrag #7, ob das etwas hilft...

[himitsu]

Zitat von value is NULL:

bekomme aber immer eine exception

Ja, wenn man vergißt das XMLObjekt zu erstellen, dann ist das kein Wunder.

Wobei es immer schön wäre, wenn man den "Text" der Exceptions erfährt.
Meine vermutet aber was mit "Zugriffsverletzung auf Adresse $000000xx".

PS: In meinem himXML-Download befinden sich ein paar Demos und in der CheckLibs.dpr gibt es, unter Anderem, auch einige Beispiele für SimpleXML.


OK, SimpleXML ist etwas anders aufgebaut, da könnte das mit dem DOMDocument stimmen.
Wobei dein Delphi auch MSXML enthält > TXMLDocument aus der Unit XMLDoc.


@stahli: SimpleXML und XPath?

[value is NULL]

ah ok, habe jetzt mal folgendes versucht:

Delphi-Quellcode:

var
a : TXmlDocument;

begin
  try
          a := TXMLDocument.Create;
          a.LoadFromFile('C:\config.xml');
          Writeln(a.GetTag('config\param').CData);
  except
          on e : exception do begin
          writeln(e.message);
          halt(1);
          end;
  end;

end.

und bekomme folgendes zurück:

Fehler beim Parsen von Datei 'config.xml' (Zeile 3, Zeichen 9): '<' erwartet, aber '1' gefunden

was meint er damit? mein XML sieht so aus:

<config>
<param>123</param>
</config>

[value is NULL]

so, bin jetzt glaub ich?! ein stück weiter:

Delphi-Quellcode:

uses
  SysUtils,
  xmldoc;

var
a : TXmlDocument;

begin
  try

          a := TXMLDocument.Create(nil);
          a.Active := True;
          a.LoadFromFile('C:\test.xml');

  except
          on e : exception do begin
          writeln(e.message);
          a.Destroy;
          halt(1);
          end;
  end;

end.

jetzt bekomme ich aber die Meldung: CoInitialize wurde nicht aufgerufen.

habe gelesen das ich das for das am anfang und am ende setzen muss. jedoch sagt er mir immer undeclared identifier...
Bin ich am richtigen weg oder am komplett falschen?

LG

[himitsu]

Nja, SimpleXML ist halt ein bissl "älter", obwohl ich jetzt nicht wüßte, warum es mit dieser Datei nicht klarkommen sollte.
Wobei die 1 für micht in Zeile 2 Zeichen 8 liegt.

PS: CoInitialize wurde nicht aufgerufen

Und dann ruft man Destroy eigentlich nicht direkt auf, sondern nutzt Free.

[value is NULL]

hm naja ich machs ja jetzt nicht mit SimpleXML sonder mit XMLDoc dh:

Delphi-Quellcode:

program test;

{$APPTYPE CONSOLE}

uses
  SysUtils,
  xmldoc;

var
a : TXmlDocument;

begin
  try

          a := TXMLDocument.Create(nil);
          a.Active := True;
          a.LoadFromFile('C:\test.xml');

  except
          on e : exception do begin
          writeln(e.message);
          a.Free;
          halt(1);
          end;
  end;

end.

habe versucht das Coinitialize fast an jeder Stelle des codes zu platzieren, das will er aber niergends...
wo gehört das den hin?

LG