Einzelnen Beitrag anzeigen

dpg123

Registriert seit: 13. Apr 2015
22 Beiträge
 
Turbo Delphi für Win32
 
#2

AW: Vom IXmlNode zum IXmlDocument

  Alt 16. Nov 2017, 17:45
Ok, ich denke ich bin ein Schritt weiter:

Delphi-Quellcode:
procedure TForm1.btnParseClick(Sender: TObject);

var

 lMyDaten: IXmlMyDaten; // Vom Wizard erstellter Root Node

 lXmlDoc: IXMLDocument;

begin


  lXmlDoc := NewXMLDocument('1.0'); // neues xml-Dokument initialisieren

  lXmlDoc.StandAlone := 'yes';

  lXmlDoc.Encoding := 'UTF-8';

// einkommentiert wird kein Node NName gefunden. Find ich merkwürdig.
// lXmlDoc.Options := [doNodeAutoIndent];


// das sieht schon deutlich mehr danach aus, als ob es so gedacht ist
  lMyDaten:= GetMyDaten(lXmlDoc); // Vom Wizard erstellte Funktion

  
  lMyDaten.NName := 'Mustermann'; //Beispiel Daten

  lMyDaten.VName := 'Max';


  // was muss ich der xml-Datei mitteilen, dass hier die Validierung ausgelöst wird?
  lXmlDoc.Active := True;

  lXmlDoc.SaveToFile('MyDatenMuster.xml');


  lXmlDoc := nil;

  lMyDaten := nil;


end;
  Mit Zitat antworten Zitat