D6+XML [D6, Win95/98, WinME, NT4, Win2k, WinXP]
Юров Владимир © (2003-02-11 08:52:00)
Кто подскажет, как работать с XML в Delphi 6?
A_Gura (2003-02-11 09:29:00) [1]
На вкладке Internet компонент TXMLDocument. Все элементы (в
том числе и корневой) имеют тип IXMLNode.
var
XMLDoc : TXMLDocument; //документ XML
root, node : IXMLNode; //элементы
i : integer;
begin
XMLDoc.LoadFromFile("myfile.xml"); //jnrhsdftv ljrevtyn
XMLDoc.Active:=true;
root:=XMLDBDoc.DocumentElement; //получаем корневой элемент
//перебираем все элементы первого уровня
for i:=0 to root.ChildNodes.Count-1 do
begin
node:=root.ChildNodes[i];
Memo.Lines.Add(node.GetNodeName); //имя элемента
Memo.Lines.Add(node.GetAttribute("attr_name")) //значение
атрибута с именем attr_name
end;
end;
Наверх 
ЧАТ |
Орешник |
|
