XML ohne zusätzliche Komponenten in D2005 PE?

[EDatabaseError]

Gibt es irgentin Tutorial zur Einführung in XML ohne zusätliche Komponenten wie die Jedis für Delphi 2005 PE.

Mfg

[mkinzler]

Warum keine Komponenten? Ist doch etwas mühsam die XML-Dateien manuell zu Parsen.

[EDatabaseError]

Hat Delphi denn da keine eigenen Komponenten dazu???
(Soll auch mit TurboDelphi laufen ;-) )

Mfg

[Chewie]

Geht doch auch so mit TurboDelphi, wenn dus über den Quellcode einbindest. Du kannst dann deinen XML-Parser zwar nicht auf das Formular ziehen, sondern mussz im Code ein Objekt der Klasse erstellen, das ist alles.

[mkinzler]

Zitat:

Hat Delphi denn da keine eigenen Komponenten dazu???

Die PE nicht. Es gibt aber eine Vielzahl anderer freier Komponenten dafür.

[EDatabaseError]

ok, dann eben mit externen Komponenten :-|
Gibt es eine Kompo. mit der man einfach arbeiten kann inkl. Tutorial?

Mfg

[fwsp]

http://dsdt.info/tutorials/thaxml/

hab ich grad durch.

[jbg]

Zitat:

Zitat von EDatabaseError

Hat Delphi denn da keine eigenen Komponenten dazu???

Klar, aber erst ab der Pro Version. Bei der Personal fehlt die xmlrtl.dcp. Und die Fake-xmlrtl.dcp bringt nichts, da sie nur Interfaces bereitstellt, aber nicht den eigentlichen Code.

[Mackhack]

XML Unit von Muetze1

[mkinzler]

XMLPartner von TurboPower

[Ydobon]

Oder ohne alles: CreateOLEObject('Msxml2.DOMDocument.6.0')

[Bernhard Geyer]

Zitat:

Zitat von Ydobon

Oder ohne alles: CreateOLEObject('Msxml2.DOMDocument.6.0')

Aber nur wenn die passende Version auch instaliert ist (Von MS XML2, die Version 6 wenn mich nicht alles täuscht.

Mein Liebling: OpenXMl

[Ydobon]

Nummer 6 ist auch nur die aktuelle Version. 3 oder 4 dürfte zur Standardausstattung gehören, 5 gibt es mit Office und die letzte Version u.a. als eigener Download. Ich habe es so bisher nur einmal für XSLT verwendet, das ganze sieht dann etwa so aus:

Delphi-Quellcode:

var xml: OLEVariant;
    clsid: TGUID;
begin
  if failed(CLSIDFromProgID('Msxml2.DOMDocument.6.0', clsid)) then
     if failed(CLSIDFromProgID('Msxml2.DOMDocument.5.0', clsid)) then
       if failed(CLSIDFromProgID('Msxml2.DOMDocument.4.0', clsid)) then
         if failed(CLSIDFromProgID('Msxml2.DOMDocument.3.0', clsid)) then
         begin
           MessageBox(Handle, 'Mindestens MSXML 3.0 muss installiert sein!', 'Fehler',
                      MB_ICONERROR or MB_OK);
           exit;
         end;
  xml:=CreateOLEObject(ClassIDToProgID(clsid));