Funktioniert leider auch nicht:
Delphi-Quellcode:
procedure TfrmMain.toolbarButtons_btnOpenFileClick(Sender: TObject);
var
Node: IXMLDOMNode;
begin
if OpenDialog1.Execute then
begin
xmlDoc := CoDomDocument40.Create;
xmlDoc.async := False;
sXMLFileName := OpenDialog1.FileName;
xmlDoc.Load(sXMLFileName);
Node := xmlDoc.selectSingleNode('/kml/Document/Folder'); //<-- Node bleibt NIL
showmessage(node.text);
end;
end;