– справка
СправкаСодержание
Xml.Name : String
Чтение имени тега
Метод Xml.Name возвращает имя тега.
Var
Text : String = '<?xml version="1.0" encoding="windows-1251"?>'
'<body>'
' <fruit kind="Apple"/>'
' <fruit kind="Avocado"/>'
' <pet kind="Dog"/>'
' <fruit kind="Banana"/>'
' <fruit kind="Cashew"/>'
'</body>';
Procedure OnCreate;
Var
X, C : Xml;
Begin
X := CreateXML(Text);
C := X.Childs;
While C.Fetch Do
Warning(C.Name+' '+C.Prop('Kind'));
End;