Problem mit TXMLDocument (Delphi7)

[mirage228]

Hi,

ich wollte heute mal mit dem TXMLDocument von Delphi 7 arbeiten.

Ich hab mir folgenden Code geschrieben: [FXMLFile ist der Dateiname vom Typ String und ja, die Datei existiert, und ja mit LoadFromFile habe ich es auch schon probiert :-\]

Delphi-Quellcode:

var
  XMLDocument : TXMLDocument;
begin
  XMLDocument := TXMLDocument.Create(FXMLFile);
  try
    XMLDocument.DOMVendor := DOMVendors.Find(DEFAULTDOMVENDOR);
    XMLDocument.FileName := FXMLFile;
    XMLDocument.Active := True;
    if XMLDocument.DocumentElement.NodeName = 'acitsettings' then
    begin
      // einträge auslesen
    end;
  finally
    XMLDocument.Free;
end;

Jedoch führt der Zugriff auf DocumentElement zu einem Fehler:

Code:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt UT2003ACIT.exe ist eine Exception der Klasse EAccessViolation aufgetreten. Meldung: 'Zugriffsverletzung bei Adresse 00000000. Lesen von Adresse 00000000'. Prozess wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.
---------------------------
OK   Hilfe   
---------------------------

Was habe ich falsch gemacht? Wie kann ich das Problem lösen?

mfG
mirage228

[mirage228]

Sorry fürs pushen ( ), aber ich würde das Projekt gerne schnellstmöglich noch zu Ende machen.
Bitte, jemand muss doch wissen, wieso das bei mir nicht klappt...

mfG
mirage228

[CalganX]

Hi,
schonmal mit Hilfe von Breakpoints geguckt, wo der Fehler liegt?

Chris

[mirage228]

Hi Chris,

der Zugriff auf "DocumentElement" bringt im Evaluator die obige AccessViolation (die im Programm dann ausgelöst wird) und danach einen EAbstractError. "DOMDocument" ist seltsamerweise auch nil, was eigentlich nicht sein dürfte.
Active ist auf True und FileName ist auch korrekt gesetzt...

Alles sehr seltsam...

mfG
mirage228

[Kastor]

Hi,

Code:

var
  XMLDocument : TXMLDocument;
begin
  XMLDocument := TXMLDocument.Create(FXMLFile);
  try
    XMLDocument.DOMVendor := DOMVendors.Find(DEFAULTDOMVENDOR);
    XMLDocument.FileName := FXMLFile;
    XMLDocument.Active := True;
    if XMLDocument.DocumentElement.NodeName = 'acitsettings' then
    begin
      // einträge auslesen
    end;
  finally
    XMLDocument.Free;
end;

Ersetze mal das TXMLDocument durch ein

Code:

IXMLDocument

das ist so viel ich weiß ein Fehler in der Implementierung der TXMLDocument Klasse.

Gruß, Kastor

[mirage228]

Danke, danke, danke, danke, danke!

Du bist mein Retter, jetzt klappt es ^^

Jetzt kann ich endlich weiter

mfG
mirage228

P.S.: Ich frage mich, wann Borland sich mal dazu herablässt das zu patchen

[rschatzl]

Hallo,
du versuchst den Constructor mit dem Filenamen auszuführen!
das führt natürlich zu einer Null Pointer Exception
XMLDocument := TXMLDocument.Create(FXMLFile);

um eine Instanz eines Objektes zu erzeugen musst du als Parameter den Owner mitgeben,
meistens wird es wohl ein Formular sein, also Aufruf mit Self Variable oder Formularname

XMLDocument := TXMLDocument.Create(self);
oder z.B
XMLDocument := TXMLDocument.Create(Form1);

[mirage228]

Zitat von rschatzl:

Hallo,
du versuchst den Constructor mit dem Filenamen auszuführen!
das führt natürlich zu einer Null Pointer Exception
XMLDocument := TXMLDocument.Create(FXMLFile);

um eine Instanz eines Objektes zu erzeugen musst du als Parameter den Owner mitgeben,
meistens wird es wohl ein Formular sein, also Aufruf mit Self Variable oder Formularname

XMLDocument := TXMLDocument.Create(self);
oder z.B
XMLDocument := TXMLDocument.Create(Form1);

Hi,

so geht es natürlich.

Aber wieso wird dann auch ein Dateiname im Konstruktor angeboten?

Hm, naja mit IXMLDocument läuft es auf jeden fall.

mfG
mirage228