XML mit TJvSimpleXml

[WizoHulk]

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

[Sir Rufo]

Such mal hier im Forum nach himXML damit geht das auf jeden Fall

[himitsu]

Nein, kann es nicht.
Ich hab jetzt die JEDI-XML-Lib nicht vor mir liegen, aber ich bin mir ganz sicher, daß es dafür was gibt und da ist mit großer Sicherheit auch etwas ala "Attr", "Attrib" oder sogar "Attribute" im Namen der Methode/Property.

Zitat von Sir Rufo:

Falsch, der Knoten hat als Namen Directory und dieser Knoten hat noch ein Attribut Virtual mit dem Wert Name .
Der Inhalt des Knotens ist dann Pfad .
XML Logischer Aufbau

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

[WizoHulk]

ich habs rausgefunden

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

danke für eure Hilfe

[Sir Rufo]

Zitat von himitsu:

Zitat von Sir Rufo:

Falsch, der Knoten hat als Namen Directory und dieser Knoten hat noch ein Attribut Virtual mit dem Wert Name .
Der Inhalt des Knotens ist dann Pfad .
XML Logischer Aufbau

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

Klarer Fall, die bauen die Matrix wieder um

[himitsu]

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

[ConnorMcLeod]

Zitat von WizoHulk:

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