puuhhhh: dein code ist ein wenig chaotisch....
Delphi-Quellcode:
XMLDocument.NodeIndentStr := '
<2 Leerzeichen>';
// ist für das Auslesen unrelevant, benötigts du doch erst beim Erstellen
XMLDocument.FileName := XMLFilename;
if (
not(FileExists(XMLFilename)))
or {OK}
(XMLDocument.IsEmptyDoc)
then { IsEmptyDoc kann man doch erst nach einem LoadFromFile oder derartiges aufrufen?!}
begin
XMLDocument.LoadFromXML('
<?xml version="1.0"?><'+cXMLRootNodeName+'
></'+cXMLRootNodeName+'
>');
XMLDocument.SaveToFile;
end;
dein code:
Delphi-Quellcode:
try
XMLDocument.Active := true;
except
ShowMessage('
XML Fehler: Die Datei "'+XMLFilename+'
" ist fehlerhaft.');
Result := false;
end;
//Des sind die verschiedenen Möglichkeiten die ich getestet hab
1. Möglichkeit
2. Möglichkeit
3. Möglichkeit
--> sollte so aussehen:
Delphi-Quellcode:
try
XMLDocument.Active := true;
{ hier fehlt meines Erachtens nach das Laden des XML Files }
//Des sind die verschiedenen Möglichkeiten die ich getestet hab
1. Möglichkeit oder
2. Möglichkeit oder
3. Möglichkeit
except
ShowMessage('
XML Fehler: Die Datei "'+XMLFilename+'
" ist fehlerhaft.');
Result := false;
end;
Weil wenn bei dir da was fehlschlägt,
dann macht er ja trotzdem weiter mit deinen Möglichkeiten.