XML mit TJvSimpleXml

[WizoHulk]

ich habs rausgefunden

xml.Root.Items.ItemNamed['Share'].Items.Add('Name','text').Properties.Add('attribut ','Wert');

danke für eure Hilfe :lol:

[Sir Rufo]

Zitat:

Zitat von himitsu (Beitrag 1100861)

Zitat:

Zitat von Sir Rufo (Beitrag 1100851)

Falsch, der Knoten hat als Namen

Delphi-Quellcode:

Directory

und dieser Knoten hat noch ein Attribut

Delphi-Quellcode:

Virtual

mit dem Wert

Delphi-Quellcode:

Name

.
Der Inhalt des Knotens ist dann

Delphi-Quellcode:

Pfad

.
XML Logischer Aufbau

Wobei sowas ja auch schonmal gesagt wurde ... ich frag mich nur von wem? :stupid:

Klarer Fall, die bauen die Matrix wieder um :cyclops:

[himitsu]

OK, Properties ist schonmal ein bissl "eigenartig", aber vom Prinzip her paßt dieser Name auch noch. :shock:
Laut XML-Spezifikation sind es halt "Attribute", aber im weitesten Sinne ist die Bedeutung von Beiden ja ähnlich.

[ConnorMcLeod]

Zitat:

Zitat von WizoHulk (Beitrag 1100852)

kann es sein das es keine Function gibt die eine Attribut setzt?

Attribute heissen dort Properties.

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  lXML       : TJvSimpleXML;
begin
  lXML := TJvSimpleXML.Create(nil);
  try
    lXML.Root.Name := 'myroot';
    lXML.Root.Value := 'blah';
    lXML.Root.Properties.Add('propatt', 'value');
    RichEdit1.Text := lXML.XMLData;
  finally
    FreeAndNil(lXML);
  end;
end;

Ups, viel zu spät beantwortet ...

[WizoHulk]

ich will einen knoten nur Attribute setzen.
Aber leider find ich nicht so richtig die funktion dafür.

aussehen soll es so:

Code:

<Hubs>
      <Hub Name="FoslanServer" Description="" Nick="" Password="" Server="192.168.0.100" UserDescription="" Encoding="German_Germany.1252" Group=""/>
   </Hubs>

wenn ich den knoten Attribute zuweise kommt dabei dass raus.

Code:

 <Hubs Hub Name="FoslanServer" Hub Name="FoslanServer" Description="" Nick="" Password="" Server="192.168.0.100" UserDescription="" Encoding="German_Germany.1252" Group=""/>

mit dieser Funktion bin ich kläglich gescheitert

Delphi-Quellcode:

// xml.Root.Items.ItemNamed['Hubs'].Properties.Add('Hub Name',sServerName);
  xml.Root.Items.ItemNamed['Hubs'].Properties.Add('Description','');
  xml.Root.Items.ItemNamed['Hubs'].Properties.Add('Nick','');
  xml.Root.Items.ItemNamed['Hubs'].Properties.Add('Password','');
  xml.Root.Items.ItemNamed['Hubs'].Properties.Add('Server',sRoot);
  xml.Root.Items.ItemNamed['Hubs'].Properties.Add('UserDescription','');
  xml.Root.Items.ItemNamed['Hubs'].Properties.Add('Encoding','German_Germany.1252');
  xml.Root.Items.ItemNamed['Hubs'].Properties.Add('Group','');

[ConnorMcLeod]

Delphi-Quellcode:

var
  lXML : TJvSimpleXML;
  lNode: TJvSimpleXMLElem;
begin
  lXML := TJvSimpleXML.Create(nil);
  try
    lXML.Root.Name := 'Hubs';
    lNode := lXML.Root.Items.Add('Hub', '');
    lNode.Properties.Add('Name', 'FoslanServer');
... usw ...
    RichEdit1.Text := lXML.XMLData;
  finally
    FreeAndNil(lXML);
  end;

Davon abgesehen könntest Du die Struktur nochmal durchdenken; das korrektere XML wäre:

Delphi-Quellcode:

<Hubs>
      <Hub> 
        <Name>FoslanServer</Name> 
        <Description/> 
        <Nick/> 
        <Password/> 
        <Server>192.168.0.100</Server> 
... usw ...
      </Hub> 
   </Hubs>

[WizoHulk]

Ich kann die struktur nicht ändern. die ist von DCPlusPlus so vorgegeben.
Ich will dort die Werte übergeben.

Habe aber durch deine Hilfe grad mein Fehler entdeckt.
habe "Hub Name" als eigenständiges Wort gelesen.

Werd es heut abend mal testen.
vielen Dank

[DanXe]

Hallo,

Danke für das Tutorial!

Vielleicht könnt ihr mir bei dem Problem weiterhelfen !?

http://www.delphipraxis.net/185116-d...portieren.html