Wo ich das grad sah ....
Delphi-Quellcode:
XML := TXMLFile.Create(
nil);
XML.RootNode.
Name := '
Im_a_Rootname';
Nodename jetzt
[add](also beim nächsten Update)[/add] im Create mit integriert (wenn man es denn nutzen möchte)
XML := TXMLFile.Create(nil, 'Im_a_Rootname');
(macht sich für den nächsten Schritt auch einfacher)
Zitat von
Satty67:
Wir wollen Bilder... ähh Beispiele
... Wi
e würde sowas in der neuen Aufteilung aussehen?
Delphi-Quellcode:
var
XML : TXMLFile;
SecNode, DataNode : TXMLNode;
begin
XML := TXMLFile.Create(
nil, '
Im_a_Rootname');
// with Blöcke
with XML.AddNode('
Section_1')
do
begin
Attributes.Add('
methode', '
with bloecke');
AddNode('
Value_1').Data := '
Section 1 Value 1';
AddNode('
Value_2').Data := '
Section 1 Value 2';
end;
// Klassisch
SecNode :=
XML.AddNode('
Section_2');
SecNode.Attributes.Add('
methode', '
klassisch');
DataNode := SecNode.AddNode('
Value_1');
DataNode.Data := '
Section 2 Value 1';
DataNode := SecNode.AddNode('
Value_2');
DataNode.Data := '
Section 2 Value 2';
XML.SaveToFile('
F:\WorkTemp\himXMLtest.xml');
XML.Free;
es wäre praktisch so, daß die XML-Klasse dann selber wie ein Node (der RootNode) nutzbar wäre
Zitat von
Satty67:
Mit meinem simplen Verständnis komme ich gut damit klar.
schön zu hören
Zitat von
Satty67:
btw. die with-Blöcke schreibe ich so, weil ich es schlank mag:
das with kannst hier sogar ganz weglassen
Delphi-Quellcode:
with XML.AddNode('
Section_1')
do begin
Attributes['
methode'] := '
with bloecke';
AddNode('
Value_1').Data := '
Section 1 Value 1';
AddNode('
Value_2').Data := '
Section 1 Value 2';
end;