xml-Schema in Delphi festlegen

[hsg]

Hallo Leute,

ich versuche gerade eine XML-Schnittstelle zu implementieren und stehe gleich zu Beginn etwas auf dem Schlauch:
Ich muss eine XML-Datei erzeugen, die ein Verweis auf ein Schema (hier im xdr-Format) beinhaltet:

XML-Code:

<?xml version="1.0" encoding="windows-1252"?>
<OpenShipments xmlns="x-schema:OpenShipments.xdr">
......

So weit bin ich nun:

Delphi-Quellcode:

procedure TVSDErfassungFRM.SchnittstelleErzeugen();
var
  cUPSDir   : string;
  oXmlDok   : TXMLDocument;
  oParent   : IXMLNode;
  cDatei    : string;
begin
  oXmlDok                                 := TXMLDocument.Create(nil);
  try
    oXmlDok.Active                        := True;
    oXmlDok.Options                       := oXmlDok.Options + [doNodeAutoIndent];
    oXmlDok.StandAlone                    := 'yes';
    oXmlDok.Version                       := '1.0';
    oXmlDok.Encoding                      := 'windows-1252';
    oParent                               := oXmlDok.CreateNode('OpenShipments',ntDocType);
    oXmlDok.DocumentElement               := oParent;
    cDatei                                := IncludeTrailingBackslash(cUPSDir) + 'K' + VSIdent + '.xml';
    oXmlDok.SaveToFile(cDatei);
    oXmlDok.Active                        := False;
  finally
    oXmlDok.Free();
  end;
end;

aber wie sage ich meinem XML-Dokument das zu verwendende Schema?

[GuenterS]

Warum machst Du in der Root Node nicht einfach ein Attribut mit Namen xmlns und als Wert das entsprechende Schema?

[hsg]

Zitat:

Zitat von GuenterS

Warum machst Du in der Root Node nicht einfach ein Attribut mit Namen xmlns und als Wert das entsprechende Schema?

Weil ich annahm, dass es da was in der Klasse direkt geben muss.

Delphi-Quellcode:

oParent := oXmlDok.CreateElement('OpenShipments','x-schema:'+ IncludeTrailingPathDelimiter(cHome) + 'OpenShipments.xdr');

ist wohl die korrekte Schreibweise.