XML Exception bei Verarbeitung in DLL TDOMDocument

[Roth Roth]

Hallo zusammen,

zugegeben ich bin mit archaischen Mitteln am Start: Delphi 5 Enterprise.

Mein Problem ist, dass ich ein XML-File auslesen und dann den Inhalt verarbeiten möchte.

Problematisch an der Sache ist, dass das Ganze in einer DLL enthalten ist und ich beim Ausführen den DLL eine Exception erhalte.

Wenn ich denselben Code in eine stinknormale Anwendung packe, tritt keine Exception auf. Es ist davon auszugehen, dass die vorbereitenden Aktionen hinsichtlich der DLL (Laden...) korrekt implementiert sind.

procedure Tpcc_xml.XML_Datei_lesen(aInFile : String);
var
  aXMLDOMNodeList : IXMLDOMNodeList;
  Status : Boolean;
  aText : String;
  i : Integer;
  sLine : String;
  aXMLDocument : TDOMDocument;
begin
   aXMLDocument := TDOMDocument.Create(nil);

   try
     Status := aXMLDocument.load('"c:\temp\a.xml"');
   except
     on e : Exception do begin
       showMessage('hier tritt der Fehler auf');
     end;
   end;

   if (Status=False) then
     raise exception.Create('Could not load the XML file');

    //Get Story Body
   aXMLDOMNodeList := aXMLDocument.getElementsByTagName('bd');

   for i := 0 to aXMLDOMNodeList.length -1 do begin
     sLine := aXMLDOMNodeList.item[i].Get_text;
  end;
end;

Besten Dank!

[Roth Roth]

Problem gelöst

Hallo,

bei dieser Geschichte habe ich in die uses

olectnrs

eingetragen und das Problem trat zur Laufzeit der DLL nicht mehr auf.

Vielleicht hilfts es dem ein oder anderen

Gruß Roth Roth