Zeig mal die relevanten Teile deines Quelltextes und die XML Datei.
Wichtig bei der Verwendung der XML funktionalität ist die Intialisierung der zur Verfügung stehenden Anbieter (Vendors). Das läuft eigentlich vollständig automatisch. Aber gerade dort habe ich selber immer malwieder Probleme.
Da es nur auf einigen Rechnern klemmt vermute ich aber das es entweder mit der lokalen Implementierung des MSXML zu tun hat auf die die XML Schnittstelle zugreift oder mit der Konfiguration des Rechners zusammenhängt.
Was du noch versuchen könntest, wäre einmal direkt auf die Implementierung von MSXML zuzugreifen.
Dazu brauchst du auf deinem Rechnern nur die Datei "..\WINDOWS\system32\msxml6.dll" zu suchen und als TypeLib in Delphi zu importieren.
Die resultierende Unit und die Units ActiveX und ComObj bindest du ein.
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21:
| procedure Foo; var XMLDoc: IXMLDOMDocument; state: string;
begin CoInitialize(nil); XMLDoc := CreateOleObject('Microsoft.XMLDOM') as IXMLDomDocument; XMLDoc.LoadXML(aXMLString);
state := XMLDoc.documentElement.selectSingleNode('./Ack').text;
CoUninitialize; end; |
Wir zerstören die Natur und Wälder der Erde. Wir töten wilde Tiere für Trophäen. Wir produzieren Lebewesen als Massenware um sie nach wenigen Monaten zu töten. Warum sollte unser aller Mutter, die Natur, nicht die gleichen Rechte haben?