Hi,
ich versuche mich jetzt ein bisschen an
XML...
und schon am Anfang habe ich ein Problem...
mein Code:
Delphi-Quellcode:
procedure TfrmMain.AdvGlowButton31Click(Sender: TObject);
var
xml: TXMLDocument;
test: IXMLNode;
begin
SaveDialog1.InitialDir:=abakus.DataDir;
if (SaveDialog1.Execute)
then
begin
try
xml:=TXMLDocument.Create(
nil);
xml.Active:=True;
xml.Version := '
1.0';
xml.Encoding := '
ISO-8859-1';
xml.Options:=[doNodeAutoIndent];
test:=
xml.AddChild('
test');
xml.SaveToFile(SaveDialog1.FileName);
finally
xml.Free;
end;
end;
end;
Ich bekomme an der Stelle von
test:=xml.AddChild('test');
eine
Exception:
---------------------------
Benachrichtigung über Debugger-
Exception
---------------------------
Im Projekt Test.exe ist eine
Exception der Klasse EInvalidPointer mit der Meldung 'Ungültige Zeigeroperation' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------
woran könnte das denn liegen? Der gleiche Code scheint in
dem Thread zu funktionieren =/