Thema: Delphi XML Problem

Einzelnen Beitrag anzeigen

Pumba

Registriert seit: 28. Jun 2004
32 Beiträge
 
Delphi 2005 Enterprise
 
#1

XML Problem

  Alt 29. Jul 2007, 16:00
Hallo


Habe folgendes problem mit der speicherung eines XML files
Ich arbeite mit Delphi 2006, MSXML 4.0 und Win XP.
Nach dem Import eines csv File wird es in ein xml gepeichert


mit folgenden Code schreibe ich das xml

Delphi-Quellcode:
 xmlDoc := CoDOMDocument40.Create;
 //xmlDoc.setProperty('NewParser', True);

 if not FileExists(fAppPath + Databasename) then
  begin
    xmlDoc.loadXML('<?xml version="1.0"?><Produktion/>');
  end else
      xmlDoc.load(fAppPath + Databasename);

   if xmlDoc.parseError.errorCode <> 0 then
     begin
       MessageDlg('Die XML Datei ist nicht korrekt!',mtError,[mbOK],0);
     end;

  NewProduktion := xmlDoc.createElement('Produktion');
  NewSub := xmlDoc.createElement('Datum');
  NewSub.text := ZDatum;
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('Uhrzeit');
  NewSub.text := ZZeit;
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('PLZ');
  NewSub.text := '2320';
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('UserID');
  NewSub.text := 'uXXXXX';
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('Eingang');
  NewSub.text := '008';
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('Produktkennzeichen');
  NewSub.text := '?';
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('Code1');
  NewSub.text := (exparr[4]);
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('Code2');
  NewSub.text := (exparr[2]);
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('Gewicht');
  NewSub.text := (exparr[7]);
  NewProduktion.appendChild(NewSub);

  NewSub := xmlDoc.createElement('StatusID');
  NewSub.text := '?';
  NewProduktion.appendChild(NewSub);



  xmlDoc.documentElement.appendChild(NewProduktion);

  xmlDoc.save(fAppPath + Databasename);
und bekomme folgenden xml inhalt

<?xml version="1.0" ?>
- <Produktion>
- <Produktion>
<Datum>26.07.2007</Datum>
<Uhrzeit>15:45:01</Uhrzeit>
<PLZ>2320</PLZ>
<UserID>uXXXXX</UserID>
<Eingang>008</Eingang>
<Produktkennzeichen>?</Produktkennzeichen>
<Code1>AA00101367022830</Code1>
<Code2>000000203709371000000</Code2>
<StatusID>?</StatusID>
</Produktion>
- <Produktion>
<Datum>26.07.2007</Datum>
<Uhrzeit>15:45:01</Uhrzeit>
<PLZ>2320</PLZ>
<UserID>uXXXXX</UserID>
<Eingang>008</Eingang>
<Produktkennzeichen>?</Produktkennzeichen>
<Code1>AA00101367234560</Code1>
<Code2>000000203709371876540</Code2>
<StatusID>?</StatusID>
</Produktion>
</Produktion>


wie stelle ich es an das der xml inhalt so gespeichert wird


<?xml version="1.0" ?>
- <Produktion>
<Produktion Datum="20.07.2007" Uhrzeit="15:05:00" PLZ="2320" UserID="uXXXXX" Eingang="008" Produktkennzeichen="?" Code1="AA700471" Code2="0000108300875960" StatusID="?" />
<Produktion Datum="20.07.2007" Uhrzeit="15:05:14" PLZ="2320" UserID="uXXXXX" Eingang="008" Produktkennzeichen="?" Code1="AA005320" Code2="0000108300875977" StatusID="?" />
</Produktion>

ebenso sollte wenn z.b. Code1 keine Zeichen enthält dieser nicht im xml enthalten sein

vielen dank
lg
pumba
  Mit Zitat antworten Zitat