OK, es will nicht funktionieren.
Hier mal mein Quellcode :
Delphi-Quellcode:
// in der Uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OleCtrls, SHDocVw_TLB,
ActiveX, MSXML2_TLB;
// Prozedur mit Fehler
procedure TForm2.saveBody ();
var // Variablendeklaration
fnNew: TFileName;
ws,s: WideString;
doc: OleVariant;
f, log: TextFile;
u, xdNew: IXMLDOMDocument;
xd: IXMLDOMNode;
// die Sachen hier vor habe ich aus Platzgründen rausgelassen, überwiegend Kommentar und auskommentiertes
fnNew:=('
c:\Scan.xml');
u:=GetXMLDocument(WebBrowser1.Document);
xd:=u.selectSingleNode('
/root/data');
xdNew.ComsDOMDocument.Create;
// hier Fehlermeldung : [Fehler] Unit2.pas(125): E2003 Undefinierter Bezeichner: 'ComsDOMDocument'
xdNew.documentElement:= xd.cloneNode(True)
as IXMLDOMElement;
xdNew.save(fnNew);
Ist wahrscheinlich etwas was euch ins Auge springt und bei mir abprallt.