vložil Radek Červinka
3. října 2010 00:31
Pro přístup k XML v Delphi je možno použít několik různých komponent nebo tříd. Součástí instalace Delphi je implementace XML zapouzdřující ActiveX implementaci XML od MS (MSXML6) - komponenty TXMLDocument atd.
JCL má nativní implementaci v JvSimpleXML nebo můžete použít třeba NativeXML. Posledně jmenovaný zástupce je původně komerční komponenta, kterou ale autor otevřel jako open source. Jedná se o velmi rychlou záležitost s podporou od Delphi 5 až do aktuální verze. V projektu stačí přidat jeden soubor .pas a jeden .inc - pro mne velmi sympatická vlastnost.
Proč použít nativní komponentu? Hlavním plusem je nezávislost na MS knihovnách. Nejen s ohledem na další verzi (multiplatformnost a 64bit) si člověk ušetří dost problémů.
Použití je snadné - viz ukázka:
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils, NativeXml;
var
oXML: TNativeXml;
oNode: TXmlNode;
begin
oXML := TNativeXml.Create;
try
oXML.LoadFromFile('test.xml');
writeln(oXML.Root.Name); // node name
oNode := oXML.Root.FindNode('appchecks'); // child node
writeln(oXML.Root.AttributeByName['version']); // atribut
// vytvoreni node a atributu
oNode.NodeNew('novynode').AttributeAdd('novyattr', 20);
oXML.SaveToFile('test2.xml');
finally
FreeAndNil(oXML);
end;
end.
RSS