ich versuche mit Delphi 10.3. eine cross Plattform XML Anwendung zu erstellen,
die unit omnixml habe ich nicht bei mir gefunden , dafür Xml.omnixmldom;
muss man omniXML separat installieren ? ist omniXML nicht bereits ein Bestandteil von D 10.3

zusammenfalten · markieren

Delphi-Quellcode:

uses Xml.XMLDom,
       Xml.XMLDoc,
       Xml.XMLIntf,
       Xml.omnixmldom;;

var
  aChild: IXMLElement;
  aRow : IXMLElement;
  rowID : Integer;
  XMLDoc: IXMLDocument;
begin
  XMLDoc := CreateXMLDoc;
  XMLDoc.DocumentElement := XMLDoc.CreateElement('root');
  XMLDoc.DocumentElement.SetAttribute('ver', 'value');
  XMLDoc.DocumentElement.SetAttribute('file', 'value');

OmniXML war/ist schon eine ganze Weile mit dabei.

Viele Units wurden umbenannt, Forms.pas heißt nur Vcl.Forms.pas
und auch die Units von OmniXML wurden umbenannt.
Xml.Internal.OmniXML.pas
Xml.Internal.OmniXMLXPath.pas
Xml.OmniXMLDom.pas

OmniXmlDom waren, glaub ich, die internen Interfaces
und OmniXml die Delphi-Kapselung dieser Interfaces.

Aber im Grunde ist das egal, da du das OmniXML besser nicht direkt benutzt,
sondern die platformunabhängige Kapselung, welche dann je nach Ziel intern weiterleitet, z.B. zum OmniXML, MS-XML oder was grad verfügbar ist.
Im Notfall kann man dort dann auch einen Provider auswählen und die Umleitung steuern, wenn Mehreres verfügbar ist.

Xml.XMLDoc.pas
Xml.XMLDom.pas
Xml.XMLIniFile.pas
Xml.XMLIntf.pas
Xml.XmlTransform.pas
usw.

C:\Program Files (x86)\Embarcadero\Studio\20.0\source\xml\

einen Schritt weiter, CreateXMLDoc wird jetzt gefunden.
ich verwende jetzt

markieren

Delphi-Quellcode:

uses Xml.XMLDoc,
Xml.XMLDom,
Xml.XMLIniFile,
Xml.XMLIntf,
Xml.XmlTransform,
Xml.omnixmldom;

beim nächsten Schritt findet er die function LoadXMLData nicht, obwohl sie doch in der unit Xml.XMLDoc definiert wurde,
was geht dann hier noch falsch ???

würde gerne diesen kurzen sample code unter LINUX laufen lassen

zusammenfalten · markieren

Delphi-Quellcode:

var
  XMLDoc: IXMLDocument;
  NodeList: IXMLNodeList;
begin
  XMLDoc := CreateXMLDoc;
 // XMLDoc.Load(ExpandFileName(ExtractFilePath(Application.ExeName) + '..\doc\animals.xml'));
  NodeList := XMLDoc.DocumentElement.SelectNodes('DATA1/FISH');
  ShowMessageFmt('(1) %d nodes', [NodeList.Length]);
  NodeList := nil;
  NodeList := XMLDoc.DocumentElement.SelectNodes('DATA1/FISH');
 // ShowMessageFmt('(2) %d nodes', [NodeList.Length]);
  XMLDoc := nil;